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

From-SVN: r86838

libgfortran/ChangeLog

 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.

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