diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/round_3.f08')
-rw-r--r-- | gcc/testsuite/gfortran.dg/round_3.f08 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/round_3.f08 b/gcc/testsuite/gfortran.dg/round_3.f08 index 2bb36d9eeef..57d83395531 100644 --- a/gcc/testsuite/gfortran.dg/round_3.f08 +++ b/gcc/testsuite/gfortran.dg/round_3.f08 @@ -118,7 +118,7 @@ contains character(len=20) :: s write(s, fmt) x - if (s /= cmp) call abort + if (s /= cmp) STOP 1 !if (s /= cmp) print "(a,1x,a,' expected: ',1x)", fmt, s, cmp end subroutine end program |