X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/dab0c3e7e357a28081ca24560f20e83c1d47ce1f..876c7b976c1bec1c9a239b8972506f32b311f350:/charclass_invlists.h diff --git a/charclass_invlists.h b/charclass_invlists.h index 152793a..f3de65a 100644 --- a/charclass_invlists.h +++ b/charclass_invlists.h @@ -7,41 +7,53 @@ /* See the generating file for comments */ -UV Latin1_invlist[] = { +#ifndef PERL_IN_XSUB_RE + +static const UV Latin1_invlist[] = { + 2, /* Number of elements */ + 148565664, /* Version and data structure type */ + 0, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, + 256 +}; + +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV AboveLatin1_invlist[] = { 2, /* Number of elements */ - 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ - 0, /* 0 if this is the first element of the list proper; - 1 if the next element is the first */ - 256, - 0 -}; - -UV AboveLatin1_invlist[] = { - 1, /* 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 */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 256 }; -UV ASCII_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV ASCII_invlist[] = { 2, /* Number of elements */ - 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ - 0, /* 0 if this is the first element of the list proper; - 1 if the next element is the first */ - 128, - 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 */ + 148565664, /* Version and data structure type */ + 0, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, + 128 +}; + +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1Cased_invlist[] = { + 17, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 65, 91, 97, @@ -60,12 +72,16 @@ UV L1Cased_invlist[] = { 443 }; -UV VertSpace_invlist[] = { - 6, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV VertSpace_invlist[] = { + 7, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 10, 14, 133, @@ -74,29 +90,33 @@ UV VertSpace_invlist[] = { 8234 }; -UV PerlSpace_invlist[] = { - 6, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PerlSpace_invlist[] = { + 5, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 9, - 11, - 12, 14, 32, 33 }; -UV XPerlSpace_invlist[] = { - 24, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV XPerlSpace_invlist[] = { + 23, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 9, - 11, - 12, 14, 32, 33, @@ -120,12 +140,16 @@ UV XPerlSpace_invlist[] = { 12289 }; -UV PosixAlnum_invlist[] = { - 6, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixAlnum_invlist[] = { + 7, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58, 65, @@ -134,12 +158,16 @@ UV PosixAlnum_invlist[] = { 123 }; -UV L1PosixAlnum_invlist[] = { - 18, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixAlnum_invlist[] = { + 19, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58, 65, @@ -160,24 +188,32 @@ UV L1PosixAlnum_invlist[] = { 706 }; -UV PosixAlpha_invlist[] = { - 4, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixAlpha_invlist[] = { + 5, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 65, 91, 97, 123 }; -UV L1PosixAlpha_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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixAlpha_invlist[] = { + 17, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 65, 91, 97, @@ -196,24 +232,32 @@ UV L1PosixAlpha_invlist[] = { 706 }; -UV PosixBlank_invlist[] = { - 4, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixBlank_invlist[] = { + 5, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 9, 10, 32, 33 }; -UV XPosixBlank_invlist[] = { - 18, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV XPosixBlank_invlist[] = { + 19, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 9, 10, 32, @@ -234,78 +278,104 @@ UV XPosixBlank_invlist[] = { 12289 }; -UV PosixCntrl_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixCntrl_invlist[] = { 4, /* Number of elements */ - 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ - 0, /* 0 if this is the first element of the list proper; - 1 if the next element is the first */ + 148565664, /* Version and data structure type */ + 0, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 32, 127, - 128, - 0 + 128 }; -UV XPosixCntrl_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV XPosixCntrl_invlist[] = { 4, /* Number of elements */ - 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ - 0, /* 0 if this is the first element of the list proper; - 1 if the next element is the first */ + 148565664, /* Version and data structure type */ + 0, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 32, 127, - 160, - 0 + 160 }; -UV PosixDigit_invlist[] = { - 2, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixDigit_invlist[] = { + 3, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58 }; -UV PosixGraph_invlist[] = { - 2, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixGraph_invlist[] = { + 3, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 33, 127 }; -UV L1PosixGraph_invlist[] = { - 4, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixGraph_invlist[] = { + 5, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 33, 127, 161, 888 }; -UV PosixLower_invlist[] = { - 2, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixLower_invlist[] = { + 3, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 97, 123 }; -UV L1PosixLower_invlist[] = { - 12, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixLower_invlist[] = { + 13, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 97, 123, 170, @@ -320,34 +390,46 @@ UV L1PosixLower_invlist[] = { 256 }; -UV PosixPrint_invlist[] = { - 2, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixPrint_invlist[] = { + 3, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 32, 127 }; -UV L1PosixPrint_invlist[] = { - 4, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixPrint_invlist[] = { + 5, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 32, 127, 160, 888 }; -UV PosixPunct_invlist[] = { - 8, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixPunct_invlist[] = { + 9, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 33, 48, 58, @@ -358,12 +440,16 @@ UV PosixPunct_invlist[] = { 127 }; -UV L1PosixPunct_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixPunct_invlist[] = { 21, /* 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 */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 33, 48, 58, @@ -383,28 +469,35 @@ UV L1PosixPunct_invlist[] = { 187, 188, 191, - 192, - 894 + 192 }; -UV PosixSpace_invlist[] = { - 4, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixSpace_invlist[] = { + 5, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 9, 14, 32, 33 }; -UV XPosixSpace_invlist[] = { - 22, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV XPosixSpace_invlist[] = { + 23, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 9, 14, 32, @@ -429,37 +522,48 @@ UV XPosixSpace_invlist[] = { 12289 }; -UV PosixUpper_invlist[] = { - 2, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixUpper_invlist[] = { + 3, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 65, 91 }; -UV L1PosixUpper_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixUpper_invlist[] = { 7, /* 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 */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 65, 91, 192, 215, 216, - 223, - 256 + 223 }; -UV PosixWord_invlist[] = { - 8, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixWord_invlist[] = { + 9, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58, 65, @@ -470,12 +574,16 @@ UV PosixWord_invlist[] = { 123 }; -UV L1PosixWord_invlist[] = { - 20, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV L1PosixWord_invlist[] = { + 21, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58, 65, @@ -498,12 +606,16 @@ UV L1PosixWord_invlist[] = { 706 }; -UV PosixXDigit_invlist[] = { - 6, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV PosixXDigit_invlist[] = { + 7, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58, 65, @@ -512,12 +624,16 @@ UV PosixXDigit_invlist[] = { 103 }; -UV XPosixXDigit_invlist[] = { - 12, /* 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 */ +#endif + +#ifndef PERL_IN_XSUB_RE + +static const UV XPosixXDigit_invlist[] = { + 13, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, 48, 58, 65, @@ -532,4 +648,128 @@ UV XPosixXDigit_invlist[] = { 65351 }; +#endif + +static const UV NonL1_Perl_Non_Final_Folds_invlist[] = { + 45, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, + 700, + 701, + 776, + 777, + 787, + 788, + 834, + 835, + 940, + 941, + 942, + 943, + 945, + 946, + 951, + 952, + 953, + 954, + 961, + 962, + 965, + 966, + 969, + 970, + 974, + 975, + 1381, + 1382, + 1396, + 1397, + 1406, + 1407, + 7936, + 7944, + 7968, + 7976, + 8032, + 8040, + 8048, + 8049, + 8052, + 8053, + 8060, + 8061 +}; + +#ifndef PERL_IN_XSUB_RE + +static const UV _Perl_Multi_Char_Folds_invlist[] = { + 59, /* Number of elements */ + 148565664, /* Version and data structure type */ + 1, /* 0 if the list starts at 0; + 1 if it starts at the element beyond 0 */ + 0, + 223, + 224, + 304, + 305, + 329, + 330, + 496, + 497, + 912, + 913, + 944, + 945, + 1415, + 1416, + 7830, + 7835, + 7838, + 7839, + 8016, + 8017, + 8018, + 8019, + 8020, + 8021, + 8022, + 8023, + 8064, + 8112, + 8114, + 8117, + 8118, + 8120, + 8124, + 8125, + 8130, + 8133, + 8134, + 8136, + 8140, + 8141, + 8146, + 8148, + 8150, + 8152, + 8162, + 8165, + 8166, + 8168, + 8178, + 8181, + 8182, + 8184, + 8188, + 8189, + 64256, + 64263, + 64275, + 64280 +}; + +#endif + /* ex: set ro: */