This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Revert "op.h: Restrict scope of multiconcat symbols to core"
authorKarl Williamson <khw@cpan.org>
Sun, 15 Nov 2020 19:54:51 +0000 (12:54 -0700)
committerKarl Williamson <khw@cpan.org>
Sun, 15 Nov 2020 19:58:23 +0000 (12:58 -0700)
This reverts commit a5d5855671af6956a8d1a13e419457afdffeb416.

It turns out that CPAN modules are using these values; whether
they should be using them or not, I don't know.

op.h

diff --git a/op.h b/op.h
index be19303..9750717 100644 (file)
--- a/op.h
+++ b/op.h
@@ -1072,8 +1072,6 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>.
 #endif
 
 
-#if defined(PERL_CORE) || defined(PERL_EXT)
-
 /* Stuff for OP_MULTDEREF/pp_multideref. */
 
 /* actions */
@@ -1113,8 +1111,6 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>.
 #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 "  \