diff options
| author | Paul Brook <paul@codesourcery.com> | 2004-08-31 18:59:42 +0000 |
|---|---|---|
| committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-08-31 18:59:42 +0000 |
| commit | 8a210b0fb0b2e2de7811394b77db69f7921e9586 (patch) | |
| tree | e9b48c543335c1d756a8bf3814b7cddb5b065d43 /libgfortran | |
| parent | 11bb4b2798ebb30c614f486d4c405a8f969f72c4 (diff) | |
| download | gcc-8a210b0fb0b2e2de7811394b77db69f7921e9586.zip gcc-8a210b0fb0b2e2de7811394b77db69f7921e9586.tar.gz gcc-8a210b0fb0b2e2de7811394b77db69f7921e9586.tar.bz2 | |
* io/unit.c (get_unit): Remove superfluous if.
From-SVN: r86838
Diffstat (limited to 'libgfortran')
| -rw-r--r-- | libgfortran/ChangeLog | 4 | ||||
| -rw-r--r-- | libgfortran/io/unit.c | 4 |
2 files changed, 5 insertions, 3 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 1c76245..641f32d 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,5 +1,9 @@ 2004-08-31 Paul Brook <paul@codesourcery.com> + * io/unit.c (get_unit): Remove superfluous if. + +2004-08-31 Paul Brook <paul@codesourcery.com> + * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF. (finalize_transfer): Move setjmp after namlist IO. * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly. diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c index c3d6e7e..4b09884 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; } |