diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2009-08-17 14:25:38 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2009-08-17 14:25:38 +0000 |
| commit | b823d9ebdfd013fe2cbd7e1d83880f71a8d6b5dd (patch) | |
| tree | cf898a012aacca2005e5d25a8bf6142926e0e0d4 /gcc/fortran/scanner.c | |
| parent | dee285096f2ac88d3f6ed6260cd5801173b9a4ae (diff) | |
| download | gcc-b823d9ebdfd013fe2cbd7e1d83880f71a8d6b5dd.zip gcc-b823d9ebdfd013fe2cbd7e1d83880f71a8d6b5dd.tar.gz gcc-b823d9ebdfd013fe2cbd7e1d83880f71a8d6b5dd.tar.bz2 | |
re PR fortran/41075 ([F2008] Implement unlimited format item)
2009-08-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/41075
* scanner.c (gfc_next_char_literal): Add comment to improve
readability.
* io.c (enum format_token): Add FMT_STAR. (format_lex): Add case
for '*'. (check_format): Check for left paren after '*'. Change
format checks to use %L to improve format string error locus.
From-SVN: r150843
Diffstat (limited to 'gcc/fortran/scanner.c')
| -rw-r--r-- | gcc/fortran/scanner.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c index 5842290..8cbb3c5 100644 --- a/gcc/fortran/scanner.c +++ b/gcc/fortran/scanner.c @@ -1139,7 +1139,7 @@ restart: } } } - else + else /* Fixed form. */ { /* Fixed form continuation. */ if (!in_string && c == '!') |