diff options
Diffstat (limited to 'regen')
-rwxr-xr-x | regen/feature.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/regen/feature.pl b/regen/feature.pl index d862b7cc3b..cea90fb393 100755 --- a/regen/feature.pl +++ b/regen/feature.pl @@ -300,6 +300,10 @@ for (reverse @HintedBundles[1..$#HintedBundles]) { # skip default print $h <<EOJ; FEATURE_BUNDLE_DEFAULT ) << HINT_FEATURE_SHIFT; + /* special case */ + assert(PL_curcop == &PL_compiling); + if (FEATURE_UNICODE_IS_ENABLED) PL_hints |= HINT_UNI_8_BIT; + else PL_hints &= ~HINT_UNI_8_BIT; } #endif /* PERL_IN_OP_C */ EOJ |