[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Modif test generic_assumed_rank_1

Mikael Morin mikael@gcc.gnu.org
Fri Jun 13 15:11:11 GMT 2025


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

commit e07ed9097f311386a4010e521a299ed36d9b56c9
Author: Mikael Morin <mikael@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


More information about the Gcc-cvs mailing list