From: Paul Brook <paul@codesourcery.com>
Date: Tue, 31 Aug 2004 18:59:42 +0000 (+0000)
Subject: * io/unit.c (get_unit): Remove superfluous if.
X-Git-Tag: releases/gcc-4.0.0~5366
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=8a210b0fb0b2e2de7811394b77db69f7921e9586;p=thirdparty%2Fgcc.git

* io/unit.c (get_unit): Remove superfluous if.

From-SVN: r86838
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 1c76245bb391..641f32d4dce0 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+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.
diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c
index c3d6e7eca131..4b09884e35b4 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;
 }