mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-20 17:40:46 +08:00
Code Issues Packages Projects Releases Wiki Activity

* match.c (gfc_match): Eliminate dead code.

Browse Source 
From-SVN: r81846
This commit is contained in:
Tobias Schlüter 2004-05-14 16:07:13 +02:00 committed by Tobias Schlüter
parent 5b5afddf1d
commit a2f0e34d9e
2 changed files with 4 additions and 9 deletions
gcc/fortran
ChangeLogmatch.c

4
gcc/fortran/ChangeLog

@ -1,3 +1,7 @@
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)

9
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;