mirror of git://gcc.gnu.org/git/gcc.git
Copyright years and whitespace fix for r180734
From-SVN: r180736
This commit is contained in:
parent
7b523334ed
commit
eb6a1e56e0
|
|
@ -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.
|
Free Software Foundation, Inc.
|
||||||
Contributed by Andy Vaught
|
Contributed by Andy Vaught
|
||||||
F2003 I/O support contributed by Jerry DeLisle
|
F2003 I/O support contributed by Jerry DeLisle
|
||||||
|
|
|
||||||
|
|
@ -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.
|
Free Software Foundation, Inc.
|
||||||
Contributed by Andy Vaught
|
Contributed by Andy Vaught
|
||||||
F2003 I/O support contributed by Jerry DeLisle
|
F2003 I/O support contributed by Jerry DeLisle
|
||||||
|
|
@ -816,7 +816,7 @@ get_unique_unit_number (st_parameter_open *opp)
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
/* Do not allow NEWUNIT numbers to wrap. */
|
/* 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");
|
generate_error (&opp->common, LIBERROR_INTERNAL, "NEWUNIT exhausted");
|
||||||
return 0;
|
return 0;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue