diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/dependency_25.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/dependency_25.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/dependency_25.f90 b/gcc/testsuite/gfortran.dg/dependency_25.f90 index f2517f52ebf..14cdd50adcc 100644 --- a/gcc/testsuite/gfortran.dg/dependency_25.f90 +++ b/gcc/testsuite/gfortran.dg/dependency_25.f90 @@ -88,6 +88,6 @@ program TestProgram Table%RealData(:,5) = Table%RealData(:,5) * CENTIMETER ! print *, Table%RealData - if (any (abs(Table%RealData(:,4) - 1) > epsilon(1.0))) call abort () - if (any (abs(Table%RealData(:,[1,2,3,5]) - 42) > epsilon(1.0))) call abort () + if (any (abs(Table%RealData(:,4) - 1) > epsilon(1.0))) STOP 1 + if (any (abs(Table%RealData(:,[1,2,3,5]) - 42) > epsilon(1.0))) STOP 2 end program TestProgram |