diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/charlen_16.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/charlen_16.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/charlen_16.f90 b/gcc/testsuite/gfortran.dg/charlen_16.f90 index 826f733c82d..ba81b788c15 100644 --- a/gcc/testsuite/gfortran.dg/charlen_16.f90 +++ b/gcc/testsuite/gfortran.dg/charlen_16.f90 @@ -5,5 +5,5 @@ program p character(2) :: c(1) = [character(3) :: 'abc'] end type type(t) :: x - if (trim(x%c(1)) /= 'ab') call abort + if (trim(x%c(1)) /= 'ab') STOP 1 end |