remove spurious newSTATEOP() that causes goto to enter one too many

[p5sagit/p5-mst-13.2.git] / perly.c

diff --git a/perly.c b/perly.c
index b92de4e..0feca48 100644 (file)
--- a/perly.c
+++ b/perly.c
@@ -1623,8 +1623,7 @@ break;
 case 23:
 #line 179 "perly.y"
 { PL_copline = yyvsp[-5].ival;
-                           yyval.opval = newSTATEOP(0, Nullch,
-                                  newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval));
+                           yyval.opval = newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval);
                            PL_hints |= HINT_BLOCK_SCOPE; }
 break;
 case 24: