re PR fortran/34659 (corner case continuation line)

2008-01-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR fortran/34659
	* scanner.c (load_line): Do not count ' ' as printable when checking for
	continuations.

From-SVN: r131371
This commit is contained in:
Jerry DeLisle 2008-01-07 02:53:04 +00:00
parent d6b66affc4
commit bd5db9de0d
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,9 @@
2008-01-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/34659
* scanner.c (load_line): Do not count ' ' as printable when checking for
continuations.
2008-01-06 Paul Thomas <pault@gcc.gnu.org>
PR fortran/34545

View file

@ -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? */