1 /* -*- buffer-read-only: t -*-
2 !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
3 This file is built by regen/regcomp.pl from regcomp.sym.
4 Any changes made here will be lost!
7 #if defined(PERL_CORE) || defined(PERL_EXT_RE_BUILD)
9 /* Regops and State definitions */
11 #define REGNODE_MAX 109
12 #define REGMATCH_STATE_MAX 149
14 /* -- For regexec.c to switch on target being utf8 (t8) or not (tb, b='byte');
15 * same with pattern (p8, pb) -- */
16 #define with_tp_UTF8ness(op, t_utf8, p_utf8) \
17 (((op) << 2) + (cBOOL(t_utf8) << 1) + cBOOL(p_utf8))
19 /* The #defines below give both the basic regnode and the expanded version for
20 switching on utf8ness */
21 #define END 0 /* 0x00 End of program. */
22 #define END_tb_pb 0 /* 0x000 */
23 #define END_tb_p8 1 /* 0x001 */
24 #define END_t8_pb 2 /* 0x002 */
25 #define END_t8_p8 3 /* 0x003 */
27 #define SUCCEED 1 /* 0x01 Return from a subroutine,
29 #define SUCCEED_tb_pb 4 /* 0x004 */
30 #define SUCCEED_tb_p8 5 /* 0x005 */
31 #define SUCCEED_t8_pb 6 /* 0x006 */
32 #define SUCCEED_t8_p8 7 /* 0x007 */
34 #define SBOL 2 /* 0x02 Match "" at beginning of
36 #define SBOL_tb_pb 8 /* 0x008 */
37 #define SBOL_tb_p8 9 /* 0x009 */
38 #define SBOL_t8_pb 10 /* 0x00a */
39 #define SBOL_t8_p8 11 /* 0x00b */
41 #define BOL 2 /* 0x02 Match "" at beginning of
43 #define BOL_tb_pb 8 /* 0x008 */
44 #define BOL_tb_p8 9 /* 0x009 */
45 #define BOL_t8_pb 10 /* 0x00a */
46 #define BOL_t8_p8 11 /* 0x00b */
48 #define MBOL 3 /* 0x03 Same, assuming multiline:
50 #define MBOL_tb_pb 12 /* 0x00c */
51 #define MBOL_tb_p8 13 /* 0x00d */
52 #define MBOL_t8_pb 14 /* 0x00e */
53 #define MBOL_t8_p8 15 /* 0x00f */
55 #define SEOL 4 /* 0x04 Match "" at end of line:
57 #define SEOL_tb_pb 16 /* 0x010 */
58 #define SEOL_tb_p8 17 /* 0x011 */
59 #define SEOL_t8_pb 18 /* 0x012 */
60 #define SEOL_t8_p8 19 /* 0x013 */
62 #define EOL 4 /* 0x04 Match "" at end of line:
64 #define EOL_tb_pb 16 /* 0x010 */
65 #define EOL_tb_p8 17 /* 0x011 */
66 #define EOL_t8_pb 18 /* 0x012 */
67 #define EOL_t8_p8 19 /* 0x013 */
69 #define MEOL 5 /* 0x05 Same, assuming multiline:
71 #define MEOL_tb_pb 20 /* 0x014 */
72 #define MEOL_tb_p8 21 /* 0x015 */
73 #define MEOL_t8_pb 22 /* 0x016 */
74 #define MEOL_t8_p8 23 /* 0x017 */
76 #define EOS 6 /* 0x06 Match "" at end of string:
78 #define EOS_tb_pb 24 /* 0x018 */
79 #define EOS_tb_p8 25 /* 0x019 */
80 #define EOS_t8_pb 26 /* 0x01a */
81 #define EOS_t8_p8 27 /* 0x01b */
83 #define GPOS 7 /* 0x07 Matches where last m//g
85 #define GPOS_tb_pb 28 /* 0x01c */
86 #define GPOS_tb_p8 29 /* 0x01d */
87 #define GPOS_t8_pb 30 /* 0x01e */
88 #define GPOS_t8_p8 31 /* 0x01f */
90 #define BOUND 8 /* 0x08 Like BOUNDA for non-utf8,
91 otherwise like BOUNDU */
92 #define BOUND_tb_pb 32 /* 0x020 */
93 #define BOUND_tb_p8 33 /* 0x021 */
94 #define BOUND_t8_pb 34 /* 0x022 */
95 #define BOUND_t8_p8 35 /* 0x023 */
97 #define BOUNDL 9 /* 0x09 Like BOUND/BOUNDU, but \w
98 and \W are defined by current
100 #define BOUNDL_tb_pb 36 /* 0x024 */
101 #define BOUNDL_tb_p8 37 /* 0x025 */
102 #define BOUNDL_t8_pb 38 /* 0x026 */
103 #define BOUNDL_t8_p8 39 /* 0x027 */
105 #define BOUNDU 10 /* 0x0a Match "" at any boundary of
106 a given type using /u rules. */
107 #define BOUNDU_tb_pb 40 /* 0x028 */
108 #define BOUNDU_tb_p8 41 /* 0x029 */
109 #define BOUNDU_t8_pb 42 /* 0x02a */
110 #define BOUNDU_t8_p8 43 /* 0x02b */
112 #define BOUNDA 11 /* 0x0b Match "" at any boundary
113 between \w\W or \W\w, where \w
115 #define BOUNDA_tb_pb 44 /* 0x02c */
116 #define BOUNDA_tb_p8 45 /* 0x02d */
117 #define BOUNDA_t8_pb 46 /* 0x02e */
118 #define BOUNDA_t8_p8 47 /* 0x02f */
120 #define NBOUND 12 /* 0x0c Like NBOUNDA for non-utf8,
121 otherwise like BOUNDU */
122 #define NBOUND_tb_pb 48 /* 0x030 */
123 #define NBOUND_tb_p8 49 /* 0x031 */
124 #define NBOUND_t8_pb 50 /* 0x032 */
125 #define NBOUND_t8_p8 51 /* 0x033 */
127 #define NBOUNDL 13 /* 0x0d Like NBOUND/NBOUNDU, but \w
128 and \W are defined by current
130 #define NBOUNDL_tb_pb 52 /* 0x034 */
131 #define NBOUNDL_tb_p8 53 /* 0x035 */
132 #define NBOUNDL_t8_pb 54 /* 0x036 */
133 #define NBOUNDL_t8_p8 55 /* 0x037 */
135 #define NBOUNDU 14 /* 0x0e Match "" at any
136 non-boundary of a given type
137 using using /u rules. */
138 #define NBOUNDU_tb_pb 56 /* 0x038 */
139 #define NBOUNDU_tb_p8 57 /* 0x039 */
140 #define NBOUNDU_t8_pb 58 /* 0x03a */
141 #define NBOUNDU_t8_p8 59 /* 0x03b */
143 #define NBOUNDA 15 /* 0x0f Match "" betweeen any \w\w
146 #define NBOUNDA_tb_pb 60 /* 0x03c */
147 #define NBOUNDA_tb_p8 61 /* 0x03d */
148 #define NBOUNDA_t8_pb 62 /* 0x03e */
149 #define NBOUNDA_t8_p8 63 /* 0x03f */
151 #define REG_ANY 16 /* 0x10 Match any one character
153 #define REG_ANY_tb_pb 64 /* 0x040 */
154 #define REG_ANY_tb_p8 65 /* 0x041 */
155 #define REG_ANY_t8_pb 66 /* 0x042 */
156 #define REG_ANY_t8_p8 67 /* 0x043 */
158 #define SANY 17 /* 0x11 Match any one character. */
159 #define SANY_tb_pb 68 /* 0x044 */
160 #define SANY_tb_p8 69 /* 0x045 */
161 #define SANY_t8_pb 70 /* 0x046 */
162 #define SANY_t8_p8 71 /* 0x047 */
164 #define ANYOF 18 /* 0x12 Match character in (or not
165 in) this class, single char
167 #define ANYOF_tb_pb 72 /* 0x048 */
168 #define ANYOF_tb_p8 73 /* 0x049 */
169 #define ANYOF_t8_pb 74 /* 0x04a */
170 #define ANYOF_t8_p8 75 /* 0x04b */
172 #define ANYOFD 19 /* 0x13 Like ANYOF, but /d is in
174 #define ANYOFD_tb_pb 76 /* 0x04c */
175 #define ANYOFD_tb_p8 77 /* 0x04d */
176 #define ANYOFD_t8_pb 78 /* 0x04e */
177 #define ANYOFD_t8_p8 79 /* 0x04f */
179 #define ANYOFL 20 /* 0x14 Like ANYOF, but /l is in
181 #define ANYOFL_tb_pb 80 /* 0x050 */
182 #define ANYOFL_tb_p8 81 /* 0x051 */
183 #define ANYOFL_t8_pb 82 /* 0x052 */
184 #define ANYOFL_t8_p8 83 /* 0x053 */
186 #define ANYOFPOSIXL 21 /* 0x15 Like ANYOFL, but matches
187 [[:posix:]] classes */
188 #define ANYOFPOSIXL_tb_pb 84 /* 0x054 */
189 #define ANYOFPOSIXL_tb_p8 85 /* 0x055 */
190 #define ANYOFPOSIXL_t8_pb 86 /* 0x056 */
191 #define ANYOFPOSIXL_t8_p8 87 /* 0x057 */
193 #define ANYOFH 22 /* 0x16 Like ANYOF, but only has
194 "High" matches, none in the
195 bitmap; the flags field contains
196 the lowest matchable UTF-8 start
198 #define ANYOFH_tb_pb 88 /* 0x058 */
199 #define ANYOFH_tb_p8 89 /* 0x059 */
200 #define ANYOFH_t8_pb 90 /* 0x05a */
201 #define ANYOFH_t8_p8 91 /* 0x05b */
203 #define ANYOFHb 23 /* 0x17 Like ANYOFH, but all
204 matches share the same UTF-8
205 start byte, given in the flags
207 #define ANYOFHb_tb_pb 92 /* 0x05c */
208 #define ANYOFHb_tb_p8 93 /* 0x05d */
209 #define ANYOFHb_t8_pb 94 /* 0x05e */
210 #define ANYOFHb_t8_p8 95 /* 0x05f */
212 #define ANYOFHr 24 /* 0x18 Like ANYOFH, but the flags
213 field contains packed bounds for
214 all matchable UTF-8 start bytes.
216 #define ANYOFHr_tb_pb 96 /* 0x060 */
217 #define ANYOFHr_tb_p8 97 /* 0x061 */
218 #define ANYOFHr_t8_pb 98 /* 0x062 */
219 #define ANYOFHr_t8_p8 99 /* 0x063 */
221 #define ANYOFHs 25 /* 0x19 Like ANYOFHb, but has a
222 string field that gives the
223 leading matchable UTF-8 bytes;
224 flags field is len */
225 #define ANYOFHs_tb_pb 100 /* 0x064 */
226 #define ANYOFHs_tb_p8 101 /* 0x065 */
227 #define ANYOFHs_t8_pb 102 /* 0x066 */
228 #define ANYOFHs_t8_p8 103 /* 0x067 */
230 #define ANYOFR 26 /* 0x1a Matches any character in
231 the range given by its packed
232 args: upper 12 bits is the max
233 delta from the base lower 20;
234 the flags field contains the
235 lowest matchable UTF-8 start
237 #define ANYOFR_tb_pb 104 /* 0x068 */
238 #define ANYOFR_tb_p8 105 /* 0x069 */
239 #define ANYOFR_t8_pb 106 /* 0x06a */
240 #define ANYOFR_t8_p8 107 /* 0x06b */
242 #define ANYOFRb 27 /* 0x1b Like ANYOFR, but all
243 matches share the same UTF-8
244 start byte, given in the flags
246 #define ANYOFRb_tb_pb 108 /* 0x06c */
247 #define ANYOFRb_tb_p8 109 /* 0x06d */
248 #define ANYOFRb_t8_pb 110 /* 0x06e */
249 #define ANYOFRb_t8_p8 111 /* 0x06f */
251 #define ANYOFM 28 /* 0x1c Like ANYOF, but matches an
252 invariant byte as determined by
254 #define ANYOFM_tb_pb 112 /* 0x070 */
255 #define ANYOFM_tb_p8 113 /* 0x071 */
256 #define ANYOFM_t8_pb 114 /* 0x072 */
257 #define ANYOFM_t8_p8 115 /* 0x073 */
259 #define NANYOFM 29 /* 0x1d complement of ANYOFM */
260 #define NANYOFM_tb_pb 116 /* 0x074 */
261 #define NANYOFM_tb_p8 117 /* 0x075 */
262 #define NANYOFM_t8_pb 118 /* 0x076 */
263 #define NANYOFM_t8_p8 119 /* 0x077 */
265 #define POSIXD 30 /* 0x1e Some [[:class:]] under /d;
266 the FLAGS field gives which one
268 #define POSIXD_tb_pb 120 /* 0x078 */
269 #define POSIXD_tb_p8 121 /* 0x079 */
270 #define POSIXD_t8_pb 122 /* 0x07a */
271 #define POSIXD_t8_p8 123 /* 0x07b */
273 #define POSIXL 31 /* 0x1f Some [[:class:]] under /l;
274 the FLAGS field gives which one
276 #define POSIXL_tb_pb 124 /* 0x07c */
277 #define POSIXL_tb_p8 125 /* 0x07d */
278 #define POSIXL_t8_pb 126 /* 0x07e */
279 #define POSIXL_t8_p8 127 /* 0x07f */
281 #define POSIXU 32 /* 0x20 Some [[:class:]] under /u;
282 the FLAGS field gives which one
284 #define POSIXU_tb_pb 128 /* 0x080 */
285 #define POSIXU_tb_p8 129 /* 0x081 */
286 #define POSIXU_t8_pb 130 /* 0x082 */
287 #define POSIXU_t8_p8 131 /* 0x083 */
289 #define POSIXA 33 /* 0x21 Some [[:class:]] under /a;
290 the FLAGS field gives which one
292 #define POSIXA_tb_pb 132 /* 0x084 */
293 #define POSIXA_tb_p8 133 /* 0x085 */
294 #define POSIXA_t8_pb 134 /* 0x086 */
295 #define POSIXA_t8_p8 135 /* 0x087 */
297 #define NPOSIXD 34 /* 0x22 complement of POSIXD,
299 #define NPOSIXD_tb_pb 136 /* 0x088 */
300 #define NPOSIXD_tb_p8 137 /* 0x089 */
301 #define NPOSIXD_t8_pb 138 /* 0x08a */
302 #define NPOSIXD_t8_p8 139 /* 0x08b */
304 #define NPOSIXL 35 /* 0x23 complement of POSIXL,
306 #define NPOSIXL_tb_pb 140 /* 0x08c */
307 #define NPOSIXL_tb_p8 141 /* 0x08d */
308 #define NPOSIXL_t8_pb 142 /* 0x08e */
309 #define NPOSIXL_t8_p8 143 /* 0x08f */
311 #define NPOSIXU 36 /* 0x24 complement of POSIXU,
313 #define NPOSIXU_tb_pb 144 /* 0x090 */
314 #define NPOSIXU_tb_p8 145 /* 0x091 */
315 #define NPOSIXU_t8_pb 146 /* 0x092 */
316 #define NPOSIXU_t8_p8 147 /* 0x093 */
318 #define NPOSIXA 37 /* 0x25 complement of POSIXA,
320 #define NPOSIXA_tb_pb 148 /* 0x094 */
321 #define NPOSIXA_tb_p8 149 /* 0x095 */
322 #define NPOSIXA_t8_pb 150 /* 0x096 */
323 #define NPOSIXA_t8_p8 151 /* 0x097 */
325 #define CLUMP 38 /* 0x26 Match any extended grapheme
327 #define CLUMP_tb_pb 152 /* 0x098 */
328 #define CLUMP_tb_p8 153 /* 0x099 */
329 #define CLUMP_t8_pb 154 /* 0x09a */
330 #define CLUMP_t8_p8 155 /* 0x09b */
332 #define BRANCH 39 /* 0x27 Match this alternative, or
334 #define BRANCH_tb_pb 156 /* 0x09c */
335 #define BRANCH_tb_p8 157 /* 0x09d */
336 #define BRANCH_t8_pb 158 /* 0x09e */
337 #define BRANCH_t8_p8 159 /* 0x09f */
339 #define EXACT 40 /* 0x28 Match this string (flags
340 field is the length). */
341 #define EXACT_tb_pb 160 /* 0x0a0 */
342 #define EXACT_tb_p8 161 /* 0x0a1 */
343 #define EXACT_t8_pb 162 /* 0x0a2 */
344 #define EXACT_t8_p8 163 /* 0x0a3 */
346 #define LEXACT 41 /* 0x29 Match this long string
347 (preceded by length; flags
349 #define LEXACT_tb_pb 164 /* 0x0a4 */
350 #define LEXACT_tb_p8 165 /* 0x0a5 */
351 #define LEXACT_t8_pb 166 /* 0x0a6 */
352 #define LEXACT_t8_p8 167 /* 0x0a7 */
354 #define EXACTL 42 /* 0x2a Like EXACT, but /l is in
355 effect (used so locale-related
356 warnings can be checked for) */
357 #define EXACTL_tb_pb 168 /* 0x0a8 */
358 #define EXACTL_tb_p8 169 /* 0x0a9 */
359 #define EXACTL_t8_pb 170 /* 0x0aa */
360 #define EXACTL_t8_p8 171 /* 0x0ab */
362 #define EXACTF 43 /* 0x2b Like EXACT, but match using
363 /id rules; (string not UTF-8,
364 ASCII folded; non-ASCII not) */
365 #define EXACTF_tb_pb 172 /* 0x0ac */
366 #define EXACTF_tb_p8 173 /* 0x0ad */
367 #define EXACTF_t8_pb 174 /* 0x0ae */
368 #define EXACTF_t8_p8 175 /* 0x0af */
370 #define EXACTFL 44 /* 0x2c Like EXACT, but match using
371 /il rules; (string not likely to
373 #define EXACTFL_tb_pb 176 /* 0x0b0 */
374 #define EXACTFL_tb_p8 177 /* 0x0b1 */
375 #define EXACTFL_t8_pb 178 /* 0x0b2 */
376 #define EXACTFL_t8_p8 179 /* 0x0b3 */
378 #define EXACTFU 45 /* 0x2d Like EXACT, but match using
379 /iu rules; (string folded) */
380 #define EXACTFU_tb_pb 180 /* 0x0b4 */
381 #define EXACTFU_tb_p8 181 /* 0x0b5 */
382 #define EXACTFU_t8_pb 182 /* 0x0b6 */
383 #define EXACTFU_t8_p8 183 /* 0x0b7 */
385 #define EXACTFAA 46 /* 0x2e Like EXACT, but match using
386 /iaa rules; (string folded
387 except MICRO in non-UTF8
388 patterns; doesn't contain SHARP
389 S unless UTF-8; folded length <=
391 #define EXACTFAA_tb_pb 184 /* 0x0b8 */
392 #define EXACTFAA_tb_p8 185 /* 0x0b9 */
393 #define EXACTFAA_t8_pb 186 /* 0x0ba */
394 #define EXACTFAA_t8_p8 187 /* 0x0bb */
396 #define EXACTFAA_NO_TRIE 47 /* 0x2f Like EXACTFAA, (string not
397 UTF-8, folded except: MICRO,
398 SHARP S; folded length <=
399 unfolded, not currently
401 #define EXACTFAA_NO_TRIE_tb_pb 188 /* 0x0bc */
402 #define EXACTFAA_NO_TRIE_tb_p8 189 /* 0x0bd */
403 #define EXACTFAA_NO_TRIE_t8_pb 190 /* 0x0be */
404 #define EXACTFAA_NO_TRIE_t8_p8 191 /* 0x0bf */
406 #define EXACTFUP 48 /* 0x30 Like EXACT, but match using
407 /iu rules; (string not UTF-8,
408 folded except MICRO: hence
410 #define EXACTFUP_tb_pb 192 /* 0x0c0 */
411 #define EXACTFUP_tb_p8 193 /* 0x0c1 */
412 #define EXACTFUP_t8_pb 194 /* 0x0c2 */
413 #define EXACTFUP_t8_p8 195 /* 0x0c3 */
415 #define EXACTFLU8 49 /* 0x31 Like EXACTFU, but use /il,
416 UTF-8, (string is folded, and
417 everything in it is above 255 */
418 #define EXACTFLU8_tb_pb 196 /* 0x0c4 */
419 #define EXACTFLU8_tb_p8 197 /* 0x0c5 */
420 #define EXACTFLU8_t8_pb 198 /* 0x0c6 */
421 #define EXACTFLU8_t8_p8 199 /* 0x0c7 */
423 #define EXACT_REQ8 50 /* 0x32 Like EXACT, but only UTF-8
424 encoded targets can match */
425 #define EXACT_REQ8_tb_pb 200 /* 0x0c8 */
426 #define EXACT_REQ8_tb_p8 201 /* 0x0c9 */
427 #define EXACT_REQ8_t8_pb 202 /* 0x0ca */
428 #define EXACT_REQ8_t8_p8 203 /* 0x0cb */
430 #define LEXACT_REQ8 51 /* 0x33 Like LEXACT, but only UTF-8
431 encoded targets can match */
432 #define LEXACT_REQ8_tb_pb 204 /* 0x0cc */
433 #define LEXACT_REQ8_tb_p8 205 /* 0x0cd */
434 #define LEXACT_REQ8_t8_pb 206 /* 0x0ce */
435 #define LEXACT_REQ8_t8_p8 207 /* 0x0cf */
437 #define EXACTFU_REQ8 52 /* 0x34 Like EXACTFU, but only
438 UTF-8 encoded targets can match
440 #define EXACTFU_REQ8_tb_pb 208 /* 0x0d0 */
441 #define EXACTFU_REQ8_tb_p8 209 /* 0x0d1 */
442 #define EXACTFU_REQ8_t8_pb 210 /* 0x0d2 */
443 #define EXACTFU_REQ8_t8_p8 211 /* 0x0d3 */
445 #define EXACTFU_S_EDGE 53 /* 0x35 /di rules, but nothing in
446 it precludes /ui, except begins
447 and/or ends with [Ss]; (string
448 not UTF-8; compile-time only) */
449 #define EXACTFU_S_EDGE_tb_pb 212 /* 0x0d4 */
450 #define EXACTFU_S_EDGE_tb_p8 213 /* 0x0d5 */
451 #define EXACTFU_S_EDGE_t8_pb 214 /* 0x0d6 */
452 #define EXACTFU_S_EDGE_t8_p8 215 /* 0x0d7 */
454 #define LNBREAK 54 /* 0x36 generic newline pattern */
455 #define LNBREAK_tb_pb 216 /* 0x0d8 */
456 #define LNBREAK_tb_p8 217 /* 0x0d9 */
457 #define LNBREAK_t8_pb 218 /* 0x0da */
458 #define LNBREAK_t8_p8 219 /* 0x0db */
460 #define TRIE 55 /* 0x37 Match many EXACT(F[ALU]?)?
461 at once. flags==type */
462 #define TRIE_tb_pb 220 /* 0x0dc */
463 #define TRIE_tb_p8 221 /* 0x0dd */
464 #define TRIE_t8_pb 222 /* 0x0de */
465 #define TRIE_t8_p8 223 /* 0x0df */
467 #define TRIEC 56 /* 0x38 Same as TRIE, but with
468 embedded charclass data */
469 #define TRIEC_tb_pb 224 /* 0x0e0 */
470 #define TRIEC_tb_p8 225 /* 0x0e1 */
471 #define TRIEC_t8_pb 226 /* 0x0e2 */
472 #define TRIEC_t8_p8 227 /* 0x0e3 */
474 #define AHOCORASICK 57 /* 0x39 Aho Corasick stclass.
476 #define AHOCORASICK_tb_pb 228 /* 0x0e4 */
477 #define AHOCORASICK_tb_p8 229 /* 0x0e5 */
478 #define AHOCORASICK_t8_pb 230 /* 0x0e6 */
479 #define AHOCORASICK_t8_p8 231 /* 0x0e7 */
481 #define AHOCORASICKC 58 /* 0x3a Same as AHOCORASICK, but
482 with embedded charclass data */
483 #define AHOCORASICKC_tb_pb 232 /* 0x0e8 */
484 #define AHOCORASICKC_tb_p8 233 /* 0x0e9 */
485 #define AHOCORASICKC_t8_pb 234 /* 0x0ea */
486 #define AHOCORASICKC_t8_p8 235 /* 0x0eb */
488 #define NOTHING 59 /* 0x3b Match empty string. */
489 #define NOTHING_tb_pb 236 /* 0x0ec */
490 #define NOTHING_tb_p8 237 /* 0x0ed */
491 #define NOTHING_t8_pb 238 /* 0x0ee */
492 #define NOTHING_t8_p8 239 /* 0x0ef */
494 #define TAIL 60 /* 0x3c Match empty string. Can
495 jump here from outside. */
496 #define TAIL_tb_pb 240 /* 0x0f0 */
497 #define TAIL_tb_p8 241 /* 0x0f1 */
498 #define TAIL_t8_pb 242 /* 0x0f2 */
499 #define TAIL_t8_p8 243 /* 0x0f3 */
501 #define STAR 61 /* 0x3d Match this (simple) thing 0
503 #define STAR_tb_pb 244 /* 0x0f4 */
504 #define STAR_tb_p8 245 /* 0x0f5 */
505 #define STAR_t8_pb 246 /* 0x0f6 */
506 #define STAR_t8_p8 247 /* 0x0f7 */
508 #define PLUS 62 /* 0x3e Match this (simple) thing 1
510 #define PLUS_tb_pb 248 /* 0x0f8 */
511 #define PLUS_tb_p8 249 /* 0x0f9 */
512 #define PLUS_t8_pb 250 /* 0x0fa */
513 #define PLUS_t8_p8 251 /* 0x0fb */
515 #define CURLY 63 /* 0x3f Match this simple thing
517 #define CURLY_tb_pb 252 /* 0x0fc */
518 #define CURLY_tb_p8 253 /* 0x0fd */
519 #define CURLY_t8_pb 254 /* 0x0fe */
520 #define CURLY_t8_p8 255 /* 0x0ff */
522 #define CURLYN 64 /* 0x40 Capture next-after-this
524 #define CURLYN_tb_pb 256 /* 0x100 */
525 #define CURLYN_tb_p8 257 /* 0x101 */
526 #define CURLYN_t8_pb 258 /* 0x102 */
527 #define CURLYN_t8_p8 259 /* 0x103 */
529 #define CURLYM 65 /* 0x41 Capture this medium-complex
530 thing {n,m} times. */
531 #define CURLYM_tb_pb 260 /* 0x104 */
532 #define CURLYM_tb_p8 261 /* 0x105 */
533 #define CURLYM_t8_pb 262 /* 0x106 */
534 #define CURLYM_t8_p8 263 /* 0x107 */
536 #define CURLYX 66 /* 0x42 Match this complex thing
538 #define CURLYX_tb_pb 264 /* 0x108 */
539 #define CURLYX_tb_p8 265 /* 0x109 */
540 #define CURLYX_t8_pb 266 /* 0x10a */
541 #define CURLYX_t8_p8 267 /* 0x10b */
543 #define WHILEM 67 /* 0x43 Do curly processing and see
545 #define WHILEM_tb_pb 268 /* 0x10c */
546 #define WHILEM_tb_p8 269 /* 0x10d */
547 #define WHILEM_t8_pb 270 /* 0x10e */
548 #define WHILEM_t8_p8 271 /* 0x10f */
550 #define OPEN 68 /* 0x44 Mark this point in input as
552 #define OPEN_tb_pb 272 /* 0x110 */
553 #define OPEN_tb_p8 273 /* 0x111 */
554 #define OPEN_t8_pb 274 /* 0x112 */
555 #define OPEN_t8_p8 275 /* 0x113 */
557 #define CLOSE 69 /* 0x45 Close corresponding OPEN of
559 #define CLOSE_tb_pb 276 /* 0x114 */
560 #define CLOSE_tb_p8 277 /* 0x115 */
561 #define CLOSE_t8_pb 278 /* 0x116 */
562 #define CLOSE_t8_p8 279 /* 0x117 */
564 #define SROPEN 70 /* 0x46 Same as OPEN, but for
566 #define SROPEN_tb_pb 280 /* 0x118 */
567 #define SROPEN_tb_p8 281 /* 0x119 */
568 #define SROPEN_t8_pb 282 /* 0x11a */
569 #define SROPEN_t8_p8 283 /* 0x11b */
571 #define SRCLOSE 71 /* 0x47 Close preceding SROPEN */
572 #define SRCLOSE_tb_pb 284 /* 0x11c */
573 #define SRCLOSE_tb_p8 285 /* 0x11d */
574 #define SRCLOSE_t8_pb 286 /* 0x11e */
575 #define SRCLOSE_t8_p8 287 /* 0x11f */
577 #define REF 72 /* 0x48 Match some already matched
579 #define REF_tb_pb 288 /* 0x120 */
580 #define REF_tb_p8 289 /* 0x121 */
581 #define REF_t8_pb 290 /* 0x122 */
582 #define REF_t8_p8 291 /* 0x123 */
584 #define REFF 73 /* 0x49 Match already matched
585 string, using /di rules. */
586 #define REFF_tb_pb 292 /* 0x124 */
587 #define REFF_tb_p8 293 /* 0x125 */
588 #define REFF_t8_pb 294 /* 0x126 */
589 #define REFF_t8_p8 295 /* 0x127 */
591 #define REFFL 74 /* 0x4a Match already matched
592 string, using /li rules. */
593 #define REFFL_tb_pb 296 /* 0x128 */
594 #define REFFL_tb_p8 297 /* 0x129 */
595 #define REFFL_t8_pb 298 /* 0x12a */
596 #define REFFL_t8_p8 299 /* 0x12b */
598 #define REFFU 75 /* 0x4b Match already matched
600 #define REFFU_tb_pb 300 /* 0x12c */
601 #define REFFU_tb_p8 301 /* 0x12d */
602 #define REFFU_t8_pb 302 /* 0x12e */
603 #define REFFU_t8_p8 303 /* 0x12f */
605 #define REFFA 76 /* 0x4c Match already matched
606 string, using /aai rules. */
607 #define REFFA_tb_pb 304 /* 0x130 */
608 #define REFFA_tb_p8 305 /* 0x131 */
609 #define REFFA_t8_pb 306 /* 0x132 */
610 #define REFFA_t8_p8 307 /* 0x133 */
612 #define REFN 77 /* 0x4d Match some already matched
614 #define REFN_tb_pb 308 /* 0x134 */
615 #define REFN_tb_p8 309 /* 0x135 */
616 #define REFN_t8_pb 310 /* 0x136 */
617 #define REFN_t8_p8 311 /* 0x137 */
619 #define REFFN 78 /* 0x4e Match already matched
620 string, using /di rules. */
621 #define REFFN_tb_pb 312 /* 0x138 */
622 #define REFFN_tb_p8 313 /* 0x139 */
623 #define REFFN_t8_pb 314 /* 0x13a */
624 #define REFFN_t8_p8 315 /* 0x13b */
626 #define REFFLN 79 /* 0x4f Match already matched
627 string, using /li rules. */
628 #define REFFLN_tb_pb 316 /* 0x13c */
629 #define REFFLN_tb_p8 317 /* 0x13d */
630 #define REFFLN_t8_pb 318 /* 0x13e */
631 #define REFFLN_t8_p8 319 /* 0x13f */
633 #define REFFUN 80 /* 0x50 Match already matched
634 string, using /ui rules. */
635 #define REFFUN_tb_pb 320 /* 0x140 */
636 #define REFFUN_tb_p8 321 /* 0x141 */
637 #define REFFUN_t8_pb 322 /* 0x142 */
638 #define REFFUN_t8_p8 323 /* 0x143 */
640 #define REFFAN 81 /* 0x51 Match already matched
641 string, using /aai rules. */
642 #define REFFAN_tb_pb 324 /* 0x144 */
643 #define REFFAN_tb_p8 325 /* 0x145 */
644 #define REFFAN_t8_pb 326 /* 0x146 */
645 #define REFFAN_t8_p8 327 /* 0x147 */
647 #define LONGJMP 82 /* 0x52 Jump far away. */
648 #define LONGJMP_tb_pb 328 /* 0x148 */
649 #define LONGJMP_tb_p8 329 /* 0x149 */
650 #define LONGJMP_t8_pb 330 /* 0x14a */
651 #define LONGJMP_t8_p8 331 /* 0x14b */
653 #define BRANCHJ 83 /* 0x53 BRANCH with long offset. */
654 #define BRANCHJ_tb_pb 332 /* 0x14c */
655 #define BRANCHJ_tb_p8 333 /* 0x14d */
656 #define BRANCHJ_t8_pb 334 /* 0x14e */
657 #define BRANCHJ_t8_p8 335 /* 0x14f */
659 #define IFMATCH 84 /* 0x54 Succeeds if the following
660 matches; non-zero flags "f",
661 next_off "o" means lookbehind
662 assertion starting "f..(f-o)"
663 characters before current */
664 #define IFMATCH_tb_pb 336 /* 0x150 */
665 #define IFMATCH_tb_p8 337 /* 0x151 */
666 #define IFMATCH_t8_pb 338 /* 0x152 */
667 #define IFMATCH_t8_p8 339 /* 0x153 */
669 #define UNLESSM 85 /* 0x55 Fails if the following
670 matches; non-zero flags "f",
671 next_off "o" means lookbehind
672 assertion starting "f..(f-o)"
673 characters before current */
674 #define UNLESSM_tb_pb 340 /* 0x154 */
675 #define UNLESSM_tb_p8 341 /* 0x155 */
676 #define UNLESSM_t8_pb 342 /* 0x156 */
677 #define UNLESSM_t8_p8 343 /* 0x157 */
679 #define SUSPEND 86 /* 0x56 "Independent" sub-RE. */
680 #define SUSPEND_tb_pb 344 /* 0x158 */
681 #define SUSPEND_tb_p8 345 /* 0x159 */
682 #define SUSPEND_t8_pb 346 /* 0x15a */
683 #define SUSPEND_t8_p8 347 /* 0x15b */
685 #define IFTHEN 87 /* 0x57 Switch, should be preceded
687 #define IFTHEN_tb_pb 348 /* 0x15c */
688 #define IFTHEN_tb_p8 349 /* 0x15d */
689 #define IFTHEN_t8_pb 350 /* 0x15e */
690 #define IFTHEN_t8_p8 351 /* 0x15f */
692 #define GROUPP 88 /* 0x58 Whether the group matched.
694 #define GROUPP_tb_pb 352 /* 0x160 */
695 #define GROUPP_tb_p8 353 /* 0x161 */
696 #define GROUPP_t8_pb 354 /* 0x162 */
697 #define GROUPP_t8_p8 355 /* 0x163 */
699 #define EVAL 89 /* 0x59 Execute some Perl code. */
700 #define EVAL_tb_pb 356 /* 0x164 */
701 #define EVAL_tb_p8 357 /* 0x165 */
702 #define EVAL_t8_pb 358 /* 0x166 */
703 #define EVAL_t8_p8 359 /* 0x167 */
705 #define MINMOD 90 /* 0x5a Next operator is not
707 #define MINMOD_tb_pb 360 /* 0x168 */
708 #define MINMOD_tb_p8 361 /* 0x169 */
709 #define MINMOD_t8_pb 362 /* 0x16a */
710 #define MINMOD_t8_p8 363 /* 0x16b */
712 #define LOGICAL 91 /* 0x5b Next opcode should set the
714 #define LOGICAL_tb_pb 364 /* 0x16c */
715 #define LOGICAL_tb_p8 365 /* 0x16d */
716 #define LOGICAL_t8_pb 366 /* 0x16e */
717 #define LOGICAL_t8_p8 367 /* 0x16f */
719 #define RENUM 92 /* 0x5c Group with independently
721 #define RENUM_tb_pb 368 /* 0x170 */
722 #define RENUM_tb_p8 369 /* 0x171 */
723 #define RENUM_t8_pb 370 /* 0x172 */
724 #define RENUM_t8_p8 371 /* 0x173 */
726 #define GOSUB 93 /* 0x5d recurse to paren arg1 at
728 #define GOSUB_tb_pb 372 /* 0x174 */
729 #define GOSUB_tb_p8 373 /* 0x175 */
730 #define GOSUB_t8_pb 374 /* 0x176 */
731 #define GOSUB_t8_p8 375 /* 0x177 */
733 #define GROUPPN 94 /* 0x5e Whether the group matched.
735 #define GROUPPN_tb_pb 376 /* 0x178 */
736 #define GROUPPN_tb_p8 377 /* 0x179 */
737 #define GROUPPN_t8_pb 378 /* 0x17a */
738 #define GROUPPN_t8_p8 379 /* 0x17b */
740 #define INSUBP 95 /* 0x5f Whether we are in a
742 #define INSUBP_tb_pb 380 /* 0x17c */
743 #define INSUBP_tb_p8 381 /* 0x17d */
744 #define INSUBP_t8_pb 382 /* 0x17e */
745 #define INSUBP_t8_p8 383 /* 0x17f */
747 #define DEFINEP 96 /* 0x60 Never execute directly. */
748 #define DEFINEP_tb_pb 384 /* 0x180 */
749 #define DEFINEP_tb_p8 385 /* 0x181 */
750 #define DEFINEP_t8_pb 386 /* 0x182 */
751 #define DEFINEP_t8_p8 387 /* 0x183 */
753 #define ENDLIKE 97 /* 0x61 Used only for the type
755 #define ENDLIKE_tb_pb 388 /* 0x184 */
756 #define ENDLIKE_tb_p8 389 /* 0x185 */
757 #define ENDLIKE_t8_pb 390 /* 0x186 */
758 #define ENDLIKE_t8_p8 391 /* 0x187 */
760 #define OPFAIL 98 /* 0x62 Same as (?!), but with verb
762 #define OPFAIL_tb_pb 392 /* 0x188 */
763 #define OPFAIL_tb_p8 393 /* 0x189 */
764 #define OPFAIL_t8_pb 394 /* 0x18a */
765 #define OPFAIL_t8_p8 395 /* 0x18b */
767 #define ACCEPT 99 /* 0x63 Accepts the current matched
768 string, with verbar */
769 #define ACCEPT_tb_pb 396 /* 0x18c */
770 #define ACCEPT_tb_p8 397 /* 0x18d */
771 #define ACCEPT_t8_pb 398 /* 0x18e */
772 #define ACCEPT_t8_p8 399 /* 0x18f */
774 #define VERB 100 /* 0x64 Used only for the type
776 #define VERB_tb_pb 400 /* 0x190 */
777 #define VERB_tb_p8 401 /* 0x191 */
778 #define VERB_t8_pb 402 /* 0x192 */
779 #define VERB_t8_p8 403 /* 0x193 */
781 #define PRUNE 101 /* 0x65 Pattern fails at this
782 startpoint if no-backtracking
784 #define PRUNE_tb_pb 404 /* 0x194 */
785 #define PRUNE_tb_p8 405 /* 0x195 */
786 #define PRUNE_t8_pb 406 /* 0x196 */
787 #define PRUNE_t8_p8 407 /* 0x197 */
789 #define MARKPOINT 102 /* 0x66 Push the current location
790 for rollback by cut. */
791 #define MARKPOINT_tb_pb 408 /* 0x198 */
792 #define MARKPOINT_tb_p8 409 /* 0x199 */
793 #define MARKPOINT_t8_pb 410 /* 0x19a */
794 #define MARKPOINT_t8_p8 411 /* 0x19b */
796 #define SKIP 103 /* 0x67 On failure skip forward (to
797 the mark) before retrying */
798 #define SKIP_tb_pb 412 /* 0x19c */
799 #define SKIP_tb_p8 413 /* 0x19d */
800 #define SKIP_t8_pb 414 /* 0x19e */
801 #define SKIP_t8_p8 415 /* 0x19f */
803 #define COMMIT 104 /* 0x68 Pattern fails outright if
804 backtracking through this */
805 #define COMMIT_tb_pb 416 /* 0x1a0 */
806 #define COMMIT_tb_p8 417 /* 0x1a1 */
807 #define COMMIT_t8_pb 418 /* 0x1a2 */
808 #define COMMIT_t8_p8 419 /* 0x1a3 */
810 #define CUTGROUP 105 /* 0x69 On failure go to the next
811 alternation in the group */
812 #define CUTGROUP_tb_pb 420 /* 0x1a4 */
813 #define CUTGROUP_tb_p8 421 /* 0x1a5 */
814 #define CUTGROUP_t8_pb 422 /* 0x1a6 */
815 #define CUTGROUP_t8_p8 423 /* 0x1a7 */
817 #define KEEPS 106 /* 0x6a $& begins here. */
818 #define KEEPS_tb_pb 424 /* 0x1a8 */
819 #define KEEPS_tb_p8 425 /* 0x1a9 */
820 #define KEEPS_t8_pb 426 /* 0x1aa */
821 #define KEEPS_t8_p8 427 /* 0x1ab */
823 #define OPTIMIZED 107 /* 0x6b Placeholder for dump. */
824 #define OPTIMIZED_tb_pb 428 /* 0x1ac */
825 #define OPTIMIZED_tb_p8 429 /* 0x1ad */
826 #define OPTIMIZED_t8_pb 430 /* 0x1ae */
827 #define OPTIMIZED_t8_p8 431 /* 0x1af */
829 #define PSEUDO 108 /* 0x6c Pseudo opcode for internal
831 #define PSEUDO_tb_pb 432 /* 0x1b0 */
832 #define PSEUDO_tb_p8 433 /* 0x1b1 */
833 #define PSEUDO_t8_pb 434 /* 0x1b2 */
834 #define PSEUDO_t8_p8 435 /* 0x1b3 */
836 #define REGEX_SET 109 /* 0x6d Regex set, temporary node
837 used in pre-optimization
839 #define REGEX_SET_tb_pb 436 /* 0x1b4 */
840 #define REGEX_SET_tb_p8 437 /* 0x1b5 */
841 #define REGEX_SET_t8_pb 438 /* 0x1b6 */
842 #define REGEX_SET_t8_p8 439 /* 0x1b7 */
844 /* ------------ States ------------- */
845 #define TRIE_next 110 /* 0x6e state for TRIE */
846 #define TRIE_next_tb_pb 440 /* 0x1b8 */
847 #define TRIE_next_tb_p8 441 /* 0x1b9 */
848 #define TRIE_next_t8_pb 442 /* 0x1ba */
849 #define TRIE_next_t8_p8 443 /* 0x1bb */
851 #define TRIE_next_fail 111 /* 0x6f state for TRIE */
852 #define TRIE_next_fail_tb_pb 444 /* 0x1bc */
853 #define TRIE_next_fail_tb_p8 445 /* 0x1bd */
854 #define TRIE_next_fail_t8_pb 446 /* 0x1be */
855 #define TRIE_next_fail_t8_p8 447 /* 0x1bf */
857 #define EVAL_B 112 /* 0x70 state for EVAL */
858 #define EVAL_B_tb_pb 448 /* 0x1c0 */
859 #define EVAL_B_tb_p8 449 /* 0x1c1 */
860 #define EVAL_B_t8_pb 450 /* 0x1c2 */
861 #define EVAL_B_t8_p8 451 /* 0x1c3 */
863 #define EVAL_B_fail 113 /* 0x71 state for EVAL */
864 #define EVAL_B_fail_tb_pb 452 /* 0x1c4 */
865 #define EVAL_B_fail_tb_p8 453 /* 0x1c5 */
866 #define EVAL_B_fail_t8_pb 454 /* 0x1c6 */
867 #define EVAL_B_fail_t8_p8 455 /* 0x1c7 */
869 #define EVAL_postponed_AB 114 /* 0x72 state for EVAL */
870 #define EVAL_postponed_AB_tb_pb 456 /* 0x1c8 */
871 #define EVAL_postponed_AB_tb_p8 457 /* 0x1c9 */
872 #define EVAL_postponed_AB_t8_pb 458 /* 0x1ca */
873 #define EVAL_postponed_AB_t8_p8 459 /* 0x1cb */
875 #define EVAL_postponed_AB_fail 115 /* 0x73 state for EVAL */
876 #define EVAL_postponed_AB_fail_tb_pb 460 /* 0x1cc */
877 #define EVAL_postponed_AB_fail_tb_p8 461 /* 0x1cd */
878 #define EVAL_postponed_AB_fail_t8_pb 462 /* 0x1ce */
879 #define EVAL_postponed_AB_fail_t8_p8 463 /* 0x1cf */
881 #define CURLYX_end 116 /* 0x74 state for CURLYX */
882 #define CURLYX_end_tb_pb 464 /* 0x1d0 */
883 #define CURLYX_end_tb_p8 465 /* 0x1d1 */
884 #define CURLYX_end_t8_pb 466 /* 0x1d2 */
885 #define CURLYX_end_t8_p8 467 /* 0x1d3 */
887 #define CURLYX_end_fail 117 /* 0x75 state for CURLYX */
888 #define CURLYX_end_fail_tb_pb 468 /* 0x1d4 */
889 #define CURLYX_end_fail_tb_p8 469 /* 0x1d5 */
890 #define CURLYX_end_fail_t8_pb 470 /* 0x1d6 */
891 #define CURLYX_end_fail_t8_p8 471 /* 0x1d7 */
893 #define WHILEM_A_pre 118 /* 0x76 state for WHILEM */
894 #define WHILEM_A_pre_tb_pb 472 /* 0x1d8 */
895 #define WHILEM_A_pre_tb_p8 473 /* 0x1d9 */
896 #define WHILEM_A_pre_t8_pb 474 /* 0x1da */
897 #define WHILEM_A_pre_t8_p8 475 /* 0x1db */
899 #define WHILEM_A_pre_fail 119 /* 0x77 state for WHILEM */
900 #define WHILEM_A_pre_fail_tb_pb 476 /* 0x1dc */
901 #define WHILEM_A_pre_fail_tb_p8 477 /* 0x1dd */
902 #define WHILEM_A_pre_fail_t8_pb 478 /* 0x1de */
903 #define WHILEM_A_pre_fail_t8_p8 479 /* 0x1df */
905 #define WHILEM_A_min 120 /* 0x78 state for WHILEM */
906 #define WHILEM_A_min_tb_pb 480 /* 0x1e0 */
907 #define WHILEM_A_min_tb_p8 481 /* 0x1e1 */
908 #define WHILEM_A_min_t8_pb 482 /* 0x1e2 */
909 #define WHILEM_A_min_t8_p8 483 /* 0x1e3 */
911 #define WHILEM_A_min_fail 121 /* 0x79 state for WHILEM */
912 #define WHILEM_A_min_fail_tb_pb 484 /* 0x1e4 */
913 #define WHILEM_A_min_fail_tb_p8 485 /* 0x1e5 */
914 #define WHILEM_A_min_fail_t8_pb 486 /* 0x1e6 */
915 #define WHILEM_A_min_fail_t8_p8 487 /* 0x1e7 */
917 #define WHILEM_A_max 122 /* 0x7a state for WHILEM */
918 #define WHILEM_A_max_tb_pb 488 /* 0x1e8 */
919 #define WHILEM_A_max_tb_p8 489 /* 0x1e9 */
920 #define WHILEM_A_max_t8_pb 490 /* 0x1ea */
921 #define WHILEM_A_max_t8_p8 491 /* 0x1eb */
923 #define WHILEM_A_max_fail 123 /* 0x7b state for WHILEM */
924 #define WHILEM_A_max_fail_tb_pb 492 /* 0x1ec */
925 #define WHILEM_A_max_fail_tb_p8 493 /* 0x1ed */
926 #define WHILEM_A_max_fail_t8_pb 494 /* 0x1ee */
927 #define WHILEM_A_max_fail_t8_p8 495 /* 0x1ef */
929 #define WHILEM_B_min 124 /* 0x7c state for WHILEM */
930 #define WHILEM_B_min_tb_pb 496 /* 0x1f0 */
931 #define WHILEM_B_min_tb_p8 497 /* 0x1f1 */
932 #define WHILEM_B_min_t8_pb 498 /* 0x1f2 */
933 #define WHILEM_B_min_t8_p8 499 /* 0x1f3 */
935 #define WHILEM_B_min_fail 125 /* 0x7d state for WHILEM */
936 #define WHILEM_B_min_fail_tb_pb 500 /* 0x1f4 */
937 #define WHILEM_B_min_fail_tb_p8 501 /* 0x1f5 */
938 #define WHILEM_B_min_fail_t8_pb 502 /* 0x1f6 */
939 #define WHILEM_B_min_fail_t8_p8 503 /* 0x1f7 */
941 #define WHILEM_B_max 126 /* 0x7e state for WHILEM */
942 #define WHILEM_B_max_tb_pb 504 /* 0x1f8 */
943 #define WHILEM_B_max_tb_p8 505 /* 0x1f9 */
944 #define WHILEM_B_max_t8_pb 506 /* 0x1fa */
945 #define WHILEM_B_max_t8_p8 507 /* 0x1fb */
947 #define WHILEM_B_max_fail 127 /* 0x7f state for WHILEM */
948 #define WHILEM_B_max_fail_tb_pb 508 /* 0x1fc */
949 #define WHILEM_B_max_fail_tb_p8 509 /* 0x1fd */
950 #define WHILEM_B_max_fail_t8_pb 510 /* 0x1fe */
951 #define WHILEM_B_max_fail_t8_p8 511 /* 0x1ff */
953 #define BRANCH_next 128 /* 0x80 state for BRANCH */
954 #define BRANCH_next_tb_pb 512 /* 0x200 */
955 #define BRANCH_next_tb_p8 513 /* 0x201 */
956 #define BRANCH_next_t8_pb 514 /* 0x202 */
957 #define BRANCH_next_t8_p8 515 /* 0x203 */
959 #define BRANCH_next_fail 129 /* 0x81 state for BRANCH */
960 #define BRANCH_next_fail_tb_pb 516 /* 0x204 */
961 #define BRANCH_next_fail_tb_p8 517 /* 0x205 */
962 #define BRANCH_next_fail_t8_pb 518 /* 0x206 */
963 #define BRANCH_next_fail_t8_p8 519 /* 0x207 */
965 #define CURLYM_A 130 /* 0x82 state for CURLYM */
966 #define CURLYM_A_tb_pb 520 /* 0x208 */
967 #define CURLYM_A_tb_p8 521 /* 0x209 */
968 #define CURLYM_A_t8_pb 522 /* 0x20a */
969 #define CURLYM_A_t8_p8 523 /* 0x20b */
971 #define CURLYM_A_fail 131 /* 0x83 state for CURLYM */
972 #define CURLYM_A_fail_tb_pb 524 /* 0x20c */
973 #define CURLYM_A_fail_tb_p8 525 /* 0x20d */
974 #define CURLYM_A_fail_t8_pb 526 /* 0x20e */
975 #define CURLYM_A_fail_t8_p8 527 /* 0x20f */
977 #define CURLYM_B 132 /* 0x84 state for CURLYM */
978 #define CURLYM_B_tb_pb 528 /* 0x210 */
979 #define CURLYM_B_tb_p8 529 /* 0x211 */
980 #define CURLYM_B_t8_pb 530 /* 0x212 */
981 #define CURLYM_B_t8_p8 531 /* 0x213 */
983 #define CURLYM_B_fail 133 /* 0x85 state for CURLYM */
984 #define CURLYM_B_fail_tb_pb 532 /* 0x214 */
985 #define CURLYM_B_fail_tb_p8 533 /* 0x215 */
986 #define CURLYM_B_fail_t8_pb 534 /* 0x216 */
987 #define CURLYM_B_fail_t8_p8 535 /* 0x217 */
989 #define IFMATCH_A 134 /* 0x86 state for IFMATCH */
990 #define IFMATCH_A_tb_pb 536 /* 0x218 */
991 #define IFMATCH_A_tb_p8 537 /* 0x219 */
992 #define IFMATCH_A_t8_pb 538 /* 0x21a */
993 #define IFMATCH_A_t8_p8 539 /* 0x21b */
995 #define IFMATCH_A_fail 135 /* 0x87 state for IFMATCH */
996 #define IFMATCH_A_fail_tb_pb 540 /* 0x21c */
997 #define IFMATCH_A_fail_tb_p8 541 /* 0x21d */
998 #define IFMATCH_A_fail_t8_pb 542 /* 0x21e */
999 #define IFMATCH_A_fail_t8_p8 543 /* 0x21f */
1001 #define CURLY_B_min 136 /* 0x88 state for CURLY */
1002 #define CURLY_B_min_tb_pb 544 /* 0x220 */
1003 #define CURLY_B_min_tb_p8 545 /* 0x221 */
1004 #define CURLY_B_min_t8_pb 546 /* 0x222 */
1005 #define CURLY_B_min_t8_p8 547 /* 0x223 */
1007 #define CURLY_B_min_fail 137 /* 0x89 state for CURLY */
1008 #define CURLY_B_min_fail_tb_pb 548 /* 0x224 */
1009 #define CURLY_B_min_fail_tb_p8 549 /* 0x225 */
1010 #define CURLY_B_min_fail_t8_pb 550 /* 0x226 */
1011 #define CURLY_B_min_fail_t8_p8 551 /* 0x227 */
1013 #define CURLY_B_max 138 /* 0x8a state for CURLY */
1014 #define CURLY_B_max_tb_pb 552 /* 0x228 */
1015 #define CURLY_B_max_tb_p8 553 /* 0x229 */
1016 #define CURLY_B_max_t8_pb 554 /* 0x22a */
1017 #define CURLY_B_max_t8_p8 555 /* 0x22b */
1019 #define CURLY_B_max_fail 139 /* 0x8b state for CURLY */
1020 #define CURLY_B_max_fail_tb_pb 556 /* 0x22c */
1021 #define CURLY_B_max_fail_tb_p8 557 /* 0x22d */
1022 #define CURLY_B_max_fail_t8_pb 558 /* 0x22e */
1023 #define CURLY_B_max_fail_t8_p8 559 /* 0x22f */
1025 #define COMMIT_next 140 /* 0x8c state for COMMIT */
1026 #define COMMIT_next_tb_pb 560 /* 0x230 */
1027 #define COMMIT_next_tb_p8 561 /* 0x231 */
1028 #define COMMIT_next_t8_pb 562 /* 0x232 */
1029 #define COMMIT_next_t8_p8 563 /* 0x233 */
1031 #define COMMIT_next_fail 141 /* 0x8d state for COMMIT */
1032 #define COMMIT_next_fail_tb_pb 564 /* 0x234 */
1033 #define COMMIT_next_fail_tb_p8 565 /* 0x235 */
1034 #define COMMIT_next_fail_t8_pb 566 /* 0x236 */
1035 #define COMMIT_next_fail_t8_p8 567 /* 0x237 */
1037 #define MARKPOINT_next 142 /* 0x8e state for MARKPOINT */
1038 #define MARKPOINT_next_tb_pb 568 /* 0x238 */
1039 #define MARKPOINT_next_tb_p8 569 /* 0x239 */
1040 #define MARKPOINT_next_t8_pb 570 /* 0x23a */
1041 #define MARKPOINT_next_t8_p8 571 /* 0x23b */
1043 #define MARKPOINT_next_fail 143 /* 0x8f state for MARKPOINT */
1044 #define MARKPOINT_next_fail_tb_pb 572 /* 0x23c */
1045 #define MARKPOINT_next_fail_tb_p8 573 /* 0x23d */
1046 #define MARKPOINT_next_fail_t8_pb 574 /* 0x23e */
1047 #define MARKPOINT_next_fail_t8_p8 575 /* 0x23f */
1049 #define SKIP_next 144 /* 0x90 state for SKIP */
1050 #define SKIP_next_tb_pb 576 /* 0x240 */
1051 #define SKIP_next_tb_p8 577 /* 0x241 */
1052 #define SKIP_next_t8_pb 578 /* 0x242 */
1053 #define SKIP_next_t8_p8 579 /* 0x243 */
1055 #define SKIP_next_fail 145 /* 0x91 state for SKIP */
1056 #define SKIP_next_fail_tb_pb 580 /* 0x244 */
1057 #define SKIP_next_fail_tb_p8 581 /* 0x245 */
1058 #define SKIP_next_fail_t8_pb 582 /* 0x246 */
1059 #define SKIP_next_fail_t8_p8 583 /* 0x247 */
1061 #define CUTGROUP_next 146 /* 0x92 state for CUTGROUP */
1062 #define CUTGROUP_next_tb_pb 584 /* 0x248 */
1063 #define CUTGROUP_next_tb_p8 585 /* 0x249 */
1064 #define CUTGROUP_next_t8_pb 586 /* 0x24a */
1065 #define CUTGROUP_next_t8_p8 587 /* 0x24b */
1067 #define CUTGROUP_next_fail 147 /* 0x93 state for CUTGROUP */
1068 #define CUTGROUP_next_fail_tb_pb 588 /* 0x24c */
1069 #define CUTGROUP_next_fail_tb_p8 589 /* 0x24d */
1070 #define CUTGROUP_next_fail_t8_pb 590 /* 0x24e */
1071 #define CUTGROUP_next_fail_t8_p8 591 /* 0x24f */
1073 #define KEEPS_next 148 /* 0x94 state for KEEPS */
1074 #define KEEPS_next_tb_pb 592 /* 0x250 */
1075 #define KEEPS_next_tb_p8 593 /* 0x251 */
1076 #define KEEPS_next_t8_pb 594 /* 0x252 */
1077 #define KEEPS_next_t8_p8 595 /* 0x253 */
1079 #define KEEPS_next_fail 149 /* 0x95 state for KEEPS */
1080 #define KEEPS_next_fail_tb_pb 596 /* 0x254 */
1081 #define KEEPS_next_fail_tb_p8 597 /* 0x255 */
1082 #define KEEPS_next_fail_t8_pb 598 /* 0x256 */
1083 #define KEEPS_next_fail_t8_p8 599 /* 0x257 */
1086 /* PL_regkind[] What type of regop or state is this. */
1089 EXTCONST U8 PL_regkind[];
1091 EXTCONST U8 PL_regkind[] = {
1104 NBOUND, /* NBOUND */
1105 NBOUND, /* NBOUNDL */
1106 NBOUND, /* NBOUNDU */
1107 NBOUND, /* NBOUNDA */
1108 REG_ANY, /* REG_ANY */
1113 ANYOF, /* ANYOFPOSIXL */
1115 ANYOF, /* ANYOFHb */
1116 ANYOF, /* ANYOFHr */
1117 ANYOF, /* ANYOFHs */
1118 ANYOFR, /* ANYOFR */
1119 ANYOFR, /* ANYOFRb */
1120 ANYOFM, /* ANYOFM */
1121 ANYOFM, /* NANYOFM */
1122 POSIXD, /* POSIXD */
1123 POSIXD, /* POSIXL */
1124 POSIXD, /* POSIXU */
1125 POSIXD, /* POSIXA */
1126 NPOSIXD, /* NPOSIXD */
1127 NPOSIXD, /* NPOSIXL */
1128 NPOSIXD, /* NPOSIXU */
1129 NPOSIXD, /* NPOSIXA */
1131 BRANCH, /* BRANCH */
1136 EXACT, /* EXACTFL */
1137 EXACT, /* EXACTFU */
1138 EXACT, /* EXACTFAA */
1139 EXACT, /* EXACTFAA_NO_TRIE */
1140 EXACT, /* EXACTFUP */
1141 EXACT, /* EXACTFLU8 */
1142 EXACT, /* EXACT_REQ8 */
1143 EXACT, /* LEXACT_REQ8 */
1144 EXACT, /* EXACTFU_REQ8 */
1145 EXACT, /* EXACTFU_S_EDGE */
1146 LNBREAK, /* LNBREAK */
1149 TRIE, /* AHOCORASICK */
1150 TRIE, /* AHOCORASICKC */
1151 NOTHING, /* NOTHING */
1159 WHILEM, /* WHILEM */
1162 SROPEN, /* SROPEN */
1163 SRCLOSE, /* SRCLOSE */
1174 LONGJMP, /* LONGJMP */
1175 BRANCHJ, /* BRANCHJ */
1176 BRANCHJ, /* IFMATCH */
1177 BRANCHJ, /* UNLESSM */
1178 BRANCHJ, /* SUSPEND */
1179 BRANCHJ, /* IFTHEN */
1180 GROUPP, /* GROUPP */
1182 MINMOD, /* MINMOD */
1183 LOGICAL, /* LOGICAL */
1184 BRANCHJ, /* RENUM */
1186 GROUPPN, /* GROUPPN */
1187 INSUBP, /* INSUBP */
1188 DEFINEP, /* DEFINEP */
1189 ENDLIKE, /* ENDLIKE */
1190 ENDLIKE, /* OPFAIL */
1191 ENDLIKE, /* ACCEPT */
1194 VERB, /* MARKPOINT */
1197 VERB, /* CUTGROUP */
1199 NOTHING, /* OPTIMIZED */
1200 PSEUDO, /* PSEUDO */
1201 REGEX_SET, /* REGEX_SET */
1202 /* ------------ States ------------- */
1203 TRIE, /* TRIE_next */
1204 TRIE, /* TRIE_next_fail */
1206 EVAL, /* EVAL_B_fail */
1207 EVAL, /* EVAL_postponed_AB */
1208 EVAL, /* EVAL_postponed_AB_fail */
1209 CURLYX, /* CURLYX_end */
1210 CURLYX, /* CURLYX_end_fail */
1211 WHILEM, /* WHILEM_A_pre */
1212 WHILEM, /* WHILEM_A_pre_fail */
1213 WHILEM, /* WHILEM_A_min */
1214 WHILEM, /* WHILEM_A_min_fail */
1215 WHILEM, /* WHILEM_A_max */
1216 WHILEM, /* WHILEM_A_max_fail */
1217 WHILEM, /* WHILEM_B_min */
1218 WHILEM, /* WHILEM_B_min_fail */
1219 WHILEM, /* WHILEM_B_max */
1220 WHILEM, /* WHILEM_B_max_fail */
1221 BRANCH, /* BRANCH_next */
1222 BRANCH, /* BRANCH_next_fail */
1223 CURLYM, /* CURLYM_A */
1224 CURLYM, /* CURLYM_A_fail */
1225 CURLYM, /* CURLYM_B */
1226 CURLYM, /* CURLYM_B_fail */
1227 IFMATCH, /* IFMATCH_A */
1228 IFMATCH, /* IFMATCH_A_fail */
1229 CURLY, /* CURLY_B_min */
1230 CURLY, /* CURLY_B_min_fail */
1231 CURLY, /* CURLY_B_max */
1232 CURLY, /* CURLY_B_max_fail */
1233 COMMIT, /* COMMIT_next */
1234 COMMIT, /* COMMIT_next_fail */
1235 MARKPOINT, /* MARKPOINT_next */
1236 MARKPOINT, /* MARKPOINT_next_fail */
1237 SKIP, /* SKIP_next */
1238 SKIP, /* SKIP_next_fail */
1239 CUTGROUP, /* CUTGROUP_next */
1240 CUTGROUP, /* CUTGROUP_next_fail */
1241 KEEPS, /* KEEPS_next */
1242 KEEPS, /* KEEPS_next_fail */
1248 /* regarglen[] - How large is the argument part of the node (in regnodes) */
1250 static const U8 regarglen[] = {
1269 EXTRA_SIZE(struct regnode_charclass), /* ANYOF */
1270 EXTRA_SIZE(struct regnode_charclass), /* ANYOFD */
1271 EXTRA_SIZE(struct regnode_charclass), /* ANYOFL */
1272 EXTRA_SIZE(struct regnode_charclass_posixl), /* ANYOFPOSIXL */
1273 EXTRA_SIZE(struct regnode_1), /* ANYOFH */
1274 EXTRA_SIZE(struct regnode_1), /* ANYOFHb */
1275 EXTRA_SIZE(struct regnode_1), /* ANYOFHr */
1276 EXTRA_SIZE(struct regnode_1), /* ANYOFHs */
1277 EXTRA_SIZE(struct regnode_1), /* ANYOFR */
1278 EXTRA_SIZE(struct regnode_1), /* ANYOFRb */
1279 EXTRA_SIZE(struct regnode_1), /* ANYOFM */
1280 EXTRA_SIZE(struct regnode_1), /* NANYOFM */
1292 EXTRA_SIZE(struct regnode_1), /* LEXACT */
1298 0, /* EXACTFAA_NO_TRIE */
1302 EXTRA_SIZE(struct regnode_1), /* LEXACT_REQ8 */
1303 0, /* EXACTFU_REQ8 */
1304 0, /* EXACTFU_S_EDGE */
1306 EXTRA_SIZE(struct regnode_1), /* TRIE */
1307 EXTRA_SIZE(struct regnode_charclass), /* TRIEC */
1308 EXTRA_SIZE(struct regnode_1), /* AHOCORASICK */
1309 EXTRA_SIZE(struct regnode_charclass), /* AHOCORASICKC */
1314 EXTRA_SIZE(struct regnode_2), /* CURLY */
1315 EXTRA_SIZE(struct regnode_2), /* CURLYN */
1316 EXTRA_SIZE(struct regnode_2), /* CURLYM */
1317 EXTRA_SIZE(struct regnode_2), /* CURLYX */
1319 EXTRA_SIZE(struct regnode_1), /* OPEN */
1320 EXTRA_SIZE(struct regnode_1), /* CLOSE */
1323 EXTRA_SIZE(struct regnode_1), /* REF */
1324 EXTRA_SIZE(struct regnode_1), /* REFF */
1325 EXTRA_SIZE(struct regnode_1), /* REFFL */
1326 EXTRA_SIZE(struct regnode_1), /* REFFU */
1327 EXTRA_SIZE(struct regnode_1), /* REFFA */
1328 EXTRA_SIZE(struct regnode_1), /* REFN */
1329 EXTRA_SIZE(struct regnode_1), /* REFFN */
1330 EXTRA_SIZE(struct regnode_1), /* REFFLN */
1331 EXTRA_SIZE(struct regnode_1), /* REFFUN */
1332 EXTRA_SIZE(struct regnode_1), /* REFFAN */
1333 EXTRA_SIZE(struct regnode_1), /* LONGJMP */
1334 EXTRA_SIZE(struct regnode_1), /* BRANCHJ */
1335 EXTRA_SIZE(struct regnode_1), /* IFMATCH */
1336 EXTRA_SIZE(struct regnode_1), /* UNLESSM */
1337 EXTRA_SIZE(struct regnode_1), /* SUSPEND */
1338 EXTRA_SIZE(struct regnode_1), /* IFTHEN */
1339 EXTRA_SIZE(struct regnode_1), /* GROUPP */
1340 EXTRA_SIZE(struct regnode_2L), /* EVAL */
1343 EXTRA_SIZE(struct regnode_1), /* RENUM */
1344 EXTRA_SIZE(struct regnode_2L), /* GOSUB */
1345 EXTRA_SIZE(struct regnode_1), /* GROUPPN */
1346 EXTRA_SIZE(struct regnode_1), /* INSUBP */
1347 EXTRA_SIZE(struct regnode_1), /* DEFINEP */
1349 EXTRA_SIZE(struct regnode_1), /* OPFAIL */
1350 EXTRA_SIZE(struct regnode_2L), /* ACCEPT */
1351 EXTRA_SIZE(struct regnode_1), /* VERB */
1352 EXTRA_SIZE(struct regnode_1), /* PRUNE */
1353 EXTRA_SIZE(struct regnode_1), /* MARKPOINT */
1354 EXTRA_SIZE(struct regnode_1), /* SKIP */
1355 EXTRA_SIZE(struct regnode_1), /* COMMIT */
1356 EXTRA_SIZE(struct regnode_1), /* CUTGROUP */
1360 EXTRA_SIZE(struct regnode_p), /* REGEX_SET */
1363 /* reg_off_by_arg[] - Which argument holds the offset to the next node */
1365 static const char reg_off_by_arg[] = {
1387 0, /* ANYOFPOSIXL */
1413 0, /* EXACTFAA_NO_TRIE */
1417 0, /* LEXACT_REQ8 */
1418 0, /* EXACTFU_REQ8 */
1419 0, /* EXACTFU_S_EDGE */
1423 0, /* AHOCORASICK */
1424 0, /* AHOCORASICKC */
1478 #endif /* REG_COMP_C */
1481 /* reg_name[] - Opcode/state names in string form, for debugging */
1484 EXTCONST char * PL_reg_name[];
1486 EXTCONST char * const PL_reg_name[] = {
1488 "SUCCEED", /* 0x01 */
1496 "BOUNDL", /* 0x09 */
1497 "BOUNDU", /* 0x0a */
1498 "BOUNDA", /* 0x0b */
1499 "NBOUND", /* 0x0c */
1500 "NBOUNDL", /* 0x0d */
1501 "NBOUNDU", /* 0x0e */
1502 "NBOUNDA", /* 0x0f */
1503 "REG_ANY", /* 0x10 */
1506 "ANYOFD", /* 0x13 */
1507 "ANYOFL", /* 0x14 */
1508 "ANYOFPOSIXL", /* 0x15 */
1509 "ANYOFH", /* 0x16 */
1510 "ANYOFHb", /* 0x17 */
1511 "ANYOFHr", /* 0x18 */
1512 "ANYOFHs", /* 0x19 */
1513 "ANYOFR", /* 0x1a */
1514 "ANYOFRb", /* 0x1b */
1515 "ANYOFM", /* 0x1c */
1516 "NANYOFM", /* 0x1d */
1517 "POSIXD", /* 0x1e */
1518 "POSIXL", /* 0x1f */
1519 "POSIXU", /* 0x20 */
1520 "POSIXA", /* 0x21 */
1521 "NPOSIXD", /* 0x22 */
1522 "NPOSIXL", /* 0x23 */
1523 "NPOSIXU", /* 0x24 */
1524 "NPOSIXA", /* 0x25 */
1526 "BRANCH", /* 0x27 */
1528 "LEXACT", /* 0x29 */
1529 "EXACTL", /* 0x2a */
1530 "EXACTF", /* 0x2b */
1531 "EXACTFL", /* 0x2c */
1532 "EXACTFU", /* 0x2d */
1533 "EXACTFAA", /* 0x2e */
1534 "EXACTFAA_NO_TRIE", /* 0x2f */
1535 "EXACTFUP", /* 0x30 */
1536 "EXACTFLU8", /* 0x31 */
1537 "EXACT_REQ8", /* 0x32 */
1538 "LEXACT_REQ8", /* 0x33 */
1539 "EXACTFU_REQ8", /* 0x34 */
1540 "EXACTFU_S_EDGE", /* 0x35 */
1541 "LNBREAK", /* 0x36 */
1544 "AHOCORASICK", /* 0x39 */
1545 "AHOCORASICKC", /* 0x3a */
1546 "NOTHING", /* 0x3b */
1551 "CURLYN", /* 0x40 */
1552 "CURLYM", /* 0x41 */
1553 "CURLYX", /* 0x42 */
1554 "WHILEM", /* 0x43 */
1557 "SROPEN", /* 0x46 */
1558 "SRCLOSE", /* 0x47 */
1566 "REFFLN", /* 0x4f */
1567 "REFFUN", /* 0x50 */
1568 "REFFAN", /* 0x51 */
1569 "LONGJMP", /* 0x52 */
1570 "BRANCHJ", /* 0x53 */
1571 "IFMATCH", /* 0x54 */
1572 "UNLESSM", /* 0x55 */
1573 "SUSPEND", /* 0x56 */
1574 "IFTHEN", /* 0x57 */
1575 "GROUPP", /* 0x58 */
1577 "MINMOD", /* 0x5a */
1578 "LOGICAL", /* 0x5b */
1581 "GROUPPN", /* 0x5e */
1582 "INSUBP", /* 0x5f */
1583 "DEFINEP", /* 0x60 */
1584 "ENDLIKE", /* 0x61 */
1585 "OPFAIL", /* 0x62 */
1586 "ACCEPT", /* 0x63 */
1589 "MARKPOINT", /* 0x66 */
1591 "COMMIT", /* 0x68 */
1592 "CUTGROUP", /* 0x69 */
1594 "OPTIMIZED", /* 0x6b */
1595 "PSEUDO", /* 0x6c */
1596 "REGEX_SET", /* 0x6d */
1597 /* ------------ States ------------- */
1598 "TRIE_next", /* REGNODE_MAX +0x01 */
1599 "TRIE_next_fail", /* REGNODE_MAX +0x02 */
1600 "EVAL_B", /* REGNODE_MAX +0x03 */
1601 "EVAL_B_fail", /* REGNODE_MAX +0x04 */
1602 "EVAL_postponed_AB", /* REGNODE_MAX +0x05 */
1603 "EVAL_postponed_AB_fail", /* REGNODE_MAX +0x06 */
1604 "CURLYX_end", /* REGNODE_MAX +0x07 */
1605 "CURLYX_end_fail", /* REGNODE_MAX +0x08 */
1606 "WHILEM_A_pre", /* REGNODE_MAX +0x09 */
1607 "WHILEM_A_pre_fail", /* REGNODE_MAX +0x0a */
1608 "WHILEM_A_min", /* REGNODE_MAX +0x0b */
1609 "WHILEM_A_min_fail", /* REGNODE_MAX +0x0c */
1610 "WHILEM_A_max", /* REGNODE_MAX +0x0d */
1611 "WHILEM_A_max_fail", /* REGNODE_MAX +0x0e */
1612 "WHILEM_B_min", /* REGNODE_MAX +0x0f */
1613 "WHILEM_B_min_fail", /* REGNODE_MAX +0x10 */
1614 "WHILEM_B_max", /* REGNODE_MAX +0x11 */
1615 "WHILEM_B_max_fail", /* REGNODE_MAX +0x12 */
1616 "BRANCH_next", /* REGNODE_MAX +0x13 */
1617 "BRANCH_next_fail", /* REGNODE_MAX +0x14 */
1618 "CURLYM_A", /* REGNODE_MAX +0x15 */
1619 "CURLYM_A_fail", /* REGNODE_MAX +0x16 */
1620 "CURLYM_B", /* REGNODE_MAX +0x17 */
1621 "CURLYM_B_fail", /* REGNODE_MAX +0x18 */
1622 "IFMATCH_A", /* REGNODE_MAX +0x19 */
1623 "IFMATCH_A_fail", /* REGNODE_MAX +0x1a */
1624 "CURLY_B_min", /* REGNODE_MAX +0x1b */
1625 "CURLY_B_min_fail", /* REGNODE_MAX +0x1c */
1626 "CURLY_B_max", /* REGNODE_MAX +0x1d */
1627 "CURLY_B_max_fail", /* REGNODE_MAX +0x1e */
1628 "COMMIT_next", /* REGNODE_MAX +0x1f */
1629 "COMMIT_next_fail", /* REGNODE_MAX +0x20 */
1630 "MARKPOINT_next", /* REGNODE_MAX +0x21 */
1631 "MARKPOINT_next_fail", /* REGNODE_MAX +0x22 */
1632 "SKIP_next", /* REGNODE_MAX +0x23 */
1633 "SKIP_next_fail", /* REGNODE_MAX +0x24 */
1634 "CUTGROUP_next", /* REGNODE_MAX +0x25 */
1635 "CUTGROUP_next_fail", /* REGNODE_MAX +0x26 */
1636 "KEEPS_next", /* REGNODE_MAX +0x27 */
1637 "KEEPS_next_fail", /* REGNODE_MAX +0x28 */
1641 /* PL_reg_extflags_name[] - Opcode/state names in string form, for debugging */
1644 EXTCONST char * PL_reg_extflags_name[];
1646 EXTCONST char * const PL_reg_extflags_name[] = {
1647 /* Bits in extflags defined: 11111111111111110000111111111111 */
1648 "MULTILINE", /* 0x00000001 */
1649 "SINGLELINE", /* 0x00000002 */
1650 "FOLD", /* 0x00000004 */
1651 "EXTENDED", /* 0x00000008 */
1652 "EXTENDED_MORE", /* 0x00000010 */
1653 "NOCAPTURE", /* 0x00000020 */
1654 "KEEPCOPY", /* 0x00000040 */
1655 "CHARSET0", /* 0x00000080 : "CHARSET" - 0x00000380 */
1656 "CHARSET1", /* 0x00000100 : "CHARSET" - 0x00000380 */
1657 "CHARSET2", /* 0x00000200 : "CHARSET" - 0x00000380 */
1658 "STRICT", /* 0x00000400 */
1659 "SPLIT", /* 0x00000800 */
1660 "UNUSED_BIT_12", /* 0x00001000 */
1661 "UNUSED_BIT_13", /* 0x00002000 */
1662 "UNUSED_BIT_14", /* 0x00004000 */
1663 "UNUSED_BIT_15", /* 0x00008000 */
1664 "NO_INPLACE_SUBST", /* 0x00010000 */
1665 "EVAL_SEEN", /* 0x00020000 */
1666 "UNBOUNDED_QUANTIFIER_SEEN",/* 0x00040000 */
1667 "CHECK_ALL", /* 0x00080000 */
1668 "MATCH_UTF8", /* 0x00100000 */
1669 "USE_INTUIT_NOML", /* 0x00200000 */
1670 "USE_INTUIT_ML", /* 0x00400000 */
1671 "INTUIT_TAIL", /* 0x00800000 */
1672 "IS_ANCHORED", /* 0x01000000 */
1673 "COPY_DONE", /* 0x02000000 */
1674 "TAINTED_SEEN", /* 0x04000000 */
1675 "TAINTED", /* 0x08000000 */
1676 "START_ONLY", /* 0x10000000 */
1677 "SKIPWHITE", /* 0x20000000 */
1678 "WHITE", /* 0x40000000 */
1679 "NULL", /* 0x80000000 */
1684 # define REG_EXTFLAGS_NAME_SIZE 32
1687 /* PL_reg_intflags_name[] - Opcode/state names in string form, for debugging */
1690 EXTCONST char * PL_reg_intflags_name[];
1692 EXTCONST char * const PL_reg_intflags_name[] = {
1693 "SKIP", /* 0x00000001 - PREGf_SKIP */
1694 "IMPLICIT", /* 0x00000002 - PREGf_IMPLICIT - Converted .* to ^.* */
1695 "NAUGHTY", /* 0x00000004 - PREGf_NAUGHTY - how exponential is this pattern? */
1696 "VERBARG_SEEN", /* 0x00000008 - PREGf_VERBARG_SEEN */
1697 "CUTGROUP_SEEN", /* 0x00000010 - PREGf_CUTGROUP_SEEN */
1698 "USE_RE_EVAL", /* 0x00000020 - PREGf_USE_RE_EVAL - compiled with "use re 'eval'" */
1699 "NOSCAN", /* 0x00000040 - PREGf_NOSCAN */
1700 "GPOS_SEEN", /* 0x00000100 - PREGf_GPOS_SEEN */
1701 "GPOS_FLOAT", /* 0x00000200 - PREGf_GPOS_FLOAT */
1702 "ANCH_MBOL", /* 0x00000400 - PREGf_ANCH_MBOL */
1703 "ANCH_SBOL", /* 0x00000800 - PREGf_ANCH_SBOL */
1704 "ANCH_GPOS", /* 0x00001000 - PREGf_ANCH_GPOS */
1705 "RECURSE_SEEN", /* 0x00002000 - PREGf_RECURSE_SEEN */
1710 # define REG_INTFLAGS_NAME_SIZE 13
1713 /* The following have no fixed length. U8 so we can do strchr() on it. */
1714 #define REGNODE_VARIES(node) (PL_varies_bitmask[(node) >> 3] & (1 << ((node) & 7)))
1717 EXTCONST U8 PL_varies[] __attribute__deprecated__;
1719 EXTCONST U8 PL_varies[] __attribute__deprecated__ = {
1720 CLUMP, BRANCH, STAR, PLUS, CURLY, CURLYN, CURLYM, CURLYX, WHILEM, REF,
1721 REFF, REFFL, REFFU, REFFA, REFN, REFFN, REFFLN, REFFUN, REFFAN,
1722 BRANCHJ, SUSPEND, IFTHEN,
1728 EXTCONST U8 PL_varies_bitmask[];
1730 EXTCONST U8 PL_varies_bitmask[] = {
1731 0x00, 0x00, 0x00, 0x00, 0xC0, 0x00, 0x00, 0xE0, 0x0F, 0xFF, 0xCB, 0x00, 0x00, 0x00
1735 /* The following always have a length of 1. U8 we can do strchr() on it. */
1736 /* (Note that length 1 means "one character" under UTF8, not "one octet".) */
1737 #define REGNODE_SIMPLE(node) (PL_simple_bitmask[(node) >> 3] & (1 << ((node) & 7)))
1740 EXTCONST U8 PL_simple[] __attribute__deprecated__;
1742 EXTCONST U8 PL_simple[] __attribute__deprecated__ = {
1743 REG_ANY, SANY, ANYOF, ANYOFD, ANYOFL, ANYOFPOSIXL, ANYOFH, ANYOFHb,
1744 ANYOFHr, ANYOFHs, ANYOFR, ANYOFRb, ANYOFM, NANYOFM, POSIXD, POSIXL,
1745 POSIXU, POSIXA, NPOSIXD, NPOSIXL, NPOSIXU, NPOSIXA, REGEX_SET,
1751 EXTCONST U8 PL_simple_bitmask[];
1753 EXTCONST U8 PL_simple_bitmask[] = {
1754 0x00, 0x00, 0xFF, 0xFF, 0x3F, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x20
1758 /* Is 'op', known to be of type EXACT, folding? */
1759 #define isEXACTFish(op) (__ASSERT_(PL_regkind[op] == EXACT) (PL_EXACTFish_bitmask & (1U << (op - EXACT))))
1761 /* Do only UTF-8 target strings match 'op', known to be of type EXACT? */
1762 #define isEXACT_REQ8(op) (__ASSERT_(PL_regkind[op] == EXACT) (PL_EXACT_REQ8_bitmask & (1U << (op - EXACT))))
1765 EXTCONST U32 PL_EXACTFish_bitmask;
1766 EXTCONST U32 PL_EXACT_REQ8_bitmask;
1768 EXTCONST U32 PL_EXACTFish_bitmask = 0x33F8;
1769 EXTCONST U32 PL_EXACT_REQ8_bitmask = 0x1E00;
1772 #endif /* defined(PERL_CORE) || defined(PERL_EXT_RE_BUILD) */