diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/nan_7.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/nan_7.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/nan_7.f90 b/gcc/testsuite/gfortran.dg/nan_7.f90 index 4aecfd64627..622e49f5054 100644 --- a/gcc/testsuite/gfortran.dg/nan_7.f90 +++ b/gcc/testsuite/gfortran.dg/nan_7.f90 @@ -12,5 +12,5 @@ r = 1.0 str = 'NAN' ; read(str,*) r k2 = transfer(r,k2) k2 = iand(k2, z'fff80000000000000000000000000000') -if (k2.ne.quietnan) call abort +if (k2.ne.quietnan) STOP 1 end |