Eliminate use of Nullop in the core code. Dual life uses remain.

p4raw-id: //depot/perl@33269

1 files changed, 3 insertions, 1 deletions

diff --git a/op.h b/op.h
index fd0ec3432b..5c189008b8 100644
--- a/op.h
+++ b/op.h
@@ -517,7 +517,9 @@ struct loop {
 #define cSVOPo_sv		cSVOPx_sv(o)
 #define kSVOP_sv		cSVOPx_sv(kid)
 
-#define Nullop ((OP*)NULL)
+#ifndef PERL_CORE
+#  define Nullop ((OP*)NULL)
+#endif
 
 /* Lowest byte-and-a-bit of PL_opargs */
 #define OA_MARK 1