diff options
Diffstat (limited to 'gcc/fortran/match.c')
| -rw-r--r-- | gcc/fortran/match.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c index f63eaf6..7f249ee 100644 --- a/gcc/fortran/match.c +++ b/gcc/fortran/match.c @@ -2650,6 +2650,8 @@ gfc_match_st_function (void) m = gfc_match (" = %e%t", &expr); if (m == MATCH_NO) goto undo_error; + + gfc_free_error (&old_error); if (m == MATCH_ERROR) return m; |