diff options
| author | Thomas Koenig <Thomas.Koenig@online.de> | 2005-09-05 21:13:39 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2005-09-05 21:13:39 +0000 |
| commit | a9390eaf2709f4e1eef1b09852d428c52085ba5f (patch) | |
| tree | 2f8c90c47c1e7ad6b3c297a59c84996e374ea9af | |
| parent | bf877a7649b686fd19a4384c137357a0ca697931 (diff) | |
| download | gcc-a9390eaf2709f4e1eef1b09852d428c52085ba5f.zip gcc-a9390eaf2709f4e1eef1b09852d428c52085ba5f.tar.gz gcc-a9390eaf2709f4e1eef1b09852d428c52085ba5f.tar.bz2 | |
list_read.c: Adjust size of of value to 32 (to hold kind=16 complex values).
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).
From-SVN: r103918
| -rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
| -rw-r--r-- | libgfortran/io/list_read.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 2023979..8cc1a03 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +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). + 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23321 diff --git a/libgfortran/io/list_read.c b/libgfortran/io/list_read.c index 661ad33..9d51f02 100644 --- a/libgfortran/io/list_read.c +++ b/libgfortran/io/list_read.c @@ -71,7 +71,7 @@ static int nml_read_error; /* 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]; +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' |