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; }