This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[gfortran] Minor cleanup
- From: Paul Brook <paul at codesourcery dot com>
- To: fortran at gcc dot gnu dot org
- Cc: gcc-patches at gcc dot gnu dot org
- Date: Tue, 31 Aug 2004 19:59:51 +0100
- Subject: [gfortran] Minor cleanup
- Organization: CodeSourcery
A minor cleanup of core that was left behind by a previous change.
Paul
2004-08-31 Paul Brook <paul@codesourcery.com>
* io/unit.c (get_unit): Remove superfluous if.
Index: unit.c
===================================================================
RCS file: /var/cvsroot/gcc-cvs/gcc/libgfortran/io/unit.c,v
retrieving revision 1.4
diff -u -p -r1.4 unit.c
--- unit.c 18 May 2004 16:06:09 -0000 1.4
+++ unit.c 31 Aug 2004 18:12:07 -0000
@@ -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;
}