diff options
| author | Richard Henderson <rth@redhat.com> | 2004-12-06 16:01:01 -0800 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 2004-12-06 16:01:01 -0800 |
| commit | f21edfd62d267934ad7e9475976719bc41ee7dc3 (patch) | |
| tree | 379c730c455320b1f8101e6a2c9d24435a6e33b3 /libgfortran/intrinsics/exit.c | |
| parent | 9f91e6cc1610417926374738af0e102187723d59 (diff) | |
| download | gcc-f21edfd62d267934ad7e9475976719bc41ee7dc3.zip gcc-f21edfd62d267934ad7e9475976719bc41ee7dc3.tar.gz gcc-f21edfd62d267934ad7e9475976719bc41ee7dc3.tar.bz2 | |
c99_functions.c, [...]: Whitespace fixes.
* intrinsics/c99_functions.c, intrinsics/eoshift0.c,
intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
intrinsics/spread_generic.c, intrinsics/stat.c,
intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
intrinsics/transpose_generic.c, intrinsics/unlink.c,
intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
io/write.c, runtime/environ.c, runtime/error.c,
runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
runtime/memory.c, runtime/pause.c, runtime/stop.c,
runtime/string.c: Whitespace fixes.
From-SVN: r91794
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 6ae4dfd..f15d567 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); |