diff options
-rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/fortran/match.c | 9 |
2 files changed, 4 insertions, 9 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index a57c207..bae4efd 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,9 @@ 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> + * match.c (gfc_match): Eliminate dead code. + +2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> + * parse.c (gfc_statement_next_fixed): (Change from Andy's tree) Detect bad continuation line in fixed form sources. diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c index fc5afbf..c13e057 100644 --- a/gcc/fortran/match.c +++ b/gcc/fortran/match.c @@ -764,13 +764,6 @@ not_yes: matches++; break; /* Skip */ - case 'I': - case 'L': - case 'C': - if (*p++ == 'e') - goto undo_expr; - break; - /* Matches that don't have to be undone */ case 'o': case 'l': @@ -780,9 +773,7 @@ not_yes: break; case 'e': - case 'E': case 'v': - undo_expr: vp = va_arg (argp, void **); gfc_free_expr (*vp); *vp = NULL; |