diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/trim_optimize_6.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/trim_optimize_6.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/trim_optimize_6.f90 b/gcc/testsuite/gfortran.dg/trim_optimize_6.f90 index 2303bb4ef78..296f72fbcca 100644 --- a/gcc/testsuite/gfortran.dg/trim_optimize_6.f90 +++ b/gcc/testsuite/gfortran.dg/trim_optimize_6.f90 @@ -20,6 +20,6 @@ program main b(1) = 'a' b(2) = 'bc' write(unit=line,fmt='(A,A)') trim(b(f())), "X" - if (line /= "aX ") call abort - if (f() .ne. 2) call abort + if (line /= "aX ") STOP 1 + if (f() .ne. 2) STOP 2 end program main |