diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/execute_command_line_2.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/execute_command_line_2.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/execute_command_line_2.f90 b/gcc/testsuite/gfortran.dg/execute_command_line_2.f90 index 5a4e9cc7b82..43b97c906de 100644 --- a/gcc/testsuite/gfortran.dg/execute_command_line_2.f90 +++ b/gcc/testsuite/gfortran.dg/execute_command_line_2.f90 @@ -8,7 +8,7 @@ ! This should fail, set CMDSTAT to nonzero value, and an error message ! in CMDMSG. call execute_command_line ("/nosuchfile", exitstat=s, cmdstat=c, cmdmsg=msg) - if (c == 0) call abort - if (len_trim(msg) == 0) call abort + if (c == 0) STOP 1 + if (len_trim(msg) == 0) STOP 2 end |