diff options
| author | Paul Brook <paul@codesourcery.com> | 2004-08-31 14:56:09 +0000 |
|---|---|---|
| committer | Paul Brook <paul@codesourcery.com> | 2004-08-31 14:56:09 +0000 |
| commit | d6303cfb42cc811ab9af3e1e150474076f26d5aa (patch) | |
| tree | c1642cc23568ef73452f24fc424e0b5dddae9522 /libgfortran/io/list_read.c | |
| parent | 6945cea6ce07ed96a6ce06fd645cea4010615a57 (diff) | |
* list_read.c (eat_separator): Set at_eo when a '/' is seen.
testsuite/
* gfortran.dg/list_read_1.f90: New file.
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@86830 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io/list_read.c')
| -rw-r--r-- | libgfortran/io/list_read.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/io/list_read.c b/libgfortran/io/list_read.c index 95b5b883491..8b00a5e296e 100644 --- a/libgfortran/io/list_read.c +++ b/libgfortran/io/list_read.c @@ -210,6 +210,7 @@ eat_separator (void) case '/': input_complete = 1; next_record (0); + at_eol = 1; break; case '\n': |