diff options
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/io.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index eb85853..bfc1078 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2005-12-16 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR fortran/24268 + * io.c (format_lex): Allow whitespace within text of format specifier. + 2005-12-16 Steven G. Kargl <kargls@comcast.net> PR fortran/25106 diff --git a/gcc/fortran/io.c b/gcc/fortran/io.c index 6d3d94b..23c1cb2 100644 --- a/gcc/fortran/io.c +++ b/gcc/fortran/io.c @@ -233,7 +233,7 @@ format_lex (void) if (ISDIGIT (c)) value = 10 * value + c - '0'; } - while (ISDIGIT (c)); + while (ISDIGIT (c) || gfc_is_whitespace(c)); unget_char (); token = zflag ? FMT_ZERO : FMT_POSINT; |