[libfortran, committed] increase size of value[]

Thomas Koenig Thomas.Koenig@online.de
Mon Sep 5 21:18:00 GMT 2005


Committed as obvious after regression-testing on mainline and 4.0.
The size of the buffer in question was too small for complex(kind=16),
which is the largest buffer needed by libgfortran.

	Thomas

2005-09-05  Thomas Koenig  <Thomas.Koenig@online.de>

	* io/list_read.c:  Adjust size of of value to 32 (to hold
	kind=16 complex values).

-------------- next part --------------
Index: list_read.c
===================================================================
RCS file: /cvs/gcc/gcc/libgfortran/io/list_read.c,v
retrieving revision 1.26
diff -c -p -r1.26 list_read.c
*** list_read.c	17 Aug 2005 02:48:56 -0000	1.26
--- list_read.c	5 Sep 2005 20:16:18 -0000
*************** static int nml_read_error;
*** 71,77 ****
  /* Storage area for values except for strings.  Must be large enough
     to hold a complex value (two reals) of the largest kind.  */
  
! static char value[20];
  
  #define CASE_DIGITS   case '0': case '1': case '2': case '3': case '4': \
                        case '5': case '6': case '7': case '8': case '9'
--- 71,77 ----
  /* Storage area for values except for strings.  Must be large enough
     to hold a complex value (two reals) of the largest kind.  */
  
! static char value[32];
  
  #define CASE_DIGITS   case '0': case '1': case '2': case '3': case '4': \
                        case '5': case '6': case '7': case '8': case '9'


More information about the Gcc-patches mailing list