diff options
Diffstat (limited to 'gcc/fortran/io.c')
| -rw-r--r-- | gcc/fortran/io.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/fortran/io.c b/gcc/fortran/io.c index 82a0a87..0ac4f4a 100644 --- a/gcc/fortran/io.c +++ b/gcc/fortran/io.c @@ -2382,9 +2382,7 @@ match_filepos (gfc_statement st, gfc_exec_op op) if (m == MATCH_NO) { m = gfc_match_expr (&fp->unit); - if (m == MATCH_ERROR) - goto done; - if (m == MATCH_NO) + if (m == MATCH_ERROR || m == MATCH_NO) goto syntax; } |