diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index f5b6a2731c0..15706c1934b 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,9 @@ +2008-06-16 Jerry DeLisle + + PR fortran/36546 + * io/list_read.c (eat_separator): Add tab character to condition + for looping past whitespace. + 2008-06-14 Jerry DeLisle PR fortran/36515 diff --git a/libgfortran/io/list_read.c b/libgfortran/io/list_read.c index 01e118f5f48..ffa23693a86 100644 --- a/libgfortran/io/list_read.c +++ b/libgfortran/io/list_read.c @@ -366,7 +366,7 @@ eat_separator (st_parameter_dt *dtp) } } } - while (c == '\n' || c == '\r' || c == ' '); + while (c == '\n' || c == '\r' || c == ' ' || c == '\t'); unget_char (dtp, c); } break;