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

From-SVN: r81846

gcc/fortran/ChangeLog

 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.
 

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;