https://gcc.gnu.org/g:098078effe6e66611095db67ca04c416aeb0f27d

commit 098078effe6e66611095db67ca04c416aeb0f27d
Author: Mikael Morin <[email protected]>
Date:   Tue Oct 13 17:24:38 2026 +0200

    Activation erreurs test

Diff:
---
 gcc/testsuite/gfortran.dg/target_dummy_span_4.f90 | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/gcc/testsuite/gfortran.dg/target_dummy_span_4.f90 
b/gcc/testsuite/gfortran.dg/target_dummy_span_4.f90
index 1d71b9d07413..8537ca4c0840 100644
--- a/gcc/testsuite/gfortran.dg/target_dummy_span_4.f90
+++ b/gcc/testsuite/gfortran.dg/target_dummy_span_4.f90
@@ -42,9 +42,9 @@ contains
       integer, intent(in) :: e
       integer :: i
       if (size(a) /= size(v)) error stop e*10
-      do i = 1, size(a)
-         print *, e*10+i, (a(i) == v(i) ? "PASS" : "FAIL"), a(i), v(i)
-      end do
-      ! if (any(a /= v)) error stop e*10+9
+      !do i = 1, size(a)
+      !   print *, e*10+i, (a(i) == v(i) ? "PASS" : "FAIL"), a(i), v(i)
+      !end do
+      if (any(a /= v)) error stop e*10+9
    end subroutine
 end program

Reply via email to