diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 6659ab50f70..8b5694216b2 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2008-01-06 Jerry DeLisle + + PR fortran/34659 + * scanner.c (load_line): Do not count ' ' as printable when checking for + continuations. + 2008-01-06 Paul Thomas PR fortran/34545 diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c index 8e4a75cd647..da4c37b155e 100644 --- a/gcc/fortran/scanner.c +++ b/gcc/fortran/scanner.c @@ -1176,7 +1176,7 @@ load_line (FILE *input, char **pbuf, int *pbuflen) seen_ampersand = 1; } - if ((c != '&' && c != '!') || (c == '!' && !seen_ampersand)) + if ((c != '&' && c != '!' && c != ' ') || (c == '!' && !seen_ampersand)) seen_printable = 1; /* Is this a fixed-form comment? */