diff options
| author | Karl Williamson <public@khwilliamson.com> | 2013-02-11 23:08:00 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2013-07-03 19:21:18 -0600 |
| commit | 4fdeca7844470c929f35857f49078db1fd124dbc (patch) | |
| tree | ad20871503cdba744b48c7ade60e60c3ac0939c0 /regen | |
| parent | 4b98096221966ea01c046f4f61b2dc4f60b534b9 (diff) | |
| download | perl-4fdeca7844470c929f35857f49078db1fd124dbc.tar.gz | |
regcomp.c: Move 2 hdr inversion fields to SV hdr
This commit continues the process of separating the header area of
inversion lists from the body. 2 more fields are moved out of the
header portion of the inversion list, and into the header portion of the
SV that contains it.
Diffstat (limited to 'regen')
| -rw-r--r-- | regen/mk_invlists.pl | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/regen/mk_invlists.pl b/regen/mk_invlists.pl index 27c080233c..f1e1bd9843 100644 --- a/regen/mk_invlists.pl +++ b/regen/mk_invlists.pl @@ -15,7 +15,7 @@ require 'regen/regen_lib.pl'; # in the headers is used to minimize the possibility of things getting # out-of-sync, or the wrong data structure being passed. Currently that # random number is: -my $VERSION_DATA_STRUCTURE_TYPE = 1039476070; +my $VERSION_DATA_STRUCTURE_TYPE = 1511554547; my $out_fh = open_new('charclass_invlists.h', '>', {style => '*', by => $0, @@ -48,12 +48,6 @@ sub output_invlist ($$) { print $out_fh "\nstatic UV ${name}_invlist[] = {\n"; print $out_fh "\t$count,\t/* Number of elements */\n"; - - # This should be UV_MAX, but I (khw) am not confident that the suffixes - # for specifying the constant are portable, e.g. 'ull' on a 32 bit - # machine that is configured to use 64 bits; might need a Configure probe - print $out_fh "\t0,\t/* Current iteration position */\n"; - print $out_fh "\t0,\t/* Cache of previous search index result */\n"; print $out_fh "\t$VERSION_DATA_STRUCTURE_TYPE, /* Version and data structure type */\n"; print $out_fh "\t", $zero_or_one, ",\t/* 0 if the list starts at 0;", |