diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/generic_20.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/generic_20.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/generic_20.f90 b/gcc/testsuite/gfortran.dg/generic_20.f90 index 83485b6f7b9..f5e6bed7d32 100644 --- a/gcc/testsuite/gfortran.dg/generic_20.f90 +++ b/gcc/testsuite/gfortran.dg/generic_20.f90 @@ -25,5 +25,5 @@ end module m use m real :: res(1) res = matmul (one(2.0), (/ 2.0/)) -if (abs (res(1)-4.0) > epsilon (res)) call abort () +if (abs (res(1)-4.0) > epsilon (res)) STOP 1 end |