diff options
| -rw-r--r-- | libgfortran/io/io.h | 3 | ||||
| -rw-r--r-- | libgfortran/io/unit.c | 4 |
2 files changed, 4 insertions, 3 deletions
diff --git a/libgfortran/io/io.h b/libgfortran/io/io.h index 3569c543f01..5270fd7c0b4 100644 --- a/libgfortran/io/io.h +++ b/libgfortran/io/io.h @@ -1,4 +1,5 @@ -/* Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 +/* Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, + 2011 Free Software Foundation, Inc. Contributed by Andy Vaught F2003 I/O support contributed by Jerry DeLisle 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; |