diff options
author | Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de> | 2004-05-14 16:07:13 +0200 |
---|---|---|
committer | Tobias Schlüter <tobi@gcc.gnu.org> | 2004-05-14 16:07:13 +0200 |
commit | a2f0e34d9ecd47343f8cdcc78841de15a7e5b2c0 (patch) | |
tree | 359ea3f5d2e22c338fdc14e91fb2e6097e399747 /gcc/fortran | |
parent | 5b5afddf1d3af9d2512fb23f420c29baa7fa1fba (diff) | |
download | gcc-a2f0e34d9ecd47343f8cdcc78841de15a7e5b2c0.zip gcc-a2f0e34d9ecd47343f8cdcc78841de15a7e5b2c0.tar.gz gcc-a2f0e34d9ecd47343f8cdcc78841de15a7e5b2c0.tar.bz2 |
* match.c (gfc_match): Eliminate dead code.
From-SVN: r81846
Diffstat (limited to 'gcc/fortran')
-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; |