diff options
Diffstat (limited to 'gcc/testsuite/gfortran.fortran-torture/execute/character_select_1.f90')
-rw-r--r-- | gcc/testsuite/gfortran.fortran-torture/execute/character_select_1.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/character_select_1.f90 b/gcc/testsuite/gfortran.fortran-torture/execute/character_select_1.f90 index c42cea4fc21..46af8a12968 100644 --- a/gcc/testsuite/gfortran.fortran-torture/execute/character_select_1.f90 +++ b/gcc/testsuite/gfortran.fortran-torture/execute/character_select_1.f90 @@ -2,11 +2,11 @@ CHARACTER(LEN=6) :: C = "STEVEN" SELECT CASE (C) CASE ("AAA":"EEE") - CALL abort + STOP 1 CASE ("R":"T") CONTINUE CASE DEFAULT - CALL abort + STOP 2 END SELECT END |