X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/b72a36d4f2738e8e15eb2e22819c8ffee7421c93..65c1346e0fdace4caa4b1a6196704243a31ac8c3:/charclass_invlists.h?ds=sidebyside diff --git a/charclass_invlists.h b/charclass_invlists.h index 03f2e02..b5d71af 100644 --- a/charclass_invlists.h +++ b/charclass_invlists.h @@ -7,39 +7,57 @@ /* See the generating file for comments */ -UV Latin1_invlist[] = { +#ifndef PERL_IN_XSUB_RE + +static UV Latin1_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV AboveLatin1_invlist[] = { 1, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 256 }; -UV ASCII_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV ASCII_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1Cased_invlist[] = { 16, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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, @@ -60,10 +78,15 @@ UV L1Cased_invlist[] = { 443 }; -UV VertSpace_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV VertSpace_invlist[] = { 6, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 10, @@ -74,10 +97,15 @@ UV VertSpace_invlist[] = { 8234 }; -UV PerlSpace_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PerlSpace_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 9, @@ -86,10 +114,15 @@ UV PerlSpace_invlist[] = { 33 }; -UV XPerlSpace_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV XPerlSpace_invlist[] = { 22, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 9, @@ -116,10 +149,15 @@ UV XPerlSpace_invlist[] = { 12289 }; -UV PosixAlnum_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixAlnum_invlist[] = { 6, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, @@ -130,10 +168,15 @@ UV PosixAlnum_invlist[] = { 123 }; -UV L1PosixAlnum_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixAlnum_invlist[] = { 18, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, @@ -156,10 +199,15 @@ UV L1PosixAlnum_invlist[] = { 706 }; -UV PosixAlpha_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixAlpha_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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, @@ -168,10 +216,15 @@ UV PosixAlpha_invlist[] = { 123 }; -UV L1PosixAlpha_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixAlpha_invlist[] = { 16, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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, @@ -192,10 +245,15 @@ UV L1PosixAlpha_invlist[] = { 706 }; -UV PosixBlank_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixBlank_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 9, @@ -204,10 +262,15 @@ UV PosixBlank_invlist[] = { 33 }; -UV XPosixBlank_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV XPosixBlank_invlist[] = { 18, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 9, @@ -230,10 +293,15 @@ UV XPosixBlank_invlist[] = { 12289 }; -UV PosixCntrl_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixCntrl_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 32, @@ -242,10 +310,15 @@ UV PosixCntrl_invlist[] = { 0 }; -UV XPosixCntrl_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV XPosixCntrl_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 32, @@ -254,30 +327,45 @@ UV XPosixCntrl_invlist[] = { 0 }; -UV PosixDigit_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixDigit_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, 58 }; -UV PosixGraph_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixGraph_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 33, 127 }; -UV L1PosixGraph_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixGraph_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 33, @@ -286,20 +374,30 @@ UV L1PosixGraph_invlist[] = { 888 }; -UV PosixLower_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixLower_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 97, 123 }; -UV L1PosixLower_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixLower_invlist[] = { 12, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 97, @@ -316,20 +414,30 @@ UV L1PosixLower_invlist[] = { 256 }; -UV PosixPrint_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixPrint_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 32, 127 }; -UV L1PosixPrint_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixPrint_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 32, @@ -338,10 +446,15 @@ UV L1PosixPrint_invlist[] = { 888 }; -UV PosixPunct_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixPunct_invlist[] = { 8, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 33, @@ -354,10 +467,15 @@ UV PosixPunct_invlist[] = { 127 }; -UV L1PosixPunct_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixPunct_invlist[] = { 20, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 33, @@ -382,10 +500,15 @@ UV L1PosixPunct_invlist[] = { 192 }; -UV PosixSpace_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixSpace_invlist[] = { 4, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 9, @@ -394,10 +517,15 @@ UV PosixSpace_invlist[] = { 33 }; -UV XPosixSpace_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV XPosixSpace_invlist[] = { 22, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 9, @@ -424,20 +552,30 @@ UV XPosixSpace_invlist[] = { 12289 }; -UV PosixUpper_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixUpper_invlist[] = { 2, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 }; -UV L1PosixUpper_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixUpper_invlist[] = { 6, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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, @@ -448,10 +586,15 @@ UV L1PosixUpper_invlist[] = { 223 }; -UV PosixWord_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixWord_invlist[] = { 8, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, @@ -464,10 +607,15 @@ UV PosixWord_invlist[] = { 123 }; -UV L1PosixWord_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV L1PosixWord_invlist[] = { 20, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, @@ -492,10 +640,15 @@ UV L1PosixWord_invlist[] = { 706 }; -UV PosixXDigit_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV PosixXDigit_invlist[] = { 6, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, @@ -506,10 +659,15 @@ UV PosixXDigit_invlist[] = { 103 }; -UV XPosixXDigit_invlist[] = { +#endif + +#ifndef PERL_IN_XSUB_RE + +static UV XPosixXDigit_invlist[] = { 12, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 48, @@ -526,10 +684,13 @@ UV XPosixXDigit_invlist[] = { 65351 }; -UV NonL1_Perl_Non_Final_Folds_invlist[] = { +#endif + +static UV NonL1_Perl_Non_Final_Folds_invlist[] = { 44, /* Number of elements */ 0, /* Current iteration position */ - 1064334010, /* Version and data structure type */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ 700, @@ -578,4 +739,75 @@ UV NonL1_Perl_Non_Final_Folds_invlist[] = { 8061 }; +#ifndef PERL_IN_XSUB_RE + +static UV _Perl_Multi_Char_Folds_invlist[] = { + 58, /* Number of elements */ + 0, /* Current iteration position */ + 0, /* Cache of previous search index result */ + 290655244, /* 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 */ + 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: */