Fortran: Fix associate_69.f90 that fails on some platforms [PR115700]

2024-11-03  Paul Thomas  <pault@gcc.gnu.org>

gcc/testsuite/
	PR fortran/115700
	* gfortran.dg/associate_69.f90: Remove the test that produces a
	variable string length because the optimized count depends on
	the platform. This is tested in associate_70.f90.

diff --git a/gcc/testsuite/gfortran.dg/associate_69.f90 b/gcc/testsuite/gfortran.dg/associate_69.f90
index 35db417867d4c4a13cbe41330662df49a22c852e..3839718e7f0ee69d2e02e5170eae46f7417899df 100644 (file)
--- a/gcc/testsuite/gfortran.dg/associate_69.f90
+++ b/gcc/testsuite/gfortran.dg/associate_69.f90
@@ -30,11 +30,6 @@ subroutine mvce(x)
   associate (tmp5 => x(1:)(1:))
     if (len (tmp5) /= len (x)) stop 5
   end associate
-
-  associate (temp6 => x(:)(1:i/2))
-    if (len (temp6) /= i/2) stop 6
-  end associate
 end
 
 ! { dg-final { scan-tree-dump-not " \\.tmp" "optimized" } }
-! { dg-final { scan-tree-dump-times " \\.temp6" 7 "optimized" } }