1 /* -*- buffer-read-only: t -*-
2 !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
3 This file is built by regcomp.pl from regcomp.sym.
4 Any changes made here will be lost!
7 #define END 0 /* 0 End of program. */
8 #define SUCCEED 1 /* 0x1 Return from a subroutine, basically. */
9 #define BOL 2 /* 0x2 Match "" at beginning of line. */
10 #define MBOL 3 /* 0x3 Same, assuming multiline. */
11 #define SBOL 4 /* 0x4 Same, assuming singleline. */
12 #define EOS 5 /* 0x5 Match "" at end of string. */
13 #define EOL 6 /* 0x6 Match "" at end of line. */
14 #define MEOL 7 /* 0x7 Same, assuming multiline. */
15 #define SEOL 8 /* 0x8 Same, assuming singleline. */
16 #define BOUND 9 /* 0x9 Match "" at any word boundary */
17 #define BOUNDL 10 /* 0xa Match "" at any word boundary */
18 #define NBOUND 11 /* 0xb Match "" at any word non-boundary */
19 #define NBOUNDL 12 /* 0xc Match "" at any word non-boundary */
20 #define GPOS 13 /* 0xd Matches where last m//g left off. */
21 #define REG_ANY 14 /* 0xe Match any one character (except newline). */
22 #define SANY 15 /* 0xf Match any one character. */
23 #define CANY 16 /* 0x10 Match any one byte. */
24 #define ANYOF 17 /* 0x11 Match character in (or not in) this class. */
25 #define ALNUM 18 /* 0x12 Match any alphanumeric character */
26 #define ALNUML 19 /* 0x13 Match any alphanumeric char in locale */
27 #define NALNUM 20 /* 0x14 Match any non-alphanumeric character */
28 #define NALNUML 21 /* 0x15 Match any non-alphanumeric char in locale */
29 #define SPACE 22 /* 0x16 Match any whitespace character */
30 #define SPACEL 23 /* 0x17 Match any whitespace char in locale */
31 #define NSPACE 24 /* 0x18 Match any non-whitespace character */
32 #define NSPACEL 25 /* 0x19 Match any non-whitespace char in locale */
33 #define DIGIT 26 /* 0x1a Match any numeric character */
34 #define DIGITL 27 /* 0x1b Match any numeric character in locale */
35 #define NDIGIT 28 /* 0x1c Match any non-numeric character */
36 #define NDIGITL 29 /* 0x1d Match any non-numeric character in locale */
37 #define CLUMP 30 /* 0x1e Match any combining character sequence */
38 #define BRANCH 31 /* 0x1f Match this alternative, or the next... */
39 #define BACK 32 /* 0x20 Match "", "next" ptr points backward. */
40 #define EXACT 33 /* 0x21 Match this string (preceded by length). */
41 #define EXACTF 34 /* 0x22 Match this string, folded (prec. by length). */
42 #define EXACTFL 35 /* 0x23 Match this string, folded in locale (w/len). */
43 #define NOTHING 36 /* 0x24 Match empty string. */
44 #define TAIL 37 /* 0x25 Match empty string. Can jump here from outside. */
45 #define STAR 38 /* 0x26 Match this (simple) thing 0 or more times. */
46 #define PLUS 39 /* 0x27 Match this (simple) thing 1 or more times. */
47 #define CURLY 40 /* 0x28 Match this simple thing {n,m} times. */
48 #define CURLYN 41 /* 0x29 Match next-after-this simple thing */
49 #define CURLYM 42 /* 0x2a Match this medium-complex thing {n,m} times. */
50 #define CURLYX 43 /* 0x2b Match this complex thing {n,m} times. */
51 #define WHILEM 44 /* 0x2c Do curly processing and see if rest matches. */
52 #define OPEN 45 /* 0x2d Mark this point in input as start of #n. */
53 #define CLOSE 46 /* 0x2e Analogous to OPEN. */
54 #define REF 47 /* 0x2f Match some already matched string */
55 #define REFF 48 /* 0x30 Match already matched string, folded */
56 #define REFFL 49 /* 0x31 Match already matched string, folded in loc. */
57 #define IFMATCH 50 /* 0x32 Succeeds if the following matches. */
58 #define UNLESSM 51 /* 0x33 Fails if the following matches. */
59 #define SUSPEND 52 /* 0x34 "Independent" sub-RE. */
60 #define IFTHEN 53 /* 0x35 Switch, should be preceeded by switcher . */
61 #define GROUPP 54 /* 0x36 Whether the group matched. */
62 #define LONGJMP 55 /* 0x37 Jump far away. */
63 #define BRANCHJ 56 /* 0x38 BRANCH with long offset. */
64 #define EVAL 57 /* 0x39 Execute some Perl code. */
65 #define MINMOD 58 /* 0x3a Next operator is not greedy. */
66 #define LOGICAL 59 /* 0x3b Next opcode should set the flag only. */
67 #define RENUM 60 /* 0x3c Group with independently numbered parens. */
68 #define OPTIMIZED 61 /* 0x3d Placeholder for dump. */
69 #define TRIE 62 /* 0x3e Match many EXACT(FL?)? at once. flags==type */
70 #define TRIEC 63 /* 0x3f Trie + charclass. (unused at present) */
71 #define PSEUDO 64 /* 0x40 Pseudo opcode for internal use. */
74 EXTCONST U8 PL_regkind[];
76 EXTCONST U8 PL_regkind[] = {
91 REG_ANY, /* REG_ANY */
102 NSPACE, /* NSPACEL */
106 NDIGIT, /* NDIGITL */
113 NOTHING, /* NOTHING */
127 BRANCHJ, /* IFMATCH */
128 BRANCHJ, /* UNLESSM */
129 BRANCHJ, /* SUSPEND */
130 BRANCHJ, /* IFTHEN */
132 LONGJMP, /* LONGJMP */
133 BRANCHJ, /* BRANCHJ */
136 LOGICAL, /* LOGICAL */
138 NOTHING, /* OPTIMIZED */
147 static const U8 regarglen[] = {
188 EXTRA_SIZE(struct regnode_2), /* CURLY */
189 EXTRA_SIZE(struct regnode_2), /* CURLYN */
190 EXTRA_SIZE(struct regnode_2), /* CURLYM */
191 EXTRA_SIZE(struct regnode_2), /* CURLYX */
193 EXTRA_SIZE(struct regnode_1), /* OPEN */
194 EXTRA_SIZE(struct regnode_1), /* CLOSE */
195 EXTRA_SIZE(struct regnode_1), /* REF */
196 EXTRA_SIZE(struct regnode_1), /* REFF */
197 EXTRA_SIZE(struct regnode_1), /* REFFL */
198 EXTRA_SIZE(struct regnode_1), /* IFMATCH */
199 EXTRA_SIZE(struct regnode_1), /* UNLESSM */
200 EXTRA_SIZE(struct regnode_1), /* SUSPEND */
201 EXTRA_SIZE(struct regnode_1), /* IFTHEN */
202 EXTRA_SIZE(struct regnode_1), /* GROUPP */
203 EXTRA_SIZE(struct regnode_1), /* LONGJMP */
204 EXTRA_SIZE(struct regnode_1), /* BRANCHJ */
205 EXTRA_SIZE(struct regnode_1), /* EVAL */
208 EXTRA_SIZE(struct regnode_1), /* RENUM */
210 EXTRA_SIZE(struct regnode_1), /* TRIE */
211 EXTRA_SIZE(struct regnode_1), /* TRIEC */
215 static const char reg_off_by_arg[] = {
284 static const char * const reg_name[] = {
306 "NALNUML", /* 0x15 */
310 "NSPACEL", /* 0x19 */
314 "NDIGITL", /* 0x1d */
320 "EXACTFL", /* 0x23 */
321 "NOTHING", /* 0x24 */
335 "IFMATCH", /* 0x32 */
336 "UNLESSM", /* 0x33 */
337 "SUSPEND", /* 0x34 */
340 "LONGJMP", /* 0x37 */
341 "BRANCHJ", /* 0x38 */
344 "LOGICAL", /* 0x3b */
346 "OPTIMIZED", /* 0x3d */
352 static const int reg_num = 65;
354 #endif /* DEBUGGING */
355 #endif /* REG_COMP_C */