From: Tobias Schlüter Date: Fri, 14 May 2004 14:07:13 +0000 (+0200) Subject: * match.c (gfc_match): Eliminate dead code. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=a2f0e34d9ecd47343f8cdcc78841de15a7e5b2c0;p=gcc.git * match.c (gfc_match): Eliminate dead code. From-SVN: r81846 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index a57c207abfe..bae4efda1b2 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2004-05-14 Tobias Schlueter + + * match.c (gfc_match): Eliminate dead code. + 2004-05-14 Tobias Schlueter * parse.c (gfc_statement_next_fixed): (Change from Andy's tree) diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c index fc5afbfcc5d..c13e0579585 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;