provide EBCDIC CGI::Util::escape() and test
[p5sagit/p5-mst-13.2.git] / regnodes.h
CommitLineData
d09b2d29 1/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
885f9e59 2 This file is built by regcomp.pl from regcomp.sym.
d09b2d29 3 Any changes made here will be lost!
4*/
5
22c35a8c 6#define END 0 /* 0 End of program. */
d09b2d29 7#define SUCCEED 1 /* 0x1 Return from a subroutine, basically. */
8#define BOL 2 /* 0x2 Match "" at beginning of line. */
9#define MBOL 3 /* 0x3 Same, assuming multiline. */
10#define SBOL 4 /* 0x4 Same, assuming singleline. */
b85d18e9 11#define EOS 5 /* 0x5 Match "" at end of string. */
12#define EOL 6 /* 0x6 Match "" at end of line. */
13#define MEOL 7 /* 0x7 Same, assuming multiline. */
14#define SEOL 8 /* 0x8 Same, assuming singleline. */
15#define BOUND 9 /* 0x9 Match "" at any word boundary */
ffc61ed2 16#define BOUNDL 10 /* 0xa Match "" at any word boundary */
17#define NBOUND 11 /* 0xb Match "" at any word non-boundary */
18#define NBOUNDL 12 /* 0xc Match "" at any word non-boundary */
19#define GPOS 13 /* 0xd Matches where last m//g left off. */
20#define REG_ANY 14 /* 0xe Match any one character (except newline). */
21#define SANY 15 /* 0xf Match any one character. */
22#define ANYOF 16 /* 0x10 Match character in (or not in) this class. */
23#define ALNUM 17 /* 0x11 Match any alphanumeric character */
24#define ALNUML 18 /* 0x12 Match any alphanumeric char in locale */
25#define NALNUM 19 /* 0x13 Match any non-alphanumeric character */
26#define NALNUML 20 /* 0x14 Match any non-alphanumeric char in locale */
27#define SPACE 21 /* 0x15 Match any whitespace character */
28#define SPACEL 22 /* 0x16 Match any whitespace char in locale */
29#define NSPACE 23 /* 0x17 Match any non-whitespace character */
30#define NSPACEL 24 /* 0x18 Match any non-whitespace char in locale */
31#define DIGIT 25 /* 0x19 Match any numeric character */
32#define DIGITL 26 /* 0x1a Match any numeric character in locale */
33#define NDIGIT 27 /* 0x1b Match any non-numeric character */
34#define NDIGITL 28 /* 0x1c Match any non-numeric character in locale */
35#define CLUMP 29 /* 0x1d Match any combining character sequence */
36#define BRANCH 30 /* 0x1e Match this alternative, or the next... */
37#define BACK 31 /* 0x1f Match "", "next" ptr points backward. */
38#define EXACT 32 /* 0x20 Match this string (preceded by length). */
39#define EXACTF 33 /* 0x21 Match this string, folded (prec. by length). */
40#define EXACTFL 34 /* 0x22 Match this string, folded in locale (w/len). */
41#define NOTHING 35 /* 0x23 Match empty string. */
42#define TAIL 36 /* 0x24 Match empty string. Can jump here from outside. */
43#define STAR 37 /* 0x25 Match this (simple) thing 0 or more times. */
44#define PLUS 38 /* 0x26 Match this (simple) thing 1 or more times. */
45#define CURLY 39 /* 0x27 Match this simple thing {n,m} times. */
46#define CURLYN 40 /* 0x28 Match next-after-this simple thing */
47#define CURLYM 41 /* 0x29 Match this medium-complex thing {n,m} times. */
48#define CURLYX 42 /* 0x2a Match this complex thing {n,m} times. */
49#define WHILEM 43 /* 0x2b Do curly processing and see if rest matches. */
50#define OPEN 44 /* 0x2c Mark this point in input as start of #n. */
51#define CLOSE 45 /* 0x2d Analogous to OPEN. */
52#define REF 46 /* 0x2e Match some already matched string */
53#define REFF 47 /* 0x2f Match already matched string, folded */
54#define REFFL 48 /* 0x30 Match already matched string, folded in loc. */
55#define IFMATCH 49 /* 0x31 Succeeds if the following matches. */
56#define UNLESSM 50 /* 0x32 Fails if the following matches. */
57#define SUSPEND 51 /* 0x33 "Independent" sub-RE. */
58#define IFTHEN 52 /* 0x34 Switch, should be preceeded by switcher . */
59#define GROUPP 53 /* 0x35 Whether the group matched. */
60#define LONGJMP 54 /* 0x36 Jump far away. */
61#define BRANCHJ 55 /* 0x37 BRANCH with long offset. */
62#define EVAL 56 /* 0x38 Execute some Perl code. */
63#define MINMOD 57 /* 0x39 Next operator is not greedy. */
64#define LOGICAL 58 /* 0x3a Next opcode should set the flag only. */
65#define RENUM 59 /* 0x3b Group with independently numbered parens. */
66#define OPTIMIZED 60 /* 0x3c Placeholder for dump. */
d09b2d29 67
68#ifndef DOINIT
22c35a8c 69EXTCONST U8 PL_regkind[];
d09b2d29 70#else
22c35a8c 71EXTCONST U8 PL_regkind[] = {
d09b2d29 72 END, /* END */
73 END, /* SUCCEED */
74 BOL, /* BOL */
75 BOL, /* MBOL */
76 BOL, /* SBOL */
b85d18e9 77 EOL, /* EOS */
d09b2d29 78 EOL, /* EOL */
79 EOL, /* MEOL */
80 EOL, /* SEOL */
81 BOUND, /* BOUND */
82 BOUND, /* BOUNDL */
83 NBOUND, /* NBOUND */
84 NBOUND, /* NBOUNDL */
85 GPOS, /* GPOS */
22c35a8c 86 REG_ANY, /* REG_ANY */
22c35a8c 87 REG_ANY, /* SANY */
d09b2d29 88 ANYOF, /* ANYOF */
89 ALNUM, /* ALNUM */
90 ALNUM, /* ALNUML */
91 NALNUM, /* NALNUM */
92 NALNUM, /* NALNUML */
93 SPACE, /* SPACE */
94 SPACE, /* SPACEL */
95 NSPACE, /* NSPACE */
96 NSPACE, /* NSPACEL */
97 DIGIT, /* DIGIT */
b8c5462f 98 DIGIT, /* DIGITL */
d09b2d29 99 NDIGIT, /* NDIGIT */
b8c5462f 100 NDIGIT, /* NDIGITL */
a0ed51b3 101 CLUMP, /* CLUMP */
d09b2d29 102 BRANCH, /* BRANCH */
103 BACK, /* BACK */
104 EXACT, /* EXACT */
105 EXACT, /* EXACTF */
106 EXACT, /* EXACTFL */
107 NOTHING, /* NOTHING */
108 NOTHING, /* TAIL */
109 STAR, /* STAR */
110 PLUS, /* PLUS */
111 CURLY, /* CURLY */
112 CURLY, /* CURLYN */
113 CURLY, /* CURLYM */
114 CURLY, /* CURLYX */
115 WHILEM, /* WHILEM */
116 OPEN, /* OPEN */
117 CLOSE, /* CLOSE */
118 REF, /* REF */
119 REF, /* REFF */
120 REF, /* REFFL */
121 BRANCHJ, /* IFMATCH */
122 BRANCHJ, /* UNLESSM */
123 BRANCHJ, /* SUSPEND */
124 BRANCHJ, /* IFTHEN */
125 GROUPP, /* GROUPP */
126 LONGJMP, /* LONGJMP */
127 BRANCHJ, /* BRANCHJ */
128 EVAL, /* EVAL */
129 MINMOD, /* MINMOD */
130 LOGICAL, /* LOGICAL */
131 BRANCHJ, /* RENUM */
132 NOTHING, /* OPTIMIZED */
133};
134#endif
135
136
137#ifdef REG_COMP_C
29de9391 138static const U8 regarglen[] = {
d09b2d29 139 0, /* END */
140 0, /* SUCCEED */
141 0, /* BOL */
142 0, /* MBOL */
143 0, /* SBOL */
b85d18e9 144 0, /* EOS */
d09b2d29 145 0, /* EOL */
146 0, /* MEOL */
147 0, /* SEOL */
148 0, /* BOUND */
149 0, /* BOUNDL */
150 0, /* NBOUND */
151 0, /* NBOUNDL */
152 0, /* GPOS */
22c35a8c 153 0, /* REG_ANY */
d09b2d29 154 0, /* SANY */
155 0, /* ANYOF */
156 0, /* ALNUM */
157 0, /* ALNUML */
158 0, /* NALNUM */
159 0, /* NALNUML */
160 0, /* SPACE */
161 0, /* SPACEL */
162 0, /* NSPACE */
163 0, /* NSPACEL */
164 0, /* DIGIT */
b8c5462f 165 0, /* DIGITL */
d09b2d29 166 0, /* NDIGIT */
b8c5462f 167 0, /* NDIGITL */
a0ed51b3 168 0, /* CLUMP */
d09b2d29 169 0, /* BRANCH */
170 0, /* BACK */
171 0, /* EXACT */
172 0, /* EXACTF */
173 0, /* EXACTFL */
174 0, /* NOTHING */
175 0, /* TAIL */
176 0, /* STAR */
177 0, /* PLUS */
178 EXTRA_SIZE(struct regnode_2), /* CURLY */
179 EXTRA_SIZE(struct regnode_2), /* CURLYN */
180 EXTRA_SIZE(struct regnode_2), /* CURLYM */
181 EXTRA_SIZE(struct regnode_2), /* CURLYX */
182 0, /* WHILEM */
183 EXTRA_SIZE(struct regnode_1), /* OPEN */
184 EXTRA_SIZE(struct regnode_1), /* CLOSE */
185 EXTRA_SIZE(struct regnode_1), /* REF */
186 EXTRA_SIZE(struct regnode_1), /* REFF */
187 EXTRA_SIZE(struct regnode_1), /* REFFL */
188 EXTRA_SIZE(struct regnode_1), /* IFMATCH */
189 EXTRA_SIZE(struct regnode_1), /* UNLESSM */
190 EXTRA_SIZE(struct regnode_1), /* SUSPEND */
191 EXTRA_SIZE(struct regnode_1), /* IFTHEN */
192 EXTRA_SIZE(struct regnode_1), /* GROUPP */
193 EXTRA_SIZE(struct regnode_1), /* LONGJMP */
194 EXTRA_SIZE(struct regnode_1), /* BRANCHJ */
195 EXTRA_SIZE(struct regnode_1), /* EVAL */
196 0, /* MINMOD */
197 0, /* LOGICAL */
198 EXTRA_SIZE(struct regnode_1), /* RENUM */
199 0, /* OPTIMIZED */
200};
201
29de9391 202static const char reg_off_by_arg[] = {
d09b2d29 203 0, /* END */
204 0, /* SUCCEED */
205 0, /* BOL */
206 0, /* MBOL */
207 0, /* SBOL */
b85d18e9 208 0, /* EOS */
d09b2d29 209 0, /* EOL */
210 0, /* MEOL */
211 0, /* SEOL */
212 0, /* BOUND */
213 0, /* BOUNDL */
214 0, /* NBOUND */
215 0, /* NBOUNDL */
216 0, /* GPOS */
22c35a8c 217 0, /* REG_ANY */
d09b2d29 218 0, /* SANY */
219 0, /* ANYOF */
220 0, /* ALNUM */
221 0, /* ALNUML */
222 0, /* NALNUM */
223 0, /* NALNUML */
224 0, /* SPACE */
225 0, /* SPACEL */
226 0, /* NSPACE */
227 0, /* NSPACEL */
228 0, /* DIGIT */
b8c5462f 229 0, /* DIGITL */
d09b2d29 230 0, /* NDIGIT */
b8c5462f 231 0, /* NDIGITL */
a0ed51b3 232 0, /* CLUMP */
d09b2d29 233 0, /* BRANCH */
234 0, /* BACK */
235 0, /* EXACT */
236 0, /* EXACTF */
237 0, /* EXACTFL */
238 0, /* NOTHING */
239 0, /* TAIL */
240 0, /* STAR */
241 0, /* PLUS */
242 0, /* CURLY */
243 0, /* CURLYN */
244 0, /* CURLYM */
245 0, /* CURLYX */
246 0, /* WHILEM */
247 0, /* OPEN */
248 0, /* CLOSE */
249 0, /* REF */
250 0, /* REFF */
251 0, /* REFFL */
252 2, /* IFMATCH */
253 2, /* UNLESSM */
254 1, /* SUSPEND */
255 1, /* IFTHEN */
256 0, /* GROUPP */
257 1, /* LONGJMP */
258 1, /* BRANCHJ */
259 0, /* EVAL */
260 0, /* MINMOD */
261 0, /* LOGICAL */
262 1, /* RENUM */
263 0, /* OPTIMIZED */
264};
885f9e59 265
266#ifdef DEBUGGING
29de9391 267static const char * const reg_name[] = {
885f9e59 268 "END", /* 0 */
269 "SUCCEED", /* 0x1 */
270 "BOL", /* 0x2 */
271 "MBOL", /* 0x3 */
272 "SBOL", /* 0x4 */
273 "EOS", /* 0x5 */
274 "EOL", /* 0x6 */
275 "MEOL", /* 0x7 */
276 "SEOL", /* 0x8 */
277 "BOUND", /* 0x9 */
ffc61ed2 278 "BOUNDL", /* 0xa */
279 "NBOUND", /* 0xb */
280 "NBOUNDL", /* 0xc */
281 "GPOS", /* 0xd */
282 "REG_ANY", /* 0xe */
283 "SANY", /* 0xf */
284 "ANYOF", /* 0x10 */
285 "ALNUM", /* 0x11 */
286 "ALNUML", /* 0x12 */
287 "NALNUM", /* 0x13 */
288 "NALNUML", /* 0x14 */
289 "SPACE", /* 0x15 */
290 "SPACEL", /* 0x16 */
291 "NSPACE", /* 0x17 */
292 "NSPACEL", /* 0x18 */
293 "DIGIT", /* 0x19 */
294 "DIGITL", /* 0x1a */
295 "NDIGIT", /* 0x1b */
296 "NDIGITL", /* 0x1c */
297 "CLUMP", /* 0x1d */
298 "BRANCH", /* 0x1e */
299 "BACK", /* 0x1f */
300 "EXACT", /* 0x20 */
301 "EXACTF", /* 0x21 */
302 "EXACTFL", /* 0x22 */
303 "NOTHING", /* 0x23 */
304 "TAIL", /* 0x24 */
305 "STAR", /* 0x25 */
306 "PLUS", /* 0x26 */
307 "CURLY", /* 0x27 */
308 "CURLYN", /* 0x28 */
309 "CURLYM", /* 0x29 */
310 "CURLYX", /* 0x2a */
311 "WHILEM", /* 0x2b */
312 "OPEN", /* 0x2c */
313 "CLOSE", /* 0x2d */
314 "REF", /* 0x2e */
315 "REFF", /* 0x2f */
316 "REFFL", /* 0x30 */
317 "IFMATCH", /* 0x31 */
318 "UNLESSM", /* 0x32 */
319 "SUSPEND", /* 0x33 */
320 "IFTHEN", /* 0x34 */
321 "GROUPP", /* 0x35 */
322 "LONGJMP", /* 0x36 */
323 "BRANCHJ", /* 0x37 */
324 "EVAL", /* 0x38 */
325 "MINMOD", /* 0x39 */
326 "LOGICAL", /* 0x3a */
327 "RENUM", /* 0x3b */
328 "OPTIMIZED", /* 0x3c */
885f9e59 329};
330
ffc61ed2 331static const int reg_num = 61;
885f9e59 332
333#endif /* DEBUGGING */
d09b2d29 334#endif /* REG_COMP_C */
335