diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/nearest_1.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/nearest_1.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/nearest_1.f90 b/gcc/testsuite/gfortran.dg/nearest_1.f90 index 1518e867d8a..4be11955042 100644 --- a/gcc/testsuite/gfortran.dg/nearest_1.f90 +++ b/gcc/testsuite/gfortran.dg/nearest_1.f90 @@ -15,6 +15,6 @@ program chop y = nearest(tiny(o),-1.0)/2.0 ix = transfer(x,ix) iy = transfer(y,iy) - if (ix /= iy) call abort + if (ix /= iy) STOP 1 end program chop |