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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@131371 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 6659ab5..8b56942 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -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

diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c
index 8e4a75c..da4c37b 100644 (file)
--- 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?  */