1 files changed, 1 insertions, 1 deletions
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;