OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

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

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/fortran/ChangeLog
View File

@ -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
View File

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