diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/g77/7388.f')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/g77/7388.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/g77/7388.f b/gcc/testsuite/gfortran.dg/g77/7388.f index 0b8374646b0..66c0640071e 100644 --- a/gcc/testsuite/gfortran.dg/g77/7388.f +++ b/gcc/testsuite/gfortran.dg/g77/7388.f @@ -8,5 +8,5 @@ C { dg-options "-fbounds-check" } m2 = 7 buff(i) = 'tcase0a' write(line,*) buff(i)(m1:m2) - if (line .ne. ' tcase0a') call abort + if (line .ne. ' tcase0a') STOP 1 end |