diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-02-11 10:49:06 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-02-11 14:01:29 -0700 |
| commit | dab0c3e7e357a28081ca24560f20e83c1d47ce1f (patch) | |
| tree | d9908bba3f41f503a3d7c9bd3bfb5b4c3ab15fd4 /charclass_invlists.h | |
| parent | 24ad4a07e88519ae8e63d0b67d519e62a935b577 (diff) | |
| download | perl-dab0c3e7e357a28081ca24560f20e83c1d47ce1f.tar.gz | |
regcomp.c: /[[:lower:]]/i should match the same as /\p{Lower}/i
Same for [[:upper:]] and \p{Upper}. These were matching instead all of
[[:alpha:]] or \p{Alpha}. What /\p{Lower}/i and /\p{Upper}/i match instead
is \p{Cased}, and so that is what these should match.
Diffstat (limited to 'charclass_invlists.h')
| -rw-r--r-- | charclass_invlists.h | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/charclass_invlists.h b/charclass_invlists.h index 5d78219daa..152793a2e6 100644 --- a/charclass_invlists.h +++ b/charclass_invlists.h @@ -36,6 +36,30 @@ UV ASCII_invlist[] = { 0 }; +UV L1Cased_invlist[] = { + 16, /* Number of elements */ + 0, /* Current iteration position */ + 1064334010, /* Version and data structure type */ + 1, /* 0 if this is the first element of the list proper; + 1 if the next element is the first */ + 65, + 91, + 97, + 123, + 170, + 171, + 181, + 182, + 186, + 187, + 192, + 215, + 216, + 247, + 248, + 443 +}; + UV VertSpace_invlist[] = { 6, /* Number of elements */ 0, /* Current iteration position */ |