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