https://gcc.gnu.org/g:b1926a7dc9e7683ea9e26cbd139f2994a3ae6a78

commit b1926a7dc9e7683ea9e26cbd139f2994a3ae6a78
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Sat May 31 22:34:20 2025 +0200

    Modif test generic_assumed_rank_1

Diff:
---
 gcc/testsuite/gfortran.dg/f202y/generic_assumed_rank_1.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/testsuite/gfortran.dg/f202y/generic_assumed_rank_1.f90 
b/gcc/testsuite/gfortran.dg/f202y/generic_assumed_rank_1.f90
index bca715e7acac..db177f688f4f 100644
--- a/gcc/testsuite/gfortran.dg/f202y/generic_assumed_rank_1.f90
+++ b/gcc/testsuite/gfortran.dg/f202y/generic_assumed_rank_1.f90
@@ -21,7 +21,7 @@ contains
      real, pointer :: argp(:,:)
      integer :: i
 
-     if (size (arg) .lt. 0) return
+     if (size (arg) .le. 0) return
 
      if (size (arg) .ne. 8) stop 10

Reply via email to