diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/char_array_structure_constructor.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/char_array_structure_constructor.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/char_array_structure_constructor.f90 b/gcc/testsuite/gfortran.dg/char_array_structure_constructor.f90 index cfe787b5375..b67557123fa 100644 --- a/gcc/testsuite/gfortran.dg/char_array_structure_constructor.f90 +++ b/gcc/testsuite/gfortran.dg/char_array_structure_constructor.f90 @@ -21,7 +21,7 @@ program char_array_structure_constructor call alloc (2) if ((any (c%a /= "wxyz")) .OR. & (any (c%b(1) /= "abcd")) .OR. & - (any (c%b(2) /= "efgh"))) call abort () + (any (c%b(2) /= "efgh"))) STOP 1 contains SUBROUTINE alloc (n) USE global |