In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/da62e549ffa1848a7e6a1594fc77d89e722b9bf0?hp=65dd9533e90d8e1ea84c091ff43133132c667a1c>
- Log ----------------------------------------------------------------- commit da62e549ffa1848a7e6a1594fc77d89e722b9bf0 Author: Karl Williamson <[email protected]> Date: Mon Jul 21 09:43:04 2014 -0600 sv.h: Document SVt_INVLIST fields M sv.h commit 13eda8264d04d22cbdba7702b7454d8640d811a4 Author: Karl Williamson <[email protected]> Date: Tue Jul 8 10:29:13 2014 -0600 utf8_heavy.pl: Fix nit in comment M lib/utf8_heavy.pl ----------------------------------------------------------------------- Summary of changes: lib/utf8_heavy.pl | 2 +- sv.h | 11 ++++++++--- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/lib/utf8_heavy.pl b/lib/utf8_heavy.pl index cfdf884..3cd8e83 100644 --- a/lib/utf8_heavy.pl +++ b/lib/utf8_heavy.pl @@ -95,9 +95,9 @@ sub _loose_name ($) { # keys TYPE, BITS, EXTRAS, LIST, and NONE with values having the # same meanings as the input parameters. # SPECIALS contains a reference to any special-treatment hash in the + # property. # INVERT_IT is non-zero if the result should be inverted before use # USER_DEFINED is non-zero if the result came from a user-defined - # property. my $file; ## file to load data from, and also part of the %Cache key. # Change this to get a different set of Unicode tables diff --git a/sv.h b/sv.h index 68e5db1..753b5bb 100644 --- a/sv.h +++ b/sv.h @@ -545,9 +545,14 @@ struct xpvlv { struct xpvinvlist { _XPV_HEAD; - IV prev_index; - STRLEN iterator; - bool is_offset; /* */ + IV prev_index; /* caches result of previous invlist_search() */ + STRLEN iterator; /* Stores where we are in iterating */ + bool is_offset; /* The data structure for all inversion lists + begins with an element for code point U+0000. + If this bool is set, the actual list contains + that 0; otherwise, the list actually begins + with the following element. Thus to invert + the list, merely toggle this flag */ }; /* This structure works in 3 ways - regular scalar, GV with GP, or fast -- Perl5 Master Repository
