diff options
Diffstat (limited to 'libgfortran/intrinsics/exit.c')
| -rw-r--r-- | libgfortran/intrinsics/exit.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libgfortran/intrinsics/exit.c b/libgfortran/intrinsics/exit.c index 6ae4dfdf335..f15d56787bf 100644 --- a/libgfortran/intrinsics/exit.c +++ b/libgfortran/intrinsics/exit.c @@ -33,7 +33,6 @@ Boston, MA 02111-1307, USA. */ void prefix(exit_i4) (GFC_INTEGER_4 * status) { - if (status == NULL) exit(0); exit(*status); @@ -42,7 +41,6 @@ prefix(exit_i4) (GFC_INTEGER_4 * status) void prefix(exit_i8) (GFC_INTEGER_8 * status) { - if (status == NULL) exit(0); exit((int) *status); |