From ff7fc5bb29de5df90a384cc2c4aa03447cbc9510 Mon Sep 17 00:00:00 2001
From: Father Chrysostomos <sprout@cpan.org>
Date: Tue, 27 Aug 2013 20:38:03 -0700
Subject: [PATCH] op.c:newSTATEOP: remove unnecessary null check

If PL_parser is null, then the else block will crash on
PL_parser->copline.
---
 op.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/op.c b/op.c
index 3b30d3d..a641647 100644
--- a/op.c
+++ b/op.c
@@ -5706,7 +5706,7 @@ Perl_newSTATEOP(pTHX_ I32 flags, char *label, OP *o)
 	SAVEFREEPV(label);
     }
 
-    if (PL_parser && PL_parser->copline == NOLINE)
+    if (PL_parser->copline == NOLINE)
         CopLINE_set(cop, CopLINE(PL_curcop));
     else {
 	CopLINE_set(cop, PL_parser->copline);
-- 
2.7.4