[perl #128621] #define PL_encoding

to a NULL SV for non-core code, so that code that checks
if(PL_encoding) will continue to compile and work.

1 files changed, 1 insertions, 0 deletions

diff --git a/perl.h b/perl.h
index 1f19140d3e..2702cc15c9 100644
--- a/perl.h
+++ b/perl.h
@@ -5285,6 +5285,7 @@ EXTCONST char *const PL_phase_names[];
 #  define PL_dirty cBOOL(PL_phase == PERL_PHASE_DESTRUCT)
 
 #  define PL_amagic_generation PL_na
+#  define PL_encoding ((SV *)NULL)
 #endif /* !PERL_CORE */
 
 #define PL_hints PL_compiling.cop_hints