diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/g77/1832.f')
-rw-r--r-- | gcc/testsuite/gfortran.dg/g77/1832.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/g77/1832.f b/gcc/testsuite/gfortran.dg/g77/1832.f index 6b7617d62e0..e40c87878bd 100644 --- a/gcc/testsuite/gfortran.dg/g77/1832.f +++ b/gcc/testsuite/gfortran.dg/g77/1832.f @@ -3,7 +3,7 @@ c { dg-do run } ! character*5 string write(string, *) "a " - if (string .ne. ' a') call abort + if (string .ne. ' a') STOP 1 C-- The leading space is normal for list-directed output end |