1 /* -*- buffer-read-only: t -*-
2 * !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
3 * This file is built by regen/mk_invlists.pl from Unicode::UCD.
4 * Any changes made here will be lost!
7 /* See the generating file for comments */
10 #if defined(PERL_IN_REGCOMP_C)
12 static const UV Latin1_invlist[] = {
13 2, /* Number of elements */
14 148565664, /* Version and data structure type */
15 0, /* 0 if the list starts at 0;
16 1 if it starts at the element beyond 0 */
21 static const UV AboveLatin1_invlist[] = {
22 2, /* Number of elements */
23 148565664, /* Version and data structure type */
24 1, /* 0 if the list starts at 0;
25 1 if it starts at the element beyond 0 */
30 #endif /* defined(PERL_IN_REGCOMP_C) */
32 #if 'A' == 65 /* ASCII/Latin1 */
34 #if defined(PERL_IN_PERL_C)
36 static const UV ASCII_invlist[] = { /* for ASCII/Latin1 */
37 2, /* Number of elements */
38 148565664, /* Version and data structure type */
39 0, /* 0 if the list starts at 0;
40 1 if it starts at the element beyond 0 */
45 static const UV Cased_invlist[] = { /* for ASCII/Latin1 */
46 263, /* Number of elements */
47 148565664, /* Version and data structure type */
48 1, /* 0 if the list starts at 0;
49 1 if it starts at the element beyond 0 */
315 static const UV Grapheme_Cluster_Break_invlist[] = { /* for ASCII/Latin1 */
316 1502, /* Number of elements */
317 148565664, /* Version and data structure type */
318 0, /* 0 if the list starts at 0;
319 1 if it starts at the element beyond 0 */
1824 #endif /* defined(PERL_IN_PERL_C) */
1826 #if defined(PERL_IN_REGEXEC_C)
1828 #define GCB_ENUM_COUNT 14
1841 GCB_Regional_Indicator = 10,
1842 GCB_SpacingMark = 11,
1847 static const GCB_enum Grapheme_Cluster_Break_invmap[] = { /* for ASCII/Latin1 */
3344 GCB_Regional_Indicator,
3352 #endif /* defined(PERL_IN_REGEXEC_C) */
3354 #if defined(PERL_IN_REGCOMP_C)
3356 static const UV NonL1_Perl_Non_Final_Folds_invlist[] = { /* for ASCII/Latin1 */
3357 45, /* Number of elements */
3358 148565664, /* Version and data structure type */
3359 1, /* 0 if the list starts at 0;
3360 1 if it starts at the element beyond 0 */
3408 static const UV _Perl_Any_Folds_invlist[] = { /* for ASCII/Latin1 */
3409 247, /* Number of elements */
3410 148565664, /* Version and data structure type */
3411 1, /* 0 if the list starts at 0;
3412 1 if it starts at the element beyond 0 */
3662 static const UV _Perl_Folds_To_Multi_Char_invlist[] = { /* for ASCII/Latin1 */
3663 59, /* Number of elements */
3664 148565664, /* Version and data structure type */
3665 1, /* 0 if the list starts at 0;
3666 1 if it starts at the element beyond 0 */
3728 #endif /* defined(PERL_IN_REGCOMP_C) */
3730 #if defined(PERL_IN_UTF8_C)
3732 static const UV _Perl_IDCont_invlist[] = { /* for ASCII/Latin1 */
3733 1317, /* Number of elements */
3734 148565664, /* Version and data structure type */
3735 1, /* 0 if the list starts at 0;
3736 1 if it starts at the element beyond 0 */