diff options
| author | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-05-16 17:44:15 +0000 |
|---|---|---|
| committer | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-05-16 17:44:15 +0000 |
| commit | 36411e2fd18433151820a2f451dea75ca70ceedb (patch) | |
| tree | 089860d1f3693f3bf8a29396280847bd59157cb2 /gcc/fortran/io.c | |
| parent | 67705c85f3e50e75a0c3e014f7fd37567a9fa618 (diff) | |
| download | gcc-36411e2fd18433151820a2f451dea75ca70ceedb.tar.gz | |
2015-05-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/65903
* io.c (format_lex): Change to NONSTRING when checking for
possible doubled quote.
* scanner.c (gfc_next_char_literal): Revert change from 64506
and add a check for quotes and return.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@223248 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/io.c')
| -rw-r--r-- | gcc/fortran/io.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/io.c b/gcc/fortran/io.c index 7ba6b092e98..82a0a871fd3 100644 --- a/gcc/fortran/io.c +++ b/gcc/fortran/io.c @@ -385,7 +385,7 @@ format_lex (void) if (c == delim) { - c = next_char (INSTRING_NOWARN); + c = next_char (NONSTRING); if (c == '\0') { |