From 8a210b0fb0b2e2de7811394b77db69f7921e9586 Mon Sep 17 00:00:00 2001 From: Paul Brook Date: Tue, 31 Aug 2004 18:59:42 +0000 Subject: [PATCH] * io/unit.c (get_unit): Remove superfluous if. From-SVN: r86838 --- libgfortran/ChangeLog | 4 ++++ libgfortran/io/unit.c | 4 +--- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 1c76245bb39..641f32d4dce 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,7 @@ +2004-08-31 Paul Brook + + * io/unit.c (get_unit): Remove superfluous if. + 2004-08-31 Paul Brook * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF. diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c index c3d6e7eca13..4b09884e35b 100644 --- a/libgfortran/io/unit.c +++ b/libgfortran/io/unit.c @@ -264,10 +264,8 @@ get_unit (int read_flag) /* Has to be an external unit */ u = find_unit (ioparm.unit); - if (u != NULL) - return u; - return NULL; + return u; } -- 2.30.2