diff options
author | Karl Williamson <khw@cpan.org> | 2020-02-24 09:31:02 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-03-02 11:45:21 -0700 |
commit | b619f93d98570480c34b948b01fb808e098a5ed9 (patch) | |
tree | b581ff0d92ac006addb3999b1bad3742ba56b345 /regen/mk_invlists.pl | |
parent | f360f88464218e68de6e1d4d8741f069b335f90c (diff) | |
download | perl-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.pl | 6 |
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; } |