2006-11-08 Steven G. Kargl <kargl@gcc.gnu.org>

* io/read. (max_value): Hide "int n" in an #ifdef.

From-SVN: r118613
This commit is contained in:
Steven G. Kargl 2006-11-09 03:57:44 +00:00
parent 54938c1127
commit 474e88dd75
2 changed files with 6 additions and 0 deletions

View File

@ -1,3 +1,7 @@
2006-11-08 Steven G. Kargl <kargl@gcc.gnu.org>
* io/read. (max_value): Hide "int n" in an #ifdef.
2006-11-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/29752

View File

@ -92,7 +92,9 @@ GFC_UINTEGER_LARGEST
max_value (int length, int signed_flag)
{
GFC_UINTEGER_LARGEST value;
#if defined HAVE_GFC_REAL_16 || defined HAVE_GFC_REAL_10
int n;
#endif
switch (length)
{