diff options
Diffstat (limited to 'libgfortran/io/unit.c')
| -rw-r--r-- | libgfortran/io/unit.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c index 33072fe9ae8..7c71b090e3a 100644 --- a/libgfortran/io/unit.c +++ b/libgfortran/io/unit.c @@ -1,4 +1,4 @@ -/* Copyright (C) 2002, 2003, 2005, 2007, 2008, 2009, 2010 +/* Copyright (C) 2002, 2003, 2005, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc. Contributed by Andy Vaught F2003 I/O support contributed by Jerry DeLisle @@ -816,7 +816,7 @@ get_unique_unit_number (st_parameter_open *opp) #endif /* Do not allow NEWUNIT numbers to wrap. */ - if (num > GFC_FIRST_NEWUNIT ) + if (num > GFC_FIRST_NEWUNIT) { generate_error (&opp->common, LIBERROR_INTERNAL, "NEWUNIT exhausted"); return 0; |