summaryrefslogtreecommitdiff
path: root/regen/mk_invlists.pl
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2020-02-24 09:31:02 -0700
committerKarl Williamson <khw@cpan.org>2020-03-02 11:45:21 -0700
commitb619f93d98570480c34b948b01fb808e098a5ed9 (patch)
treeb581ff0d92ac006addb3999b1bad3742ba56b345 /regen/mk_invlists.pl
parentf360f88464218e68de6e1d4d8741f069b335f90c (diff)
downloadperl-b619f93d98570480c34b948b01fb808e098a5ed9.tar.gz
regen/mk_invlists.pl: Allow enums/defines to be in re_comp.c
Tables, to save memory, that are for regcomp.c are excluded from re_comp.c, but enums use no resources, and a later commit will want them accessible from re_comp.c. So change the code so that they can be requested to be in re_comp.c
Diffstat (limited to 'regen/mk_invlists.pl')
-rw-r--r--regen/mk_invlists.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/regen/mk_invlists.pl b/regen/mk_invlists.pl
index ee7a51af6f..67df77dea7 100644
--- a/regen/mk_invlists.pl
+++ b/regen/mk_invlists.pl
@@ -238,8 +238,10 @@ sub switch_pound_if ($$;$) {
foreach my $element (@new_pound_if) {
# regcomp.c is arranged so that the tables are not compiled in
- # re_comp.c */
- my $no_xsub = 1 if $element =~ / PERL_IN_ (?: REGCOMP ) _C /x;
+ # re_comp.c, but general enums and defines (which take no space) are
+ # compiled */
+ my $no_xsub = 1 if $name !~ /enum|define/
+ && $element =~ / PERL_IN_ (?: REGCOMP ) _C /x;
$element = "defined($element)";
$element = "($element && ! defined(PERL_IN_XSUB_RE))" if $no_xsub;
}