diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/interface_19.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/interface_19.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/interface_19.f90 b/gcc/testsuite/gfortran.dg/interface_19.f90 index 2d72caa058d..c42d4ad160c 100644 --- a/gcc/testsuite/gfortran.dg/interface_19.f90 +++ b/gcc/testsuite/gfortran.dg/interface_19.f90 @@ -16,7 +16,7 @@ contains end interface if(present(a)) then write(temp,'(f16.10)')a(4.0d0) - if (trim(temp) /= ' -0.6536436209') call abort + if (trim(temp) /= ' -0.6536436209') STOP 1 endif end subroutine sub end module m |