remove dead listexprcom production from grammar

The third production of <listexprcom>, "expr ','", could never be invoked,
because <expr> can already end with arbitrarily many commas.

1 files changed, 0 insertions, 11 deletions

diff --git a/perly.y b/perly.y
index edbcb19b36..ebcf5e7878 100644
--- a/perly.y
+++ b/perly.y
@@ -1331,17 +1331,6 @@ listexprcom:	/* NULL */
 			{ $$ = (OP*)NULL; }
 	|	expr
 			{ $$ = $1; }
-	|	expr ','
-			{
-#ifdef MAD
-			  OP* op = newNULLLIST();
-			  token_getmad($2,op,',');
-			  $$ = append_elem(OP_LIST, $1, op);
-#else
-			  $$ = $1;
-#endif
-
-			}
 	;
 
 /* A little bit of trickery to make "for my $foo (@bar)" actually be