op.h: Restrict scope of multiconcat symbols to core

These are internal only

diff --git a/op.h b/op.h
index 9750717..be19303 100644 (file)
--- a/op.h
+++ b/op.h
@@ -1072,6 +1072,8 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>.
 #endif
 
 
 #endif
 
 

+#if defined(PERL_CORE) || defined(PERL_EXT)
+

 /* Stuff for OP_MULTDEREF/pp_multideref. */
 
 /* actions */
 /* Stuff for OP_MULTDEREF/pp_multideref. */
 
 /* actions */


@@ -1111,6 +1113,8 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>.
 #define MDEREF_MASK         0x7F
 #define MDEREF_SHIFT           7
 
 #define MDEREF_MASK         0x7F
 #define MDEREF_SHIFT           7
 

+#endif  /* end CORE/EXT only */
+

 #if defined(PERL_IN_DOOP_C) || defined(PERL_IN_PP_C)
 #   define FATAL_ABOVE_FF_MSG                                       \
       "Use of strings with code points over 0xFF as arguments to "  \
 #if defined(PERL_IN_DOOP_C) || defined(PERL_IN_PP_C)
 #   define FATAL_ABOVE_FF_MSG                                       \
       "Use of strings with code points over 0xFF as arguments to "  \