This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
make experimental.pm test agnostic about switch
[perl5.git] / opcode.h
CommitLineData
37442d52
RGS
1/* -*- buffer-read-only: t -*-
2 *
d6376244
JH
3 * opcode.h
4 *
78102347
NC
5 * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001,
6 * 2002, 2003, 2004, 2005, 2006, 2007 by Larry Wall and others
d6376244
JH
7 *
8 * You may distribute under the terms of either the GNU General Public
9 * License or the Artistic License, as specified in the README file.
10 *
11 * !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
78102347
NC
12 * This file is built by regen/opcode.pl from its data.
13 * Any changes made here will be lost!
d6376244 14 */
a27f85b3 15
27da23d5
JH
16#ifndef PERL_GLOBAL_STRUCT_INIT
17
9561d06f
NC
18#define Perl_pp_scalar Perl_pp_null
19#define Perl_pp_padany Perl_unimplemented_op
20#define Perl_pp_regcmaybe Perl_pp_null
bfa14884 21#define Perl_pp_transr Perl_pp_trans
9561d06f
NC
22#define Perl_pp_chomp Perl_pp_chop
23#define Perl_pp_schomp Perl_pp_schop
864dbfa3 24#define Perl_pp_i_preinc Perl_pp_preinc
4c2c3128 25#define Perl_pp_i_predec Perl_pp_predec
864dbfa3 26#define Perl_pp_i_postinc Perl_pp_postinc
20e96431 27#define Perl_pp_i_postdec Perl_pp_postdec
9561d06f
NC
28#define Perl_pp_slt Perl_pp_sle
29#define Perl_pp_sgt Perl_pp_sle
30#define Perl_pp_sge Perl_pp_sle
31#define Perl_pp_bit_xor Perl_pp_bit_or
5d01050a
FC
32#define Perl_pp_nbit_xor Perl_pp_nbit_or
33#define Perl_pp_sbit_xor Perl_pp_sbit_or
9561d06f
NC
34#define Perl_pp_cos Perl_pp_sin
35#define Perl_pp_exp Perl_pp_sin
36#define Perl_pp_log Perl_pp_sin
37#define Perl_pp_sqrt Perl_pp_sin
38#define Perl_pp_hex Perl_pp_oct
39#define Perl_pp_rindex Perl_pp_index
40#define Perl_pp_lcfirst Perl_pp_ucfirst
bfa14884 41#define Perl_pp_aelemfast_lex Perl_pp_aelemfast
9561d06f
NC
42#define Perl_pp_avalues Perl_pp_akeys
43#define Perl_pp_values Perl_do_kv
44#define Perl_pp_keys Perl_do_kv
45#define Perl_pp_rv2hv Perl_pp_rv2av
46#define Perl_pp_pop Perl_pp_shift
21b66d1c 47#define Perl_pp_mapstart Perl_pp_grepstart
9561d06f
NC
48#define Perl_pp_dor Perl_pp_defined
49#define Perl_pp_andassign Perl_pp_and
50#define Perl_pp_orassign Perl_pp_or
51#define Perl_pp_dorassign Perl_pp_defined
52#define Perl_pp_lineseq Perl_pp_null
53#define Perl_pp_scope Perl_pp_null
54#define Perl_pp_dump Perl_pp_goto
55#define Perl_pp_dbmclose Perl_pp_untie
56#define Perl_pp_read Perl_pp_sysread
57#define Perl_pp_say Perl_pp_print
9561d06f
NC
58#define Perl_pp_seek Perl_pp_sysseek
59#define Perl_pp_fcntl Perl_pp_ioctl
7627e6d0 60#ifdef HAS_SOCKET
60504e18 61#define Perl_pp_send Perl_pp_syswrite
9561d06f 62#define Perl_pp_recv Perl_pp_sysread
7627e6d0
NC
63#else
64#define Perl_pp_send Perl_unimplemented_op
65#define Perl_pp_recv Perl_unimplemented_op
66#define Perl_pp_socket Perl_unimplemented_op
67#endif
68#ifdef HAS_SOCKET
9561d06f
NC
69#define Perl_pp_connect Perl_pp_bind
70#define Perl_pp_gsockopt Perl_pp_ssockopt
71#define Perl_pp_getsockname Perl_pp_getpeername
7627e6d0
NC
72#else
73#define Perl_pp_bind Perl_unimplemented_op
74#define Perl_pp_connect Perl_unimplemented_op
75#define Perl_pp_listen Perl_unimplemented_op
76#define Perl_pp_accept Perl_unimplemented_op
77#define Perl_pp_shutdown Perl_unimplemented_op
78#define Perl_pp_gsockopt Perl_unimplemented_op
79#define Perl_pp_ssockopt Perl_unimplemented_op
80#define Perl_pp_getsockname Perl_unimplemented_op
81#define Perl_pp_getpeername Perl_unimplemented_op
82#endif
9561d06f
NC
83#define Perl_pp_lstat Perl_pp_stat
84#define Perl_pp_ftrwrite Perl_pp_ftrread
85#define Perl_pp_ftrexec Perl_pp_ftrread
86#define Perl_pp_fteread Perl_pp_ftrread
87#define Perl_pp_ftewrite Perl_pp_ftrread
88#define Perl_pp_fteexec Perl_pp_ftrread
89#define Perl_pp_ftsize Perl_pp_ftis
90#define Perl_pp_ftmtime Perl_pp_ftis
91#define Perl_pp_ftatime Perl_pp_ftis
92#define Perl_pp_ftctime Perl_pp_ftis
93#define Perl_pp_fteowned Perl_pp_ftrowned
94#define Perl_pp_ftzero Perl_pp_ftrowned
95#define Perl_pp_ftsock Perl_pp_ftrowned
96#define Perl_pp_ftchr Perl_pp_ftrowned
97#define Perl_pp_ftblk Perl_pp_ftrowned
98#define Perl_pp_ftfile Perl_pp_ftrowned
99#define Perl_pp_ftdir Perl_pp_ftrowned
100#define Perl_pp_ftpipe Perl_pp_ftrowned
101#define Perl_pp_ftsuid Perl_pp_ftrowned
102#define Perl_pp_ftsgid Perl_pp_ftrowned
103#define Perl_pp_ftsvtx Perl_pp_ftrowned
104#define Perl_pp_ftbinary Perl_pp_fttext
105#define Perl_pp_unlink Perl_pp_chown
106#define Perl_pp_chmod Perl_pp_chown
107#define Perl_pp_utime Perl_pp_chown
108#define Perl_pp_symlink Perl_pp_link
109#define Perl_pp_kill Perl_pp_chown
110#define Perl_pp_localtime Perl_pp_gmtime
111#define Perl_pp_shmget Perl_pp_semget
112#define Perl_pp_shmctl Perl_pp_semctl
113#define Perl_pp_shmread Perl_pp_shmwrite
114#define Perl_pp_msgget Perl_pp_semget
115#define Perl_pp_msgctl Perl_pp_semctl
116#define Perl_pp_msgsnd Perl_pp_shmwrite
117#define Perl_pp_msgrcv Perl_pp_shmwrite
118#define Perl_pp_semop Perl_pp_shmwrite
119#define Perl_pp_dofile Perl_pp_require
120#define Perl_pp_ghbyname Perl_pp_ghostent
121#define Perl_pp_ghbyaddr Perl_pp_ghostent
122#define Perl_pp_gnbyname Perl_pp_gnetent
123#define Perl_pp_gnbyaddr Perl_pp_gnetent
124#define Perl_pp_gpbyname Perl_pp_gprotoent
125#define Perl_pp_gpbynumber Perl_pp_gprotoent
126#define Perl_pp_gsbyname Perl_pp_gservent
127#define Perl_pp_gsbyport Perl_pp_gservent
396166e1
NC
128#define Perl_pp_snetent Perl_pp_shostent
129#define Perl_pp_sprotoent Perl_pp_shostent
130#define Perl_pp_sservent Perl_pp_shostent
d8ef1fcd
NC
131#define Perl_pp_enetent Perl_pp_ehostent
132#define Perl_pp_eprotoent Perl_pp_ehostent
133#define Perl_pp_eservent Perl_pp_ehostent
9561d06f
NC
134#define Perl_pp_gpwnam Perl_pp_gpwent
135#define Perl_pp_gpwuid Perl_pp_gpwent
720d5dbf
NC
136#define Perl_pp_spwent Perl_pp_ehostent
137#define Perl_pp_epwent Perl_pp_ehostent
9561d06f
NC
138#define Perl_pp_ggrnam Perl_pp_ggrent
139#define Perl_pp_ggrgid Perl_pp_ggrent
720d5dbf
NC
140#define Perl_pp_sgrent Perl_pp_ehostent
141#define Perl_pp_egrent Perl_pp_ehostent
9561d06f 142#define Perl_pp_custom Perl_unimplemented_op
73c4f7a1
GS
143START_EXTERN_C
144
79072805 145#ifndef DOINIT
27da23d5 146EXTCONST char* const PL_op_name[];
79072805 147#else
27da23d5 148EXTCONST char* const PL_op_name[] = {
c07a80fd
PP
149 "null",
150 "stub",
151 "scalar",
152 "pushmark",
153 "wantarray",
154 "const",
155 "gvsv",
156 "gv",
157 "gelem",
158 "padsv",
159 "padav",
160 "padhv",
161 "padany",
c07a80fd
PP
162 "rv2gv",
163 "rv2sv",
164 "av2arylen",
165 "rv2cv",
166 "anoncode",
167 "prototype",
168 "refgen",
169 "srefgen",
170 "ref",
171 "bless",
172 "backtick",
173 "glob",
174 "readline",
175 "rcatline",
176 "regcmaybe",
2cd61cdb 177 "regcreset",
c07a80fd
PP
178 "regcomp",
179 "match",
8782bef2 180 "qr",
c07a80fd
PP
181 "subst",
182 "substcont",
183 "trans",
bfa14884 184 "transr",
c07a80fd
PP
185 "sassign",
186 "aassign",
187 "chop",
188 "schop",
189 "chomp",
190 "schomp",
191 "defined",
192 "undef",
193 "study",
194 "pos",
195 "preinc",
196 "i_preinc",
197 "predec",
198 "i_predec",
199 "postinc",
200 "i_postinc",
201 "postdec",
202 "i_postdec",
203 "pow",
204 "multiply",
205 "i_multiply",
206 "divide",
207 "i_divide",
208 "modulo",
209 "i_modulo",
210 "repeat",
211 "add",
212 "i_add",
213 "subtract",
214 "i_subtract",
215 "concat",
e839e6ed 216 "multiconcat",
c07a80fd
PP
217 "stringify",
218 "left_shift",
219 "right_shift",
220 "lt",
221 "i_lt",
222 "gt",
223 "i_gt",
224 "le",
225 "i_le",
226 "ge",
227 "i_ge",
228 "eq",
229 "i_eq",
230 "ne",
231 "i_ne",
232 "ncmp",
233 "i_ncmp",
234 "slt",
235 "sgt",
236 "sle",
237 "sge",
238 "seq",
239 "sne",
240 "scmp",
241 "bit_and",
242 "bit_xor",
243 "bit_or",
5d01050a
FC
244 "nbit_and",
245 "nbit_xor",
246 "nbit_or",
247 "sbit_and",
248 "sbit_xor",
249 "sbit_or",
c07a80fd
PP
250 "negate",
251 "i_negate",
252 "not",
253 "complement",
5d01050a
FC
254 "ncomplement",
255 "scomplement",
fdecdb95 256 "smartmatch",
c07a80fd
PP
257 "atan2",
258 "sin",
259 "cos",
260 "rand",
261 "srand",
262 "exp",
263 "log",
264 "sqrt",
265 "int",
266 "hex",
267 "oct",
268 "abs",
269 "length",
270 "substr",
271 "vec",
272 "index",
273 "rindex",
274 "sprintf",
275 "formline",
276 "ord",
277 "chr",
278 "crypt",
279 "ucfirst",
280 "lcfirst",
281 "uc",
282 "lc",
283 "quotemeta",
284 "rv2av",
285 "aelemfast",
bfa14884 286 "aelemfast_lex",
c07a80fd
PP
287 "aelem",
288 "aslice",
6dd3e0f2 289 "kvaslice",
878d132a 290 "aeach",
878d132a 291 "avalues",
d88ca568 292 "akeys",
c07a80fd
PP
293 "each",
294 "values",
295 "keys",
296 "delete",
297 "exists",
298 "rv2hv",
299 "helem",
300 "hslice",
5cae3edb 301 "kvhslice",
fedf30e1 302 "multideref",
c07a80fd
PP
303 "unpack",
304 "pack",
305 "split",
306 "join",
307 "list",
308 "lslice",
309 "anonlist",
310 "anonhash",
311 "splice",
312 "push",
313 "pop",
314 "shift",
315 "unshift",
316 "sort",
317 "reverse",
318 "grepstart",
319 "grepwhile",
320 "mapstart",
321 "mapwhile",
322 "range",
323 "flip",
324 "flop",
325 "and",
326 "or",
327 "xor",
fdecdb95 328 "dor",
c07a80fd
PP
329 "cond_expr",
330 "andassign",
331 "orassign",
fdecdb95 332 "dorassign",
c07a80fd
PP
333 "entersub",
334 "leavesub",
cd06dffe 335 "leavesublv",
4fa06845
DM
336 "argcheck",
337 "argelem",
338 "argdefelem",
c07a80fd
PP
339 "caller",
340 "warn",
341 "die",
342 "reset",
343 "lineseq",
344 "nextstate",
345 "dbstate",
346 "unstack",
347 "enter",
348 "leave",
349 "scope",
350 "enteriter",
351 "iter",
352 "enterloop",
353 "leaveloop",
354 "return",
355 "last",
356 "next",
357 "redo",
358 "dump",
359 "goto",
360 "exit",
f961b1eb 361 "method",
fdecdb95 362 "method_named",
7d6c333c 363 "method_super",
810bd8b7 364 "method_redir",
365 "method_redir_super",
fdecdb95 366 "entergiven",
15e4ac9a
Z
367 "enterwhereso",
368 "leavewhereso",
fdecdb95 369 "continue",
c07a80fd
PP
370 "open",
371 "close",
372 "pipe_op",
373 "fileno",
374 "umask",
375 "binmode",
376 "tie",
377 "untie",
378 "tied",
379 "dbmopen",
380 "dbmclose",
381 "sselect",
382 "select",
383 "getc",
384 "read",
385 "enterwrite",
386 "leavewrite",
387 "prtf",
388 "print",
fdecdb95 389 "say",
c07a80fd 390 "sysopen",
137443ea 391 "sysseek",
c07a80fd
PP
392 "sysread",
393 "syswrite",
c07a80fd
PP
394 "eof",
395 "tell",
396 "seek",
397 "truncate",
398 "fcntl",
399 "ioctl",
400 "flock",
e71197e2
JC
401 "send",
402 "recv",
c07a80fd
PP
403 "socket",
404 "sockpair",
405 "bind",
406 "connect",
407 "listen",
408 "accept",
409 "shutdown",
410 "gsockopt",
411 "ssockopt",
412 "getsockname",
413 "getpeername",
414 "lstat",
415 "stat",
416 "ftrread",
417 "ftrwrite",
418 "ftrexec",
419 "fteread",
420 "ftewrite",
421 "fteexec",
422 "ftis",
c07a80fd
PP
423 "ftsize",
424 "ftmtime",
425 "ftatime",
426 "ftctime",
7834bb7e
NC
427 "ftrowned",
428 "fteowned",
429 "ftzero",
c07a80fd
PP
430 "ftsock",
431 "ftchr",
432 "ftblk",
433 "ftfile",
434 "ftdir",
435 "ftpipe",
c07a80fd
PP
436 "ftsuid",
437 "ftsgid",
438 "ftsvtx",
7834bb7e 439 "ftlink",
c07a80fd
PP
440 "fttty",
441 "fttext",
442 "ftbinary",
443 "chdir",
444 "chown",
445 "chroot",
446 "unlink",
447 "chmod",
448 "utime",
449 "rename",
450 "link",
451 "symlink",
452 "readlink",
453 "mkdir",
454 "rmdir",
455 "open_dir",
456 "readdir",
457 "telldir",
458 "seekdir",
459 "rewinddir",
460 "closedir",
461 "fork",
462 "wait",
463 "waitpid",
464 "system",
465 "exec",
466 "kill",
467 "getppid",
468 "getpgrp",
469 "setpgrp",
470 "getpriority",
471 "setpriority",
472 "time",
473 "tms",
474 "localtime",
475 "gmtime",
476 "alarm",
477 "sleep",
478 "shmget",
479 "shmctl",
480 "shmread",
481 "shmwrite",
482 "msgget",
483 "msgctl",
484 "msgsnd",
485 "msgrcv",
7834bb7e 486 "semop",
c07a80fd
PP
487 "semget",
488 "semctl",
c07a80fd
PP
489 "require",
490 "dofile",
996c9baa 491 "hintseval",
c07a80fd
PP
492 "entereval",
493 "leaveeval",
494 "entertry",
495 "leavetry",
496 "ghbyname",
497 "ghbyaddr",
498 "ghostent",
499 "gnbyname",
500 "gnbyaddr",
501 "gnetent",
502 "gpbyname",
503 "gpbynumber",
504 "gprotoent",
505 "gsbyname",
506 "gsbyport",
507 "gservent",
508 "shostent",
509 "snetent",
510 "sprotoent",
511 "sservent",
512 "ehostent",
513 "enetent",
514 "eprotoent",
515 "eservent",
516 "gpwnam",
517 "gpwuid",
518 "gpwent",
519 "spwent",
520 "epwent",
521 "ggrnam",
522 "ggrgid",
523 "ggrent",
524 "sgrent",
525 "egrent",
526 "getlogin",
527 "syscall",
c0329465 528 "lock",
c5917253 529 "once",
438c221d 530 "custom",
deb8a388 531 "coreargs",
88101882 532 "avhvswitch",
84ed0108 533 "runcv",
838f2281 534 "fc",
ac217057 535 "padcv",
ecf9c8b7 536 "introcv",
13f89586 537 "clonecv",
a7fd8ef6 538 "padrange",
254da51f 539 "refassign",
4c5bab50 540 "lvref",
16b99412 541 "lvrefslice",
2882b3ff 542 "lvavref",
b77472f9 543 "anonconst",
a33a81d0 544 "freed",
c07a80fd
PP
545};
546#endif
547
548#ifndef DOINIT
27da23d5 549EXTCONST char* const PL_op_desc[];
c07a80fd 550#else
27da23d5 551EXTCONST char* const PL_op_desc[] = {
79072805 552 "null operation",
93a17b20
LW
553 "stub",
554 "scalar",
79072805
LW
555 "pushmark",
556 "wantarray",
79072805 557 "constant item",
79072805
LW
558 "scalar variable",
559 "glob value",
c07a80fd 560 "glob elem",
93a17b20
LW
561 "private variable",
562 "private array",
563 "private hash",
f1612b5c 564 "private value",
79072805 565 "ref-to-glob cast",
b89fed5f 566 "scalar dereference",
79072805 567 "array length",
b89fed5f 568 "subroutine dereference",
a0d0e21e 569 "anonymous subroutine",
c07a80fd 570 "subroutine prototype",
8990e307 571 "reference constructor",
dfa0f641 572 "single ref constructor",
79072805
LW
573 "reference-type operator",
574 "bless",
b3f4d674 575 "quoted execution (``, qx)",
79072805
LW
576 "glob",
577 "<HANDLE>",
578 "append I/O operator",
f1612b5c
GS
579 "regexp internal guard",
580 "regexp internal reset",
79072805 581 "regexp compilation",
42d38218
MS
582 "pattern match (m//)",
583 "pattern quote (qr//)",
584 "substitution (s///)",
f1612b5c
GS
585 "substitution iterator",
586 "transliteration (tr///)",
bfa14884 587 "transliteration (tr///)",
79072805
LW
588 "scalar assignment",
589 "list assignment",
79072805 590 "chop",
a0d0e21e 591 "scalar chop",
f1612b5c
GS
592 "chomp",
593 "scalar chomp",
79072805
LW
594 "defined operator",
595 "undef operator",
596 "study",
a0d0e21e 597 "match position",
42d38218
MS
598 "preincrement (++)",
599 "integer preincrement (++)",
600 "predecrement (--)",
601 "integer predecrement (--)",
602 "postincrement (++)",
603 "integer postincrement (++)",
604 "postdecrement (--)",
605 "integer postdecrement (--)",
606 "exponentiation (**)",
607 "multiplication (*)",
608 "integer multiplication (*)",
609 "division (/)",
610 "integer division (/)",
611 "modulus (%)",
612 "integer modulus (%)",
613 "repeat (x)",
614 "addition (+)",
615 "integer addition (+)",
616 "subtraction (-)",
617 "integer subtraction (-)",
297b36dc 618 "concatenation (.) or string",
e839e6ed 619 "concatenation (.) or string",
a0d0e21e 620 "string",
42d38218
MS
621 "left bitshift (<<)",
622 "right bitshift (>>)",
623 "numeric lt (<)",
624 "integer lt (<)",
625 "numeric gt (>)",
626 "integer gt (>)",
627 "numeric le (<=)",
628 "integer le (<=)",
629 "numeric ge (>=)",
630 "integer ge (>=)",
631 "numeric eq (==)",
632 "integer eq (==)",
633 "numeric ne (!=)",
634 "integer ne (!=)",
635 "numeric comparison (<=>)",
636 "integer comparison (<=>)",
79072805
LW
637 "string lt",
638 "string gt",
639 "string le",
640 "string ge",
641 "string eq",
642 "string ne",
42d38218
MS
643 "string comparison (cmp)",
644 "bitwise and (&)",
645 "bitwise xor (^)",
646 "bitwise or (|)",
5cb51e4d 647 "numeric bitwise and (&)",
5d01050a
FC
648 "numeric bitwise xor (^)",
649 "numeric bitwise or (|)",
118a40c4
FC
650 "string bitwise and (&.)",
651 "string bitwise xor (^.)",
652 "string bitwise or (|.)",
f1612b5c
GS
653 "negation (-)",
654 "integer negation (-)",
79072805 655 "not",
42d38218 656 "1's complement (~)",
5d01050a
FC
657 "numeric 1's complement (~)",
658 "string 1's complement (~)",
fdecdb95 659 "smart match",
79072805
LW
660 "atan2",
661 "sin",
662 "cos",
663 "rand",
664 "srand",
665 "exp",
666 "log",
667 "sqrt",
668 "int",
669 "hex",
670 "oct",
463ee0b2 671 "abs",
79072805
LW
672 "length",
673 "substr",
674 "vec",
675 "index",
676 "rindex",
677 "sprintf",
678 "formline",
679 "ord",
463ee0b2 680 "chr",
79072805 681 "crypt",
42d38218
MS
682 "ucfirst",
683 "lcfirst",
684 "uc",
685 "lc",
686 "quotemeta",
f1612b5c
GS
687 "array dereference",
688 "constant array element",
bfa14884 689 "constant lexical array element",
79072805
LW
690 "array element",
691 "array slice",
6dd3e0f2 692 "index/value array slice",
878d132a 693 "each on array",
878d132a 694 "values on array",
d88ca568 695 "keys on array",
79072805
LW
696 "each",
697 "values",
698 "keys",
699 "delete",
42d38218 700 "exists",
f1612b5c
GS
701 "hash dereference",
702 "hash element",
aa689395 703 "hash slice",
5cae3edb 704 "key/value hash slice",
fedf30e1 705 "array or hash lookup",
79072805
LW
706 "unpack",
707 "pack",
708 "split",
297b36dc 709 "join or string",
79072805
LW
710 "list",
711 "list slice",
26321c2d 712 "anonymous array ([])",
42d38218 713 "anonymous hash ({})",
79072805
LW
714 "splice",
715 "push",
716 "pop",
717 "shift",
718 "unshift",
719 "sort",
720 "reverse",
721 "grep",
722 "grep iterator",
a0d0e21e
LW
723 "map",
724 "map iterator",
79072805
LW
725 "flipflop",
726 "range (or flip)",
727 "range (or flop)",
42d38218
MS
728 "logical and (&&)",
729 "logical or (||)",
a0d0e21e 730 "logical xor",
fdecdb95 731 "defined or (//)",
f1612b5c 732 "conditional expression",
42d38218
MS
733 "logical and assignment (&&=)",
734 "logical or assignment (||=)",
fdecdb95 735 "defined or assignment (//=)",
79072805
LW
736 "subroutine entry",
737 "subroutine exit",
78f9721b 738 "lvalue subroutine return",
4fa06845
DM
739 "check subroutine arguments",
740 "subroutine argument",
741 "subroutine argument default value",
79072805
LW
742 "caller",
743 "warn",
744 "die",
f1612b5c 745 "symbol reset",
79072805
LW
746 "line sequence",
747 "next statement",
93a17b20 748 "debug next statement",
e9c54c90 749 "iteration finalizer",
79072805
LW
750 "block entry",
751 "block exit",
463ee0b2 752 "block",
79072805
LW
753 "foreach loop entry",
754 "foreach loop iterator",
755 "loop entry",
756 "loop exit",
757 "return",
758 "last",
759 "next",
760 "redo",
761 "dump",
762 "goto",
763 "exit",
f961b1eb 764 "method lookup",
fdecdb95 765 "method with known name",
7d6c333c 766 "super with known name",
810bd8b7 767 "redirect method with known name",
768 "redirect super method with known name",
fdecdb95 769 "given()",
284a3526
Z
770 "whereso()",
771 "leave whereso block",
fdecdb95 772 "continue",
79072805
LW
773 "open",
774 "close",
775 "pipe",
776 "fileno",
777 "umask",
778 "binmode",
463ee0b2
LW
779 "tie",
780 "untie",
c07a80fd 781 "tied",
79072805
LW
782 "dbmopen",
783 "dbmclose",
784 "select system call",
785 "select",
786 "getc",
787 "read",
788 "write",
789 "write exit",
463ee0b2 790 "printf",
79072805 791 "print",
fdecdb95 792 "say",
c07a80fd 793 "sysopen",
137443ea 794 "sysseek",
79072805
LW
795 "sysread",
796 "syswrite",
79072805
LW
797 "eof",
798 "tell",
799 "seek",
800 "truncate",
801 "fcntl",
802 "ioctl",
803 "flock",
e71197e2
JC
804 "send",
805 "recv",
79072805
LW
806 "socket",
807 "socketpair",
808 "bind",
809 "connect",
810 "listen",
811 "accept",
812 "shutdown",
813 "getsockopt",
814 "setsockopt",
815 "getsockname",
816 "getpeername",
817 "lstat",
818 "stat",
819 "-R",
820 "-W",
821 "-X",
822 "-r",
823 "-w",
824 "-x",
825 "-e",
79072805
LW
826 "-s",
827 "-M",
828 "-A",
829 "-C",
7834bb7e
NC
830 "-O",
831 "-o",
832 "-z",
79072805
LW
833 "-S",
834 "-c",
835 "-b",
836 "-f",
837 "-d",
838 "-p",
79072805
LW
839 "-u",
840 "-g",
841 "-k",
7834bb7e 842 "-l",
79072805
LW
843 "-t",
844 "-T",
845 "-B",
846 "chdir",
847 "chown",
848 "chroot",
849 "unlink",
850 "chmod",
851 "utime",
852 "rename",
853 "link",
854 "symlink",
855 "readlink",
856 "mkdir",
857 "rmdir",
858 "opendir",
859 "readdir",
860 "telldir",
861 "seekdir",
862 "rewinddir",
863 "closedir",
864 "fork",
865 "wait",
866 "waitpid",
867 "system",
868 "exec",
869 "kill",
870 "getppid",
871 "getpgrp",
872 "setpgrp",
873 "getpriority",
874 "setpriority",
875 "time",
876 "times",
877 "localtime",
878 "gmtime",
879 "alarm",
880 "sleep",
881 "shmget",
882 "shmctl",
883 "shmread",
884 "shmwrite",
885 "msgget",
886 "msgctl",
887 "msgsnd",
888 "msgrcv",
7834bb7e 889 "semop",
79072805
LW
890 "semget",
891 "semctl",
79072805 892 "require",
b3f4d674 893 "do \"file\"",
996c9baa 894 "eval hints",
b3f4d674
GS
895 "eval \"string\"",
896 "eval \"string\" exit",
42d38218 897 "eval {block}",
f1612b5c 898 "eval {block} exit",
79072805
LW
899 "gethostbyname",
900 "gethostbyaddr",
901 "gethostent",
902 "getnetbyname",
903 "getnetbyaddr",
904 "getnetent",
905 "getprotobyname",
906 "getprotobynumber",
907 "getprotoent",
908 "getservbyname",
909 "getservbyport",
910 "getservent",
911 "sethostent",
912 "setnetent",
913 "setprotoent",
914 "setservent",
915 "endhostent",
916 "endnetent",
917 "endprotoent",
918 "endservent",
919 "getpwnam",
920 "getpwuid",
921 "getpwent",
922 "setpwent",
923 "endpwent",
924 "getgrnam",
925 "getgrgid",
926 "getgrent",
927 "setgrent",
928 "endgrent",
929 "getlogin",
930 "syscall",
c0329465 931 "lock",
c5917253 932 "once",
438c221d 933 "unknown custom operator",
deb8a388 934 "CORE:: subroutine",
88101882 935 "Array/hash switch",
84ed0108 936 "__SUB__",
838f2281 937 "fc",
ac217057 938 "private subroutine",
ecf9c8b7 939 "private subroutine",
13f89586 940 "private subroutine",
a7fd8ef6 941 "list of private variables",
254da51f 942 "lvalue ref assignment",
4c5bab50 943 "lvalue ref assignment",
16b99412 944 "lvalue ref assignment",
2882b3ff 945 "lvalue array reference",
b77472f9 946 "anonymous constant",
a33a81d0 947 "freed op",
79072805
LW
948};
949#endif
950
73c4f7a1
GS
951END_EXTERN_C
952
27da23d5
JH
953#endif /* !PERL_GLOBAL_STRUCT_INIT */
954
73c4f7a1
GS
955START_EXTERN_C
956
27da23d5 957#ifdef PERL_GLOBAL_STRUCT_INIT
97aff369 958# define PERL_PPADDR_INITED
27da23d5 959static const Perl_ppaddr_t Gppaddr[]
0000db22
AC
960#elif !defined(PERL_GLOBAL_STRUCT)
961# define PERL_PPADDR_INITED
27da23d5 962EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
27da23d5
JH
963#endif /* PERL_GLOBAL_STRUCT */
964#if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
97aff369 965# define PERL_PPADDR_INITED
27da23d5 966= {
ef69c8fc
BM
967 Perl_pp_null,
968 Perl_pp_stub,
6f3ed336 969 Perl_pp_scalar, /* implemented by Perl_pp_null */
ef69c8fc
BM
970 Perl_pp_pushmark,
971 Perl_pp_wantarray,
972 Perl_pp_const,
973 Perl_pp_gvsv,
974 Perl_pp_gv,
975 Perl_pp_gelem,
976 Perl_pp_padsv,
977 Perl_pp_padav,
978 Perl_pp_padhv,
6f3ed336 979 Perl_pp_padany, /* implemented by Perl_unimplemented_op */
ef69c8fc
BM
980 Perl_pp_rv2gv,
981 Perl_pp_rv2sv,
982 Perl_pp_av2arylen,
983 Perl_pp_rv2cv,
984 Perl_pp_anoncode,
985 Perl_pp_prototype,
986 Perl_pp_refgen,
987 Perl_pp_srefgen,
988 Perl_pp_ref,
989 Perl_pp_bless,
990 Perl_pp_backtick,
991 Perl_pp_glob,
992 Perl_pp_readline,
993 Perl_pp_rcatline,
6f3ed336 994 Perl_pp_regcmaybe, /* implemented by Perl_pp_null */
ef69c8fc
BM
995 Perl_pp_regcreset,
996 Perl_pp_regcomp,
997 Perl_pp_match,
998 Perl_pp_qr,
999 Perl_pp_subst,
1000 Perl_pp_substcont,
9561d06f 1001 Perl_pp_trans,
bfa14884 1002 Perl_pp_transr, /* implemented by Perl_pp_trans */
ef69c8fc
BM
1003 Perl_pp_sassign,
1004 Perl_pp_aassign,
9561d06f
NC
1005 Perl_pp_chop,
1006 Perl_pp_schop,
6f3ed336
NC
1007 Perl_pp_chomp, /* implemented by Perl_pp_chop */
1008 Perl_pp_schomp, /* implemented by Perl_pp_schop */
ef69c8fc
BM
1009 Perl_pp_defined,
1010 Perl_pp_undef,
1011 Perl_pp_study,
1012 Perl_pp_pos,
1013 Perl_pp_preinc,
6f3ed336 1014 Perl_pp_i_preinc, /* implemented by Perl_pp_preinc */
4c2c3128
DM
1015 Perl_pp_predec,
1016 Perl_pp_i_predec, /* implemented by Perl_pp_predec */
ef69c8fc 1017 Perl_pp_postinc,
6f3ed336 1018 Perl_pp_i_postinc, /* implemented by Perl_pp_postinc */
20e96431
DM
1019 Perl_pp_postdec,
1020 Perl_pp_i_postdec, /* implemented by Perl_pp_postdec */
ef69c8fc
BM
1021 Perl_pp_pow,
1022 Perl_pp_multiply,
1023 Perl_pp_i_multiply,
1024 Perl_pp_divide,
1025 Perl_pp_i_divide,
1026 Perl_pp_modulo,
1027 Perl_pp_i_modulo,
1028 Perl_pp_repeat,
1029 Perl_pp_add,
1030 Perl_pp_i_add,
1031 Perl_pp_subtract,
1032 Perl_pp_i_subtract,
1033 Perl_pp_concat,
e839e6ed 1034 Perl_pp_multiconcat,
ef69c8fc
BM
1035 Perl_pp_stringify,
1036 Perl_pp_left_shift,
1037 Perl_pp_right_shift,
1038 Perl_pp_lt,
1039 Perl_pp_i_lt,
1040 Perl_pp_gt,
1041 Perl_pp_i_gt,
1042 Perl_pp_le,
1043 Perl_pp_i_le,
1044 Perl_pp_ge,
1045 Perl_pp_i_ge,
1046 Perl_pp_eq,
1047 Perl_pp_i_eq,
1048 Perl_pp_ne,
1049 Perl_pp_i_ne,
1050 Perl_pp_ncmp,
1051 Perl_pp_i_ncmp,
6f3ed336
NC
1052 Perl_pp_slt, /* implemented by Perl_pp_sle */
1053 Perl_pp_sgt, /* implemented by Perl_pp_sle */
ef69c8fc 1054 Perl_pp_sle,
6f3ed336 1055 Perl_pp_sge, /* implemented by Perl_pp_sle */
ef69c8fc
BM
1056 Perl_pp_seq,
1057 Perl_pp_sne,
1058 Perl_pp_scmp,
1059 Perl_pp_bit_and,
6f3ed336 1060 Perl_pp_bit_xor, /* implemented by Perl_pp_bit_or */
ef69c8fc 1061 Perl_pp_bit_or,
5d01050a
FC
1062 Perl_pp_nbit_and,
1063 Perl_pp_nbit_xor, /* implemented by Perl_pp_nbit_or */
1064 Perl_pp_nbit_or,
1065 Perl_pp_sbit_and,
1066 Perl_pp_sbit_xor, /* implemented by Perl_pp_sbit_or */
1067 Perl_pp_sbit_or,
ef69c8fc
BM
1068 Perl_pp_negate,
1069 Perl_pp_i_negate,
1070 Perl_pp_not,
1071 Perl_pp_complement,
5d01050a
FC
1072 Perl_pp_ncomplement,
1073 Perl_pp_scomplement,
ef69c8fc
BM
1074 Perl_pp_smartmatch,
1075 Perl_pp_atan2,
1076 Perl_pp_sin,
6f3ed336 1077 Perl_pp_cos, /* implemented by Perl_pp_sin */
ef69c8fc
BM
1078 Perl_pp_rand,
1079 Perl_pp_srand,
6f3ed336
NC
1080 Perl_pp_exp, /* implemented by Perl_pp_sin */
1081 Perl_pp_log, /* implemented by Perl_pp_sin */
1082 Perl_pp_sqrt, /* implemented by Perl_pp_sin */
ef69c8fc 1083 Perl_pp_int,
6f3ed336 1084 Perl_pp_hex, /* implemented by Perl_pp_oct */
ef69c8fc
BM
1085 Perl_pp_oct,
1086 Perl_pp_abs,
1087 Perl_pp_length,
1088 Perl_pp_substr,
1089 Perl_pp_vec,
1090 Perl_pp_index,
6f3ed336 1091 Perl_pp_rindex, /* implemented by Perl_pp_index */
ef69c8fc
BM
1092 Perl_pp_sprintf,
1093 Perl_pp_formline,
1094 Perl_pp_ord,
1095 Perl_pp_chr,
1096 Perl_pp_crypt,
1097 Perl_pp_ucfirst,
6f3ed336 1098 Perl_pp_lcfirst, /* implemented by Perl_pp_ucfirst */
ef69c8fc
BM
1099 Perl_pp_uc,
1100 Perl_pp_lc,
1101 Perl_pp_quotemeta,
1102 Perl_pp_rv2av,
1103 Perl_pp_aelemfast,
bfa14884 1104 Perl_pp_aelemfast_lex, /* implemented by Perl_pp_aelemfast */
ef69c8fc
BM
1105 Perl_pp_aelem,
1106 Perl_pp_aslice,
6dd3e0f2 1107 Perl_pp_kvaslice,
ef69c8fc 1108 Perl_pp_aeach,
6f3ed336 1109 Perl_pp_avalues, /* implemented by Perl_pp_akeys */
d88ca568 1110 Perl_pp_akeys,
ef69c8fc 1111 Perl_pp_each,
6f3ed336
NC
1112 Perl_pp_values, /* implemented by Perl_do_kv */
1113 Perl_pp_keys, /* implemented by Perl_do_kv */
ef69c8fc
BM
1114 Perl_pp_delete,
1115 Perl_pp_exists,
6f3ed336 1116 Perl_pp_rv2hv, /* implemented by Perl_pp_rv2av */
ef69c8fc
BM
1117 Perl_pp_helem,
1118 Perl_pp_hslice,
5cae3edb 1119 Perl_pp_kvhslice,
fedf30e1 1120 Perl_pp_multideref,
ef69c8fc
BM
1121 Perl_pp_unpack,
1122 Perl_pp_pack,
1123 Perl_pp_split,
1124 Perl_pp_join,
1125 Perl_pp_list,
1126 Perl_pp_lslice,
1127 Perl_pp_anonlist,
1128 Perl_pp_anonhash,
1129 Perl_pp_splice,
1130 Perl_pp_push,
6f3ed336 1131 Perl_pp_pop, /* implemented by Perl_pp_shift */
ef69c8fc
BM
1132 Perl_pp_shift,
1133 Perl_pp_unshift,
1134 Perl_pp_sort,
1135 Perl_pp_reverse,
1136 Perl_pp_grepstart,
1137 Perl_pp_grepwhile,
21b66d1c 1138 Perl_pp_mapstart, /* implemented by Perl_pp_grepstart */
ef69c8fc
BM
1139 Perl_pp_mapwhile,
1140 Perl_pp_range,
1141 Perl_pp_flip,
1142 Perl_pp_flop,
1143 Perl_pp_and,
1144 Perl_pp_or,
1145 Perl_pp_xor,
6f3ed336 1146 Perl_pp_dor, /* implemented by Perl_pp_defined */
ef69c8fc 1147 Perl_pp_cond_expr,
6f3ed336
NC
1148 Perl_pp_andassign, /* implemented by Perl_pp_and */
1149 Perl_pp_orassign, /* implemented by Perl_pp_or */
1150 Perl_pp_dorassign, /* implemented by Perl_pp_defined */
ef69c8fc
BM
1151 Perl_pp_entersub,
1152 Perl_pp_leavesub,
1153 Perl_pp_leavesublv,
4fa06845
DM
1154 Perl_pp_argcheck,
1155 Perl_pp_argelem,
1156 Perl_pp_argdefelem,
ef69c8fc
BM
1157 Perl_pp_caller,
1158 Perl_pp_warn,
1159 Perl_pp_die,
1160 Perl_pp_reset,
6f3ed336 1161 Perl_pp_lineseq, /* implemented by Perl_pp_null */
ef69c8fc
BM
1162 Perl_pp_nextstate,
1163 Perl_pp_dbstate,
1164 Perl_pp_unstack,
1165 Perl_pp_enter,
1166 Perl_pp_leave,
6f3ed336 1167 Perl_pp_scope, /* implemented by Perl_pp_null */
ef69c8fc
BM
1168 Perl_pp_enteriter,
1169 Perl_pp_iter,
1170 Perl_pp_enterloop,
1171 Perl_pp_leaveloop,
1172 Perl_pp_return,
1173 Perl_pp_last,
1174 Perl_pp_next,
1175 Perl_pp_redo,
6f3ed336 1176 Perl_pp_dump, /* implemented by Perl_pp_goto */
ef69c8fc
BM
1177 Perl_pp_goto,
1178 Perl_pp_exit,
f961b1eb 1179 Perl_pp_method,
ef69c8fc 1180 Perl_pp_method_named,
7d6c333c 1181 Perl_pp_method_super,
810bd8b7 1182 Perl_pp_method_redir,
1183 Perl_pp_method_redir_super,
ef69c8fc 1184 Perl_pp_entergiven,
15e4ac9a
Z
1185 Perl_pp_enterwhereso,
1186 Perl_pp_leavewhereso,
ef69c8fc
BM
1187 Perl_pp_continue,
1188 Perl_pp_open,
1189 Perl_pp_close,
1190 Perl_pp_pipe_op,
1191 Perl_pp_fileno,
1192 Perl_pp_umask,
1193 Perl_pp_binmode,
1194 Perl_pp_tie,
1195 Perl_pp_untie,
1196 Perl_pp_tied,
1197 Perl_pp_dbmopen,
6f3ed336 1198 Perl_pp_dbmclose, /* implemented by Perl_pp_untie */
ef69c8fc
BM
1199 Perl_pp_sselect,
1200 Perl_pp_select,
1201 Perl_pp_getc,
6f3ed336 1202 Perl_pp_read, /* implemented by Perl_pp_sysread */
ef69c8fc
BM
1203 Perl_pp_enterwrite,
1204 Perl_pp_leavewrite,
1205 Perl_pp_prtf,
1206 Perl_pp_print,
6f3ed336 1207 Perl_pp_say, /* implemented by Perl_pp_print */
ef69c8fc
BM
1208 Perl_pp_sysopen,
1209 Perl_pp_sysseek,
1210 Perl_pp_sysread,
60504e18 1211 Perl_pp_syswrite,
ef69c8fc
BM
1212 Perl_pp_eof,
1213 Perl_pp_tell,
6f3ed336 1214 Perl_pp_seek, /* implemented by Perl_pp_sysseek */
ef69c8fc 1215 Perl_pp_truncate,
6f3ed336 1216 Perl_pp_fcntl, /* implemented by Perl_pp_ioctl */
ef69c8fc
BM
1217 Perl_pp_ioctl,
1218 Perl_pp_flock,
60504e18 1219 Perl_pp_send, /* implemented by Perl_pp_syswrite */
6f3ed336 1220 Perl_pp_recv, /* implemented by Perl_pp_sysread */
ef69c8fc
BM
1221 Perl_pp_socket,
1222 Perl_pp_sockpair,
1223 Perl_pp_bind,
6f3ed336 1224 Perl_pp_connect, /* implemented by Perl_pp_bind */
ef69c8fc
BM
1225 Perl_pp_listen,
1226 Perl_pp_accept,
1227 Perl_pp_shutdown,
6f3ed336 1228 Perl_pp_gsockopt, /* implemented by Perl_pp_ssockopt */
ef69c8fc 1229 Perl_pp_ssockopt,
6f3ed336 1230 Perl_pp_getsockname, /* implemented by Perl_pp_getpeername */
ef69c8fc 1231 Perl_pp_getpeername,
6f3ed336 1232 Perl_pp_lstat, /* implemented by Perl_pp_stat */
ef69c8fc
BM
1233 Perl_pp_stat,
1234 Perl_pp_ftrread,
6f3ed336
NC
1235 Perl_pp_ftrwrite, /* implemented by Perl_pp_ftrread */
1236 Perl_pp_ftrexec, /* implemented by Perl_pp_ftrread */
1237 Perl_pp_fteread, /* implemented by Perl_pp_ftrread */
1238 Perl_pp_ftewrite, /* implemented by Perl_pp_ftrread */
1239 Perl_pp_fteexec, /* implemented by Perl_pp_ftrread */
ef69c8fc 1240 Perl_pp_ftis,
6f3ed336
NC
1241 Perl_pp_ftsize, /* implemented by Perl_pp_ftis */
1242 Perl_pp_ftmtime, /* implemented by Perl_pp_ftis */
1243 Perl_pp_ftatime, /* implemented by Perl_pp_ftis */
1244 Perl_pp_ftctime, /* implemented by Perl_pp_ftis */
ef69c8fc 1245 Perl_pp_ftrowned,
6f3ed336
NC
1246 Perl_pp_fteowned, /* implemented by Perl_pp_ftrowned */
1247 Perl_pp_ftzero, /* implemented by Perl_pp_ftrowned */
1248 Perl_pp_ftsock, /* implemented by Perl_pp_ftrowned */
1249 Perl_pp_ftchr, /* implemented by Perl_pp_ftrowned */
1250 Perl_pp_ftblk, /* implemented by Perl_pp_ftrowned */
1251 Perl_pp_ftfile, /* implemented by Perl_pp_ftrowned */
1252 Perl_pp_ftdir, /* implemented by Perl_pp_ftrowned */
1253 Perl_pp_ftpipe, /* implemented by Perl_pp_ftrowned */
1254 Perl_pp_ftsuid, /* implemented by Perl_pp_ftrowned */
1255 Perl_pp_ftsgid, /* implemented by Perl_pp_ftrowned */
1256 Perl_pp_ftsvtx, /* implemented by Perl_pp_ftrowned */
ef69c8fc
BM
1257 Perl_pp_ftlink,
1258 Perl_pp_fttty,
1259 Perl_pp_fttext,
6f3ed336 1260 Perl_pp_ftbinary, /* implemented by Perl_pp_fttext */
ef69c8fc
BM
1261 Perl_pp_chdir,
1262 Perl_pp_chown,
1263 Perl_pp_chroot,
6f3ed336
NC
1264 Perl_pp_unlink, /* implemented by Perl_pp_chown */
1265 Perl_pp_chmod, /* implemented by Perl_pp_chown */
1266 Perl_pp_utime, /* implemented by Perl_pp_chown */
ef69c8fc
BM
1267 Perl_pp_rename,
1268 Perl_pp_link,
6f3ed336 1269 Perl_pp_symlink, /* implemented by Perl_pp_link */
ef69c8fc
BM
1270 Perl_pp_readlink,
1271 Perl_pp_mkdir,
1272 Perl_pp_rmdir,
1273 Perl_pp_open_dir,
1274 Perl_pp_readdir,
1275 Perl_pp_telldir,
1276 Perl_pp_seekdir,
1277 Perl_pp_rewinddir,
1278 Perl_pp_closedir,
1279 Perl_pp_fork,
1280 Perl_pp_wait,
1281 Perl_pp_waitpid,
1282 Perl_pp_system,
1283 Perl_pp_exec,
6f3ed336 1284 Perl_pp_kill, /* implemented by Perl_pp_chown */
ef69c8fc
BM
1285 Perl_pp_getppid,
1286 Perl_pp_getpgrp,
1287 Perl_pp_setpgrp,
1288 Perl_pp_getpriority,
1289 Perl_pp_setpriority,
1290 Perl_pp_time,
1291 Perl_pp_tms,
6f3ed336 1292 Perl_pp_localtime, /* implemented by Perl_pp_gmtime */
ef69c8fc
BM
1293 Perl_pp_gmtime,
1294 Perl_pp_alarm,
1295 Perl_pp_sleep,
6f3ed336
NC
1296 Perl_pp_shmget, /* implemented by Perl_pp_semget */
1297 Perl_pp_shmctl, /* implemented by Perl_pp_semctl */
1298 Perl_pp_shmread, /* implemented by Perl_pp_shmwrite */
ef69c8fc 1299 Perl_pp_shmwrite,
6f3ed336
NC
1300 Perl_pp_msgget, /* implemented by Perl_pp_semget */
1301 Perl_pp_msgctl, /* implemented by Perl_pp_semctl */
1302 Perl_pp_msgsnd, /* implemented by Perl_pp_shmwrite */
1303 Perl_pp_msgrcv, /* implemented by Perl_pp_shmwrite */
1304 Perl_pp_semop, /* implemented by Perl_pp_shmwrite */
ef69c8fc
BM
1305 Perl_pp_semget,
1306 Perl_pp_semctl,
1307 Perl_pp_require,
6f3ed336 1308 Perl_pp_dofile, /* implemented by Perl_pp_require */
ef69c8fc
BM
1309 Perl_pp_hintseval,
1310 Perl_pp_entereval,
1311 Perl_pp_leaveeval,
1312 Perl_pp_entertry,
1313 Perl_pp_leavetry,
6f3ed336
NC
1314 Perl_pp_ghbyname, /* implemented by Perl_pp_ghostent */
1315 Perl_pp_ghbyaddr, /* implemented by Perl_pp_ghostent */
ef69c8fc 1316 Perl_pp_ghostent,
6f3ed336
NC
1317 Perl_pp_gnbyname, /* implemented by Perl_pp_gnetent */
1318 Perl_pp_gnbyaddr, /* implemented by Perl_pp_gnetent */
ef69c8fc 1319 Perl_pp_gnetent,
6f3ed336
NC
1320 Perl_pp_gpbyname, /* implemented by Perl_pp_gprotoent */
1321 Perl_pp_gpbynumber, /* implemented by Perl_pp_gprotoent */
ef69c8fc 1322 Perl_pp_gprotoent,
6f3ed336
NC
1323 Perl_pp_gsbyname, /* implemented by Perl_pp_gservent */
1324 Perl_pp_gsbyport, /* implemented by Perl_pp_gservent */
ef69c8fc
BM
1325 Perl_pp_gservent,
1326 Perl_pp_shostent,
396166e1
NC
1327 Perl_pp_snetent, /* implemented by Perl_pp_shostent */
1328 Perl_pp_sprotoent, /* implemented by Perl_pp_shostent */
1329 Perl_pp_sservent, /* implemented by Perl_pp_shostent */
ef69c8fc 1330 Perl_pp_ehostent,
d8ef1fcd
NC
1331 Perl_pp_enetent, /* implemented by Perl_pp_ehostent */
1332 Perl_pp_eprotoent, /* implemented by Perl_pp_ehostent */
1333 Perl_pp_eservent, /* implemented by Perl_pp_ehostent */
6f3ed336
NC
1334 Perl_pp_gpwnam, /* implemented by Perl_pp_gpwent */
1335 Perl_pp_gpwuid, /* implemented by Perl_pp_gpwent */
ef69c8fc 1336 Perl_pp_gpwent,
720d5dbf
NC
1337 Perl_pp_spwent, /* implemented by Perl_pp_ehostent */
1338 Perl_pp_epwent, /* implemented by Perl_pp_ehostent */
6f3ed336
NC
1339 Perl_pp_ggrnam, /* implemented by Perl_pp_ggrent */
1340 Perl_pp_ggrgid, /* implemented by Perl_pp_ggrent */
ef69c8fc 1341 Perl_pp_ggrent,
720d5dbf
NC
1342 Perl_pp_sgrent, /* implemented by Perl_pp_ehostent */
1343 Perl_pp_egrent, /* implemented by Perl_pp_ehostent */
ef69c8fc
BM
1344 Perl_pp_getlogin,
1345 Perl_pp_syscall,
1346 Perl_pp_lock,
1347 Perl_pp_once,
6f3ed336 1348 Perl_pp_custom, /* implemented by Perl_unimplemented_op */
deb8a388 1349 Perl_pp_coreargs,
88101882 1350 Perl_pp_avhvswitch,
84ed0108 1351 Perl_pp_runcv,
838f2281 1352 Perl_pp_fc,
ac217057 1353 Perl_pp_padcv,
ecf9c8b7 1354 Perl_pp_introcv,
13f89586 1355 Perl_pp_clonecv,
a7fd8ef6 1356 Perl_pp_padrange,
254da51f 1357 Perl_pp_refassign,
4c5bab50 1358 Perl_pp_lvref,
16b99412 1359 Perl_pp_lvrefslice,
2882b3ff 1360 Perl_pp_lvavref,
b77472f9 1361 Perl_pp_anonconst,
27da23d5 1362}
79072805 1363#endif
97aff369 1364#ifdef PERL_PPADDR_INITED
27da23d5 1365;
97aff369 1366#endif
79072805 1367
27da23d5 1368#ifdef PERL_GLOBAL_STRUCT_INIT
97aff369 1369# define PERL_CHECK_INITED
27da23d5 1370static const Perl_check_t Gcheck[]
0000db22
AC
1371#elif !defined(PERL_GLOBAL_STRUCT)
1372# define PERL_CHECK_INITED
27da23d5 1373EXT Perl_check_t PL_check[] /* or perlvars.h */
27da23d5
JH
1374#endif
1375#if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
97aff369 1376# define PERL_CHECK_INITED
27da23d5 1377= {
ef69c8fc
BM
1378 Perl_ck_null, /* null */
1379 Perl_ck_null, /* stub */
1380 Perl_ck_fun, /* scalar */
1381 Perl_ck_null, /* pushmark */
1382 Perl_ck_null, /* wantarray */
1383 Perl_ck_svconst, /* const */
1384 Perl_ck_null, /* gvsv */
1385 Perl_ck_null, /* gv */
1386 Perl_ck_null, /* gelem */
1387 Perl_ck_null, /* padsv */
1388 Perl_ck_null, /* padav */
1389 Perl_ck_null, /* padhv */
1390 Perl_ck_null, /* padany */
ef69c8fc
BM
1391 Perl_ck_rvconst, /* rv2gv */
1392 Perl_ck_rvconst, /* rv2sv */
1393 Perl_ck_null, /* av2arylen */
1394 Perl_ck_rvconst, /* rv2cv */
1395 Perl_ck_anoncode, /* anoncode */
eb4ec35b 1396 Perl_ck_prototype, /* prototype */
ef69c8fc
BM
1397 Perl_ck_spair, /* refgen */
1398 Perl_ck_null, /* srefgen */
1399 Perl_ck_fun, /* ref */
1400 Perl_ck_fun, /* bless */
9ce1fb7d 1401 Perl_ck_backtick, /* backtick */
ef69c8fc
BM
1402 Perl_ck_glob, /* glob */
1403 Perl_ck_readline, /* readline */
1404 Perl_ck_null, /* rcatline */
1405 Perl_ck_fun, /* regcmaybe */
1406 Perl_ck_fun, /* regcreset */
1407 Perl_ck_null, /* regcomp */
1408 Perl_ck_match, /* match */
1409 Perl_ck_match, /* qr */
1410 Perl_ck_match, /* subst */
1411 Perl_ck_null, /* substcont */
1412 Perl_ck_match, /* trans */
bfa14884 1413 Perl_ck_match, /* transr */
ef69c8fc
BM
1414 Perl_ck_sassign, /* sassign */
1415 Perl_ck_null, /* aassign */
1416 Perl_ck_spair, /* chop */
1417 Perl_ck_null, /* schop */
1418 Perl_ck_spair, /* chomp */
1419 Perl_ck_null, /* schomp */
1420 Perl_ck_defined, /* defined */
89c5c07e 1421 Perl_ck_fun, /* undef */
ef69c8fc 1422 Perl_ck_fun, /* study */
abe56f58 1423 Perl_ck_fun, /* pos */
ef69c8fc
BM
1424 Perl_ck_lfun, /* preinc */
1425 Perl_ck_lfun, /* i_preinc */
1426 Perl_ck_lfun, /* predec */
1427 Perl_ck_lfun, /* i_predec */
1428 Perl_ck_lfun, /* postinc */
1429 Perl_ck_lfun, /* i_postinc */
1430 Perl_ck_lfun, /* postdec */
1431 Perl_ck_lfun, /* i_postdec */
1432 Perl_ck_null, /* pow */
1433 Perl_ck_null, /* multiply */
1434 Perl_ck_null, /* i_multiply */
1435 Perl_ck_null, /* divide */
1436 Perl_ck_null, /* i_divide */
1437 Perl_ck_null, /* modulo */
1438 Perl_ck_null, /* i_modulo */
1439 Perl_ck_repeat, /* repeat */
1440 Perl_ck_null, /* add */
1441 Perl_ck_null, /* i_add */
1442 Perl_ck_null, /* subtract */
1443 Perl_ck_null, /* i_subtract */
1444 Perl_ck_concat, /* concat */
e839e6ed 1445 Perl_ck_null, /* multiconcat */
73f4c4fe 1446 Perl_ck_stringify, /* stringify */
ef69c8fc
BM
1447 Perl_ck_bitop, /* left_shift */
1448 Perl_ck_bitop, /* right_shift */
89474f50
FC
1449 Perl_ck_cmp, /* lt */
1450 Perl_ck_cmp, /* i_lt */
1451 Perl_ck_cmp, /* gt */
1452 Perl_ck_cmp, /* i_gt */
1453 Perl_ck_cmp, /* le */
1454 Perl_ck_cmp, /* i_le */
1455 Perl_ck_cmp, /* ge */
1456 Perl_ck_cmp, /* i_ge */
ce5a07d9
DM
1457 Perl_ck_cmp, /* eq */
1458 Perl_ck_cmp, /* i_eq */
1459 Perl_ck_cmp, /* ne */
1460 Perl_ck_cmp, /* i_ne */
ef69c8fc
BM
1461 Perl_ck_null, /* ncmp */
1462 Perl_ck_null, /* i_ncmp */
1463 Perl_ck_null, /* slt */
1464 Perl_ck_null, /* sgt */
1465 Perl_ck_null, /* sle */
1466 Perl_ck_null, /* sge */
1467 Perl_ck_null, /* seq */
1468 Perl_ck_null, /* sne */
1469 Perl_ck_null, /* scmp */
1470 Perl_ck_bitop, /* bit_and */
1471 Perl_ck_bitop, /* bit_xor */
1472 Perl_ck_bitop, /* bit_or */
5d01050a
FC
1473 Perl_ck_bitop, /* nbit_and */
1474 Perl_ck_bitop, /* nbit_xor */
1475 Perl_ck_bitop, /* nbit_or */
1476 Perl_ck_bitop, /* sbit_and */
1477 Perl_ck_bitop, /* sbit_xor */
1478 Perl_ck_bitop, /* sbit_or */
ef69c8fc
BM
1479 Perl_ck_null, /* negate */
1480 Perl_ck_null, /* i_negate */
1481 Perl_ck_null, /* not */
1482 Perl_ck_bitop, /* complement */
5d01050a 1483 Perl_ck_bitop, /* ncomplement */
a6eb74ec 1484 Perl_ck_bitop, /* scomplement */
5f3202fa 1485 Perl_ck_null, /* smartmatch */
ef69c8fc
BM
1486 Perl_ck_fun, /* atan2 */
1487 Perl_ck_fun, /* sin */
1488 Perl_ck_fun, /* cos */
1489 Perl_ck_fun, /* rand */
1490 Perl_ck_fun, /* srand */
1491 Perl_ck_fun, /* exp */
1492 Perl_ck_fun, /* log */
1493 Perl_ck_fun, /* sqrt */
1494 Perl_ck_fun, /* int */
1495 Perl_ck_fun, /* hex */
1496 Perl_ck_fun, /* oct */
1497 Perl_ck_fun, /* abs */
e508c8a4 1498 Perl_ck_length, /* length */
ef69c8fc
BM
1499 Perl_ck_substr, /* substr */
1500 Perl_ck_fun, /* vec */
1501 Perl_ck_index, /* index */
1502 Perl_ck_index, /* rindex */
69974ce6 1503 Perl_ck_lfun, /* sprintf */
ef69c8fc
BM
1504 Perl_ck_fun, /* formline */
1505 Perl_ck_fun, /* ord */
1506 Perl_ck_fun, /* chr */
1507 Perl_ck_fun, /* crypt */
1508 Perl_ck_fun, /* ucfirst */
1509 Perl_ck_fun, /* lcfirst */
1510 Perl_ck_fun, /* uc */
1511 Perl_ck_fun, /* lc */
1512 Perl_ck_fun, /* quotemeta */
1513 Perl_ck_rvconst, /* rv2av */
1514 Perl_ck_null, /* aelemfast */
bfa14884 1515 Perl_ck_null, /* aelemfast_lex */
ef69c8fc
BM
1516 Perl_ck_null, /* aelem */
1517 Perl_ck_null, /* aslice */
6dd3e0f2 1518 Perl_ck_null, /* kvaslice */
ef69c8fc 1519 Perl_ck_each, /* aeach */
ef69c8fc 1520 Perl_ck_each, /* avalues */
d88ca568 1521 Perl_ck_each, /* akeys */
ef69c8fc
BM
1522 Perl_ck_each, /* each */
1523 Perl_ck_each, /* values */
1524 Perl_ck_each, /* keys */
1525 Perl_ck_delete, /* delete */
1526 Perl_ck_exists, /* exists */
1527 Perl_ck_rvconst, /* rv2hv */
1528 Perl_ck_null, /* helem */
1529 Perl_ck_null, /* hslice */
5cae3edb 1530 Perl_ck_null, /* kvhslice */
fedf30e1 1531 Perl_ck_null, /* multideref */
ea5703f4 1532 Perl_ck_fun, /* unpack */
ef69c8fc
BM
1533 Perl_ck_fun, /* pack */
1534 Perl_ck_split, /* split */
1535 Perl_ck_join, /* join */
1536 Perl_ck_null, /* list */
1537 Perl_ck_null, /* lslice */
1538 Perl_ck_fun, /* anonlist */
1539 Perl_ck_fun, /* anonhash */
d4fc4415
FC
1540 Perl_ck_fun, /* splice */
1541 Perl_ck_fun, /* push */
ef69c8fc
BM
1542 Perl_ck_shift, /* pop */
1543 Perl_ck_shift, /* shift */
d4fc4415 1544 Perl_ck_fun, /* unshift */
ef69c8fc
BM
1545 Perl_ck_sort, /* sort */
1546 Perl_ck_fun, /* reverse */
1547 Perl_ck_grep, /* grepstart */
1548 Perl_ck_null, /* grepwhile */
1549 Perl_ck_grep, /* mapstart */
1550 Perl_ck_null, /* mapwhile */
1551 Perl_ck_null, /* range */
1552 Perl_ck_null, /* flip */
1553 Perl_ck_null, /* flop */
1554 Perl_ck_null, /* and */
1555 Perl_ck_null, /* or */
1556 Perl_ck_null, /* xor */
1557 Perl_ck_null, /* dor */
1558 Perl_ck_null, /* cond_expr */
1559 Perl_ck_null, /* andassign */
1560 Perl_ck_null, /* orassign */
1561 Perl_ck_null, /* dorassign */
ef69c8fc
BM
1562 Perl_ck_subr, /* entersub */
1563 Perl_ck_null, /* leavesub */
1564 Perl_ck_null, /* leavesublv */
4fa06845
DM
1565 Perl_ck_null, /* argcheck */
1566 Perl_ck_null, /* argelem */
1567 Perl_ck_null, /* argdefelem */
ef69c8fc
BM
1568 Perl_ck_fun, /* caller */
1569 Perl_ck_fun, /* warn */
97124ef6 1570 Perl_ck_fun, /* die */
ef69c8fc
BM
1571 Perl_ck_fun, /* reset */
1572 Perl_ck_null, /* lineseq */
1573 Perl_ck_null, /* nextstate */
1574 Perl_ck_null, /* dbstate */
1575 Perl_ck_null, /* unstack */
1576 Perl_ck_null, /* enter */
1577 Perl_ck_null, /* leave */
1578 Perl_ck_null, /* scope */
1579 Perl_ck_null, /* enteriter */
1580 Perl_ck_null, /* iter */
1581 Perl_ck_null, /* enterloop */
1582 Perl_ck_null, /* leaveloop */
1583 Perl_ck_return, /* return */
1584 Perl_ck_null, /* last */
1585 Perl_ck_null, /* next */
1586 Perl_ck_null, /* redo */
1587 Perl_ck_null, /* dump */
1588 Perl_ck_null, /* goto */
5450b4d8 1589 Perl_ck_fun, /* exit */
f961b1eb 1590 Perl_ck_method, /* method */
ef69c8fc 1591 Perl_ck_null, /* method_named */
7d6c333c 1592 Perl_ck_null, /* method_super */
810bd8b7 1593 Perl_ck_null, /* method_redir */
1594 Perl_ck_null, /* method_redir_super */
ef69c8fc 1595 Perl_ck_null, /* entergiven */
15e4ac9a
Z
1596 Perl_ck_null, /* enterwhereso */
1597 Perl_ck_null, /* leavewhereso */
ef69c8fc
BM
1598 Perl_ck_null, /* continue */
1599 Perl_ck_open, /* open */
1600 Perl_ck_fun, /* close */
1601 Perl_ck_fun, /* pipe_op */
1602 Perl_ck_fun, /* fileno */
1603 Perl_ck_fun, /* umask */
1604 Perl_ck_fun, /* binmode */
1605 Perl_ck_fun, /* tie */
1606 Perl_ck_fun, /* untie */
1607 Perl_ck_fun, /* tied */
1608 Perl_ck_fun, /* dbmopen */
1609 Perl_ck_fun, /* dbmclose */
1610 Perl_ck_select, /* sselect */
1611 Perl_ck_select, /* select */
1612 Perl_ck_eof, /* getc */
1613 Perl_ck_fun, /* read */
1614 Perl_ck_fun, /* enterwrite */
1615 Perl_ck_null, /* leavewrite */
1616 Perl_ck_listiob, /* prtf */
1617 Perl_ck_listiob, /* print */
1618 Perl_ck_listiob, /* say */
1619 Perl_ck_fun, /* sysopen */
1620 Perl_ck_fun, /* sysseek */
1621 Perl_ck_fun, /* sysread */
1622 Perl_ck_fun, /* syswrite */
1623 Perl_ck_eof, /* eof */
8dc99089 1624 Perl_ck_tell, /* tell */
423e8af5 1625 Perl_ck_tell, /* seek */
ef69c8fc
BM
1626 Perl_ck_trunc, /* truncate */
1627 Perl_ck_fun, /* fcntl */
1628 Perl_ck_fun, /* ioctl */
1629 Perl_ck_fun, /* flock */
1630 Perl_ck_fun, /* send */
1631 Perl_ck_fun, /* recv */
1632 Perl_ck_fun, /* socket */
1633 Perl_ck_fun, /* sockpair */
1634 Perl_ck_fun, /* bind */
1635 Perl_ck_fun, /* connect */
1636 Perl_ck_fun, /* listen */
1637 Perl_ck_fun, /* accept */
1638 Perl_ck_fun, /* shutdown */
1639 Perl_ck_fun, /* gsockopt */
1640 Perl_ck_fun, /* ssockopt */
1641 Perl_ck_fun, /* getsockname */
1642 Perl_ck_fun, /* getpeername */
1643 Perl_ck_ftst, /* lstat */
1644 Perl_ck_ftst, /* stat */
1645 Perl_ck_ftst, /* ftrread */
1646 Perl_ck_ftst, /* ftrwrite */
1647 Perl_ck_ftst, /* ftrexec */
1648 Perl_ck_ftst, /* fteread */
1649 Perl_ck_ftst, /* ftewrite */
1650 Perl_ck_ftst, /* fteexec */
1651 Perl_ck_ftst, /* ftis */
1652 Perl_ck_ftst, /* ftsize */
1653 Perl_ck_ftst, /* ftmtime */
1654 Perl_ck_ftst, /* ftatime */
1655 Perl_ck_ftst, /* ftctime */
1656 Perl_ck_ftst, /* ftrowned */
1657 Perl_ck_ftst, /* fteowned */
1658 Perl_ck_ftst, /* ftzero */
1659 Perl_ck_ftst, /* ftsock */
1660 Perl_ck_ftst, /* ftchr */
1661 Perl_ck_ftst, /* ftblk */
1662 Perl_ck_ftst, /* ftfile */
1663 Perl_ck_ftst, /* ftdir */
1664 Perl_ck_ftst, /* ftpipe */
1665 Perl_ck_ftst, /* ftsuid */
1666 Perl_ck_ftst, /* ftsgid */
1667 Perl_ck_ftst, /* ftsvtx */
1668 Perl_ck_ftst, /* ftlink */
1669 Perl_ck_ftst, /* fttty */
1670 Perl_ck_ftst, /* fttext */
1671 Perl_ck_ftst, /* ftbinary */
8777c9be 1672 Perl_ck_trunc, /* chdir */
ef69c8fc
BM
1673 Perl_ck_fun, /* chown */
1674 Perl_ck_fun, /* chroot */
1675 Perl_ck_fun, /* unlink */
1676 Perl_ck_fun, /* chmod */
1677 Perl_ck_fun, /* utime */
1678 Perl_ck_fun, /* rename */
1679 Perl_ck_fun, /* link */
1680 Perl_ck_fun, /* symlink */
1681 Perl_ck_fun, /* readlink */
1682 Perl_ck_fun, /* mkdir */
1683 Perl_ck_fun, /* rmdir */
1684 Perl_ck_fun, /* open_dir */
1685 Perl_ck_fun, /* readdir */
1686 Perl_ck_fun, /* telldir */
1687 Perl_ck_fun, /* seekdir */
1688 Perl_ck_fun, /* rewinddir */
1689 Perl_ck_fun, /* closedir */
1690 Perl_ck_null, /* fork */
1691 Perl_ck_null, /* wait */
1692 Perl_ck_fun, /* waitpid */
1693 Perl_ck_exec, /* system */
1694 Perl_ck_exec, /* exec */
1695 Perl_ck_fun, /* kill */
1696 Perl_ck_null, /* getppid */
1697 Perl_ck_fun, /* getpgrp */
1698 Perl_ck_fun, /* setpgrp */
1699 Perl_ck_fun, /* getpriority */
1700 Perl_ck_fun, /* setpriority */
1701 Perl_ck_null, /* time */
1702 Perl_ck_null, /* tms */
1703 Perl_ck_fun, /* localtime */
1704 Perl_ck_fun, /* gmtime */
1705 Perl_ck_fun, /* alarm */
1706 Perl_ck_fun, /* sleep */
1707 Perl_ck_fun, /* shmget */
1708 Perl_ck_fun, /* shmctl */
1709 Perl_ck_fun, /* shmread */
1710 Perl_ck_fun, /* shmwrite */
1711 Perl_ck_fun, /* msgget */
1712 Perl_ck_fun, /* msgctl */
1713 Perl_ck_fun, /* msgsnd */
1714 Perl_ck_fun, /* msgrcv */
1715 Perl_ck_fun, /* semop */
1716 Perl_ck_fun, /* semget */
1717 Perl_ck_fun, /* semctl */
1718 Perl_ck_require, /* require */
1719 Perl_ck_fun, /* dofile */
1720 Perl_ck_svconst, /* hintseval */
1721 Perl_ck_eval, /* entereval */
1722 Perl_ck_null, /* leaveeval */
1723 Perl_ck_eval, /* entertry */
1724 Perl_ck_null, /* leavetry */
1725 Perl_ck_fun, /* ghbyname */
1726 Perl_ck_fun, /* ghbyaddr */
1727 Perl_ck_null, /* ghostent */
1728 Perl_ck_fun, /* gnbyname */
1729 Perl_ck_fun, /* gnbyaddr */
1730 Perl_ck_null, /* gnetent */
1731 Perl_ck_fun, /* gpbyname */
1732 Perl_ck_fun, /* gpbynumber */
1733 Perl_ck_null, /* gprotoent */
1734 Perl_ck_fun, /* gsbyname */
1735 Perl_ck_fun, /* gsbyport */
1736 Perl_ck_null, /* gservent */
1737 Perl_ck_fun, /* shostent */
1738 Perl_ck_fun, /* snetent */
1739 Perl_ck_fun, /* sprotoent */
1740 Perl_ck_fun, /* sservent */
1741 Perl_ck_null, /* ehostent */
1742 Perl_ck_null, /* enetent */
1743 Perl_ck_null, /* eprotoent */
1744 Perl_ck_null, /* eservent */
1745 Perl_ck_fun, /* gpwnam */
1746 Perl_ck_fun, /* gpwuid */
1747 Perl_ck_null, /* gpwent */
1748 Perl_ck_null, /* spwent */
1749 Perl_ck_null, /* epwent */
1750 Perl_ck_fun, /* ggrnam */
1751 Perl_ck_fun, /* ggrgid */
1752 Perl_ck_null, /* ggrent */
1753 Perl_ck_null, /* sgrent */
1754 Perl_ck_null, /* egrent */
1755 Perl_ck_null, /* getlogin */
1756 Perl_ck_fun, /* syscall */
1757 Perl_ck_rfun, /* lock */
1758 Perl_ck_null, /* once */
1759 Perl_ck_null, /* custom */
deb8a388 1760 Perl_ck_null, /* coreargs */
88101882 1761 Perl_ck_null, /* avhvswitch */
84ed0108 1762 Perl_ck_null, /* runcv */
838f2281 1763 Perl_ck_fun, /* fc */
ac217057 1764 Perl_ck_null, /* padcv */
ecf9c8b7 1765 Perl_ck_null, /* introcv */
13f89586 1766 Perl_ck_null, /* clonecv */
a7fd8ef6 1767 Perl_ck_null, /* padrange */
4fec8804 1768 Perl_ck_refassign, /* refassign */
4c5bab50 1769 Perl_ck_null, /* lvref */
16b99412 1770 Perl_ck_null, /* lvrefslice */
2882b3ff 1771 Perl_ck_null, /* lvavref */
b77472f9 1772 Perl_ck_null, /* anonconst */
27da23d5 1773}
79072805 1774#endif
97aff369 1775#ifdef PERL_CHECK_INITED
27da23d5 1776;
97aff369 1777#endif /* #ifdef PERL_CHECK_INITED */
27da23d5
JH
1778
1779#ifndef PERL_GLOBAL_STRUCT_INIT
79072805
LW
1780
1781#ifndef DOINIT
1ccb7c8d 1782EXTCONST U32 PL_opargs[];
79072805 1783#else
1ccb7c8d 1784EXTCONST U32 PL_opargs[] = {
79072805 1785 0x00000000, /* null */
93a17b20 1786 0x00000000, /* stub */
903fd87c 1787 0x00001b04, /* scalar */
79072805 1788 0x00000004, /* pushmark */
903fd87c
NC
1789 0x00000004, /* wantarray */
1790 0x00000604, /* const */
1791 0x00000644, /* gvsv */
1792 0x00000644, /* gv */
6e372f32 1793 0x00011244, /* gelem */
748a9306
LW
1794 0x00000044, /* padsv */
1795 0x00000040, /* padav */
1796 0x00000040, /* padhv */
1797 0x00000040, /* padany */
903fd87c
NC
1798 0x00000144, /* rv2gv */
1799 0x00000144, /* rv2sv */
1800 0x00000104, /* av2arylen */
1801 0x00000140, /* rv2cv */
01762542 1802 0x00000604, /* anoncode */
eb4ec35b 1803 0x00009b84, /* prototype */
903fd87c
NC
1804 0x00002101, /* refgen */
1805 0x00001106, /* srefgen */
1806 0x00009b8c, /* ref */
1807 0x00091404, /* bless */
1808 0x00009b88, /* backtick */
1809 0x00009408, /* glob */
1810 0x0000eb08, /* readline */
1811 0x00000608, /* rcatline */
1812 0x00001104, /* regcmaybe */
1813 0x00001104, /* regcreset */
1814 0x00001304, /* regcomp */
9d99d451 1815 0x00000500, /* match */
903fd87c 1816 0x00000504, /* qr */
7f581e76
FC
1817 0x00001504, /* subst */
1818 0x00000304, /* substcont */
903fd87c 1819 0x00001804, /* trans */
bfa14884 1820 0x00001804, /* transr */
1257c081 1821 0x00011204, /* sassign */
903fd87c
NC
1822 0x00022208, /* aassign */
1823 0x00002b0d, /* chop */
1824 0x00009b8c, /* schop */
1825 0x00002b1d, /* chomp */
1826 0x00009b9c, /* schomp */
1827 0x00009b84, /* defined */
89c5c07e 1828 0x0000fb04, /* undef */
903fd87c 1829 0x00009b84, /* study */
abe56f58 1830 0x0000fb8c, /* pos */
903fd87c
NC
1831 0x00001164, /* preinc */
1832 0x00001144, /* i_preinc */
1833 0x00001164, /* predec */
1834 0x00001144, /* i_predec */
3baa0581
FC
1835 0x0000112c, /* postinc */
1836 0x0000110c, /* i_postinc */
1837 0x0000112c, /* postdec */
1838 0x0000110c, /* i_postdec */
903fd87c
NC
1839 0x0001121e, /* pow */
1840 0x0001123e, /* multiply */
1841 0x0001121e, /* i_multiply */
1842 0x0001123e, /* divide */
1843 0x0001121e, /* i_divide */
1844 0x0001123e, /* modulo */
1845 0x0001121e, /* i_modulo */
21639bf4 1846 0x0001220b, /* repeat */
903fd87c
NC
1847 0x0001123e, /* add */
1848 0x0001121e, /* i_add */
1849 0x0001123e, /* subtract */
1850 0x0001121e, /* i_subtract */
1851 0x0001121e, /* concat */
e839e6ed 1852 0x00000f1c, /* multiconcat */
903fd87c
NC
1853 0x0000141e, /* stringify */
1854 0x0001121e, /* left_shift */
1855 0x0001121e, /* right_shift */
1856 0x00011226, /* lt */
1857 0x00011206, /* i_lt */
1858 0x00011226, /* gt */
1859 0x00011206, /* i_gt */
1860 0x00011226, /* le */
1861 0x00011206, /* i_le */
1862 0x00011226, /* ge */
1863 0x00011206, /* i_ge */
1864 0x00011226, /* eq */
1865 0x00011206, /* i_eq */
1866 0x00011226, /* ne */
1867 0x00011206, /* i_ne */
1868 0x0001122e, /* ncmp */
21639bf4 1869 0x0001120e, /* i_ncmp */
903fd87c
NC
1870 0x00011206, /* slt */
1871 0x00011206, /* sgt */
1872 0x00011206, /* sle */
1873 0x00011206, /* sge */
1874 0x00011206, /* seq */
1875 0x00011206, /* sne */
21639bf4 1876 0x0001120e, /* scmp */
903fd87c
NC
1877 0x0001120e, /* bit_and */
1878 0x0001120e, /* bit_xor */
1879 0x0001120e, /* bit_or */
5d01050a
FC
1880 0x0001121e, /* nbit_and */
1881 0x0001121e, /* nbit_xor */
1882 0x0001121e, /* nbit_or */
1883 0x0001120e, /* sbit_and */
1884 0x0001120e, /* sbit_xor */
1885 0x0001120e, /* sbit_or */
903fd87c 1886 0x0000112e, /* negate */
a9dec3fe 1887 0x0000110e, /* i_negate */
903fd87c 1888 0x00001106, /* not */
21639bf4 1889 0x0000110e, /* complement */
5d01050a
FC
1890 0x0000111e, /* ncomplement */
1891 0x0000111e, /* scomplement */
5f3202fa 1892 0x00011206, /* smartmatch */
903fd87c
NC
1893 0x0001141e, /* atan2 */
1894 0x00009b9e, /* sin */
1895 0x00009b9e, /* cos */
1896 0x00009b1c, /* rand */
1897 0x00009b1c, /* srand */
1898 0x00009b9e, /* exp */
1899 0x00009b9e, /* log */
1900 0x00009b9e, /* sqrt */
1901 0x00009b9e, /* int */
1902 0x00009b9e, /* hex */
1903 0x00009b9e, /* oct */
1904 0x00009b9e, /* abs */
1905 0x00009b9e, /* length */
1906 0x0991140c, /* substr */
21639bf4 1907 0x0011140c, /* vec */
903fd87c
NC
1908 0x0091141c, /* index */
1909 0x0091141c, /* rindex */
1910 0x0002140f, /* sprintf */
1911 0x00021405, /* formline */
1912 0x00009b9e, /* ord */
1913 0x00009b9e, /* chr */
1914 0x0001141e, /* crypt */
1915 0x00009b8e, /* ucfirst */
1916 0x00009b8e, /* lcfirst */
1917 0x00009b8e, /* uc */
1918 0x00009b8e, /* lc */
1919 0x00009b8e, /* quotemeta */
1920 0x00000148, /* rv2av */
689d8423 1921 0x00013644, /* aelemfast */
bfa14884 1922 0x00013040, /* aelemfast_lex */
903fd87c
NC
1923 0x00013204, /* aelem */
1924 0x00023401, /* aslice */
6dd3e0f2 1925 0x00023401, /* kvaslice */
d86b3122 1926 0x00003b40, /* aeach */
d86b3122 1927 0x00003b48, /* avalues */
d88ca568 1928 0x00003b08, /* akeys */
d86b3122
FC
1929 0x00004b40, /* each */
1930 0x00004b48, /* values */
903fd87c
NC
1931 0x00004b08, /* keys */
1932 0x00001b00, /* delete */
1933 0x00001b04, /* exists */
e84e4286 1934 0x00000148, /* rv2hv */
903fd87c
NC
1935 0x00014204, /* helem */
1936 0x00024401, /* hslice */
5cae3edb 1937 0x00024401, /* kvhslice */
fedf30e1 1938 0x00000f44, /* multideref */
ea5703f4 1939 0x00091480, /* unpack */
dd9a6ccf 1940 0x0002140f, /* pack */
5012eebe 1941 0x00111508, /* split */
987c9691 1942 0x0002140f, /* join */
903fd87c
NC
1943 0x00002401, /* list */
1944 0x00224200, /* lslice */
1945 0x00002405, /* anonlist */
1946 0x00002405, /* anonhash */
1947 0x02993401, /* splice */
1948 0x0002341d, /* push */
1949 0x0000bb04, /* pop */
1950 0x0000bb04, /* shift */
1951 0x0002341d, /* unshift */
61aeaf96 1952 0x0002d401, /* sort */
903fd87c 1953 0x00002409, /* reverse */
f39944c1
FC
1954 0x00025401, /* grepstart */
1955 0x00000308, /* grepwhile */
1956 0x00025401, /* mapstart */
1957 0x00000308, /* mapwhile */
903fd87c
NC
1958 0x00011300, /* range */
1959 0x00011100, /* flip */
1960 0x00000100, /* flop */
1961 0x00000300, /* and */
1962 0x00000300, /* or */
1963 0x00011206, /* xor */
1964 0x00000300, /* dor */
aafd37e7 1965 0x00000300, /* cond_expr */
903fd87c
NC
1966 0x00000304, /* andassign */
1967 0x00000304, /* orassign */
1968 0x00000304, /* dorassign */
57ee255e 1969 0x00002141, /* entersub */
903fd87c
NC
1970 0x00000100, /* leavesub */
1971 0x00000100, /* leavesublv */
4fa06845
DM
1972 0x00000f00, /* argcheck */
1973 0x00000f00, /* argelem */
1974 0x00000300, /* argdefelem */
903fd87c
NC
1975 0x00009b08, /* caller */
1976 0x0000240d, /* warn */
2eb51413 1977 0x0000240d, /* die */
903fd87c
NC
1978 0x00009b04, /* reset */
1979 0x00000400, /* lineseq */
1980 0x00000a04, /* nextstate */
1981 0x00000a04, /* dbstate */
79072805
LW
1982 0x00000004, /* unstack */
1983 0x00000000, /* enter */
903fd87c
NC
1984 0x00000400, /* leave */
1985 0x00000400, /* scope */
1986 0x00000940, /* enteriter */
79072805 1987 0x00000000, /* iter */
903fd87c
NC
1988 0x00000940, /* enterloop */
1989 0x00000200, /* leaveloop */
b31e13ff
FC
1990 0x00002401, /* return */
1991 0x00000d04, /* last */
1992 0x00000d04, /* next */
1993 0x00000d04, /* redo */
903fd87c 1994 0x00000d44, /* dump */
b31e13ff 1995 0x00000d04, /* goto */
26812b4a 1996 0x00009b04, /* exit */
f961b1eb 1997 0x00000e40, /* method */
b46e009d 1998 0x00000e40, /* method_named */
7d6c333c 1999 0x00000e40, /* method_super */
810bd8b7 2000 0x00000e40, /* method_redir */
2001 0x00000e40, /* method_redir_super */
af8bd34d 2002 0x00000940, /* entergiven */
15e4ac9a
Z
2003 0x00000340, /* enterwhereso */
2004 0x00000100, /* leavewhereso */
fdecdb95 2005 0x00000000, /* continue */
903fd87c
NC
2006 0x0029640d, /* open */
2007 0x0000eb04, /* close */
2008 0x00066404, /* pipe_op */
2009 0x00006b0c, /* fileno */
2010 0x00009b0c, /* umask */
2011 0x00096404, /* binmode */
2012 0x00217445, /* tie */
2013 0x00007b04, /* untie */
6575cde0 2014 0x00007b44, /* tied */
903fd87c
NC
2015 0x00114404, /* dbmopen */
2016 0x00004b04, /* dbmclose */
2017 0x01111408, /* sselect */
2018 0x0000e40c, /* select */
2019 0x0000eb0c, /* getc */
2020 0x0917640d, /* read */
fc5ae97d 2021 0x0000eb04, /* enterwrite */
903fd87c
NC
2022 0x00000100, /* leavewrite */
2023 0x0002e405, /* prtf */
2024 0x0002e405, /* print */
2025 0x0002e405, /* say */
2026 0x09116404, /* sysopen */
2027 0x00116404, /* sysseek */
2028 0x0917640d, /* sysread */
2029 0x0991640d, /* syswrite */
2030 0x0000eb04, /* eof */
2031 0x0000eb0c, /* tell */
2032 0x00116404, /* seek */
2033 0x00011404, /* truncate */
2034 0x0011640c, /* fcntl */
2035 0x0011640c, /* ioctl */
2036 0x0001641c, /* flock */
2037 0x0911640d, /* send */
2038 0x0117640d, /* recv */
2039 0x01116404, /* socket */
2040 0x11166404, /* sockpair */
2041 0x00016404, /* bind */
2042 0x00016404, /* connect */
2043 0x00016404, /* listen */
2044 0x0006640c, /* accept */
2045 0x0001640c, /* shutdown */
2046 0x00116404, /* gsockopt */
2047 0x01116404, /* ssockopt */
2048 0x00006b04, /* getsockname */
2049 0x00006b04, /* getpeername */
465bc0f5
FC
2050 0x0000ec80, /* lstat */
2051 0x0000ec80, /* stat */
903fd87c
NC
2052 0x00006c84, /* ftrread */
2053 0x00006c84, /* ftrwrite */
2054 0x00006c84, /* ftrexec */
2055 0x00006c84, /* fteread */
2056 0x00006c84, /* ftewrite */
2057 0x00006c84, /* fteexec */
2058 0x00006c84, /* ftis */
2059 0x00006c8c, /* ftsize */
2060 0x00006c8c, /* ftmtime */
2061 0x00006c8c, /* ftatime */
2062 0x00006c8c, /* ftctime */
2063 0x00006c84, /* ftrowned */
2064 0x00006c84, /* fteowned */
2065 0x00006c84, /* ftzero */
2066 0x00006c84, /* ftsock */
2067 0x00006c84, /* ftchr */
2068 0x00006c84, /* ftblk */
2069 0x00006c84, /* ftfile */
2070 0x00006c84, /* ftdir */
2071 0x00006c84, /* ftpipe */
2072 0x00006c84, /* ftsuid */
2073 0x00006c84, /* ftsgid */
2074 0x00006c84, /* ftsvtx */
2075 0x00006c84, /* ftlink */
2076 0x00006c04, /* fttty */
2077 0x00006c84, /* fttext */
2078 0x00006c84, /* ftbinary */
2079 0x00009b1c, /* chdir */
2080 0x0000241d, /* chown */
2081 0x00009b9c, /* chroot */
2082 0x0000249d, /* unlink */
2083 0x0000241d, /* chmod */
2084 0x0000241d, /* utime */
2085 0x0001141c, /* rename */
2086 0x0001141c, /* link */
2087 0x0001141c, /* symlink */
2088 0x00009b8c, /* readlink */
2089 0x0009949c, /* mkdir */
2090 0x00009b9c, /* rmdir */
2091 0x00016404, /* open_dir */
2092 0x00006b00, /* readdir */
2093 0x00006b0c, /* telldir */
2094 0x00016404, /* seekdir */
2095 0x00006b04, /* rewinddir */
2096 0x00006b04, /* closedir */
2097 0x0000000c, /* fork */
2098 0x0000001c, /* wait */
2099 0x0001141c, /* waitpid */
2100 0x0002941d, /* system */
1062548a 2101 0x0002941d, /* exec */
9618b155 2102 0x0000241d, /* kill */
903fd87c
NC
2103 0x0000001c, /* getppid */
2104 0x00009b1c, /* getpgrp */
2105 0x0009941c, /* setpgrp */
2106 0x0001141c, /* getpriority */
2107 0x0011141c, /* setpriority */
2108 0x0000001c, /* time */
79072805 2109 0x00000000, /* tms */
903fd87c
NC
2110 0x00009b08, /* localtime */
2111 0x00009b08, /* gmtime */
2112 0x00009b8c, /* alarm */
2113 0x00009b1c, /* sleep */
2114 0x0011140d, /* shmget */
2115 0x0011140d, /* shmctl */
2116 0x0111140d, /* shmread */
2117 0x0111140d, /* shmwrite */
2118 0x0001140d, /* msgget */
2119 0x0011140d, /* msgctl */
2120 0x0011140d, /* msgsnd */
2121 0x1111140d, /* msgrcv */
2122 0x0001140d, /* semop */
2123 0x0011140d, /* semget */
2124 0x0111140d, /* semctl */
353d8d11 2125 0x00009bc4, /* require */
903fd87c
NC
2126 0x00001140, /* dofile */
2127 0x00000604, /* hintseval */
7d789282 2128 0x00009bc0, /* entereval */
903fd87c 2129 0x00001100, /* leaveeval */
a4256772 2130 0x00000340, /* entertry */
903fd87c
NC
2131 0x00000400, /* leavetry */
2132 0x00001b00, /* ghbyname */
2133 0x00011400, /* ghbyaddr */
79072805 2134 0x00000000, /* ghostent */
903fd87c
NC
2135 0x00001b00, /* gnbyname */
2136 0x00011400, /* gnbyaddr */
79072805 2137 0x00000000, /* gnetent */
903fd87c
NC
2138 0x00001b00, /* gpbyname */
2139 0x00001400, /* gpbynumber */
79072805 2140 0x00000000, /* gprotoent */
903fd87c
NC
2141 0x00011400, /* gsbyname */
2142 0x00011400, /* gsbyport */
79072805 2143 0x00000000, /* gservent */
903fd87c
NC
2144 0x00001b04, /* shostent */
2145 0x00001b04, /* snetent */
2146 0x00001b04, /* sprotoent */
2147 0x00001b04, /* sservent */
2148 0x00000004, /* ehostent */
2149 0x00000004, /* enetent */
2150 0x00000004, /* eprotoent */
2151 0x00000004, /* eservent */
2152 0x00001b00, /* gpwnam */
2153 0x00001b00, /* gpwuid */
79072805 2154 0x00000000, /* gpwent */
903fd87c
NC
2155 0x00000004, /* spwent */
2156 0x00000004, /* epwent */
2157 0x00001b00, /* ggrnam */
2158 0x00001b00, /* ggrgid */
79072805 2159 0x00000000, /* ggrent */
903fd87c
NC
2160 0x00000004, /* sgrent */
2161 0x00000004, /* egrent */
79072805 2162 0x0000000c, /* getlogin */
903fd87c
NC
2163 0x0002140d, /* syscall */
2164 0x00007b04, /* lock */
2165 0x00000300, /* once */
438c221d 2166 0x00000000, /* custom */
deb8a388 2167 0x00000600, /* coreargs */
88101882 2168 0x00000108, /* avhvswitch */
84ed0108 2169 0x00000004, /* runcv */
838f2281 2170 0x00009b8e, /* fc */
ac217057 2171 0x00000040, /* padcv */
ecf9c8b7 2172 0x00000040, /* introcv */
13f89586 2173 0x00000040, /* clonecv */
a7fd8ef6 2174 0x00000040, /* padrange */
6e372f32 2175 0x00000244, /* refassign */
4b6cf48b 2176 0x00000b40, /* lvref */
16b99412 2177 0x00000440, /* lvrefslice */
2882b3ff 2178 0x00000b40, /* lvavref */
b77472f9 2179 0x00000144, /* anonconst */
79072805
LW
2180};
2181#endif
73c4f7a1 2182
bae1192d
JH
2183#endif /* !PERL_GLOBAL_STRUCT_INIT */
2184
73c4f7a1 2185END_EXTERN_C
27da23d5 2186
f3574cc6 2187
4fa06845 2188#define OPpARGELEM_SV 0x00
c2380ea1 2189#define OPpLVREF_SV 0x00
f3574cc6
DM
2190#define OPpARG1_MASK 0x01
2191#define OPpCOREARGS_DEREF1 0x01
2192#define OPpENTERSUB_INARGS 0x01
748f2c65
DM
2193#define OPpPADHV_ISKEYS 0x01
2194#define OPpRV2HV_ISKEYS 0x01
f3574cc6
DM
2195#define OPpSORT_NUMERIC 0x01
2196#define OPpTRANS_FROM_UTF 0x01
4fa06845 2197#define OPpARGELEM_AV 0x02
f3574cc6
DM
2198#define OPpCONST_NOVER 0x02
2199#define OPpCOREARGS_DEREF2 0x02
2200#define OPpEVAL_HAS_HH 0x02
2201#define OPpFT_ACCESS 0x02
f3574cc6 2202#define OPpHINT_STRICT_REFS 0x02
93661e56 2203#define OPpITER_REVERSED 0x02
f3574cc6
DM
2204#define OPpSORT_INTEGER 0x02
2205#define OPpTRANS_TO_UTF 0x02
2206#define OPpARG2_MASK 0x03
e1e26374 2207#define OPpAVHVSWITCH_MASK 0x03
4fa06845 2208#define OPpARGELEM_HV 0x04
7b394f12 2209#define OPpASSIGN_TRUEBOOL 0x04
f3574cc6
DM
2210#define OPpCONST_SHORTCIRCUIT 0x04
2211#define OPpDONT_INIT_GV 0x04
2212#define OPpENTERSUB_HASTARG 0x04
2213#define OPpEVAL_UNICODE 0x04
2214#define OPpFT_STACKED 0x04
6102323a 2215#define OPpLVREF_ELEM 0x04
f3574cc6
DM
2216#define OPpSLICEWARNING 0x04
2217#define OPpSORT_REVERSE 0x04
692044df 2218#define OPpSPLIT_IMPLIM 0x04
f3574cc6 2219#define OPpTRANS_IDENTICAL 0x04
4fa06845 2220#define OPpARGELEM_MASK 0x06
f3574cc6
DM
2221#define OPpARG3_MASK 0x07
2222#define OPpPADRANGE_COUNTSHIFT 0x07
2223#define OPpCONST_STRICT 0x08
2224#define OPpENTERSUB_AMPER 0x08
2225#define OPpEVAL_BYTES 0x08
2226#define OPpFT_STACKING 0x08
5a36b2c0 2227#define OPpLVREF_ITER 0x08
f3574cc6 2228#define OPpMAYBE_LVSUB 0x08
e839e6ed 2229#define OPpMULTICONCAT_STRINGIFY 0x08
f3574cc6
DM
2230#define OPpREVERSE_INPLACE 0x08
2231#define OPpSORT_INPLACE 0x08
5012eebe 2232#define OPpSPLIT_LEX 0x08
f3574cc6
DM
2233#define OPpTRANS_SQUASH 0x08
2234#define OPpARG4_MASK 0x0f
a5f48505 2235#define OPpASSIGN_COMMON_AGG 0x10
f3574cc6 2236#define OPpCONST_ENTERED 0x10
9e209402 2237#define OPpDEREF_AV 0x10
f3574cc6
DM
2238#define OPpEVAL_COPHH 0x10
2239#define OPpFT_AFTER_t 0x10
9e209402
FC
2240#define OPpLVREF_AV 0x10
2241#define OPpMAYBE_TRUEBOOL 0x10
fedf30e1 2242#define OPpMULTIDEREF_EXISTS 0x10
f3574cc6 2243#define OPpOPEN_IN_RAW 0x10
f3574cc6 2244#define OPpSORT_DESCEND 0x10
5012eebe 2245#define OPpSPLIT_ASSIGN 0x10
f3574cc6
DM
2246#define OPpSUBSTR_REPL_FIRST 0x10
2247#define OPpTARGET_MY 0x10
a5f48505 2248#define OPpASSIGN_COMMON_RC1 0x20
9e209402 2249#define OPpDEREF_HV 0x20
f3574cc6
DM
2250#define OPpEARLY_CV 0x20
2251#define OPpEVAL_RE_REPARSING 0x20
2252#define OPpHUSH_VMSISH 0x20
cc0776d6 2253#define OPpKVSLICE 0x20
9e209402
FC
2254#define OPpLVREF_HV 0x20
2255#define OPpMAY_RETURN_CONSTANT 0x20
e839e6ed 2256#define OPpMULTICONCAT_FAKE 0x20
fedf30e1 2257#define OPpMULTIDEREF_DELETE 0x20
f3574cc6 2258#define OPpOPEN_IN_CRLF 0x20
f3574cc6
DM
2259#define OPpTRANS_COMPLEMENT 0x20
2260#define OPpTRUEBOOL 0x20
9e209402
FC
2261#define OPpDEREF 0x30
2262#define OPpDEREF_SV 0x30
2263#define OPpLVREF_CV 0x30
2264#define OPpLVREF_TYPE 0x30
2265#define OPpALLOW_FAKE 0x40
f3574cc6 2266#define OPpASSIGN_BACKWARDS 0x40
a5f48505 2267#define OPpASSIGN_COMMON_SCALAR 0x40
d962625f 2268#define OPpCONCAT_NESTED 0x40
f3574cc6
DM
2269#define OPpCONST_BARE 0x40
2270#define OPpCOREARGS_SCALARMOD 0x40
9e209402 2271#define OPpENTERSUB_DB 0x40
f3574cc6
DM
2272#define OPpEXISTS_SUB 0x40
2273#define OPpFLIP_LINENUM 0x40
7e8d786b 2274#define OPpINDEX_BOOLNEG 0x40
f3574cc6 2275#define OPpLIST_GUESSED 0x40
9e209402 2276#define OPpLVAL_DEFER 0x40
e839e6ed 2277#define OPpMULTICONCAT_APPEND 0x40
f3574cc6 2278#define OPpOPEN_OUT_RAW 0x40
9e209402
FC
2279#define OPpOUR_INTRO 0x40
2280#define OPpPAD_STATE 0x40
f3574cc6
DM
2281#define OPpREFCOUNTED 0x40
2282#define OPpREPEAT_DOLIST 0x40
f3574cc6
DM
2283#define OPpSLICE 0x40
2284#define OPpSORT_STABLE 0x40
2285#define OPpTRANS_GROWS 0x40
f3574cc6
DM
2286#define OPpPADRANGE_COUNTMASK 0x7f
2287#define OPpASSIGN_CV_TO_GV 0x80
2288#define OPpCOREARGS_PUSHMARK 0x80
2289#define OPpENTERSUB_NOPAREN 0x80
f3574cc6
DM
2290#define OPpLVALUE 0x80
2291#define OPpLVAL_INTRO 0x80
2292#define OPpOFFBYONE 0x80
2293#define OPpOPEN_OUT_CRLF 0x80
2294#define OPpPV_IS_UTF8 0x80
afe59f35 2295#define OPpSORT_UNSTABLE 0x80
f3574cc6
DM
2296#define OPpTRANS_DELETE 0x80
2297START_EXTERN_C
2298
2299#ifndef PERL_GLOBAL_STRUCT_INIT
2300
2301# ifndef DOINIT
2302
2303/* data about the flags in op_private */
2304
2305EXTCONST I16 PL_op_private_bitdef_ix[];
2306EXTCONST U16 PL_op_private_bitdefs[];
2307EXTCONST char PL_op_private_labels[];
2308EXTCONST I16 PL_op_private_bitfields[];
2309EXTCONST U8 PL_op_private_valid[];
2310
2311# else
2312
2313
2314/* PL_op_private_labels[]: the short descriptions of private flags.
2315 * All labels are concatenated into a single char array
2316 * (separated by \0's) for compactness.
2317 */
2318
2319EXTCONST char PL_op_private_labels[] = {
2320 '$','M','O','D','\0',
2321 '+','1','\0',
2322 '-','\0',
2323 '<','U','T','F','\0',
2324 '>','U','T','F','\0',
2325 'A','M','P','E','R','\0',
e839e6ed 2326 'A','P','P','E','N','D','\0',
5012eebe 2327 'A','S','S','I','G','N','\0',
c2380ea1 2328 'A','V','\0',
f3574cc6
DM
2329 'B','A','R','E','\0',
2330 'B','K','W','A','R','D','\0',
2331 'B','O','O','L','\0',
2332 'B','O','O','L','?','\0',
2333 'B','Y','T','E','S','\0',
f3574cc6 2334 'C','O','M','P','L','\0',
a5f48505
DM
2335 'C','O','M','_','A','G','G','\0',
2336 'C','O','M','_','R','C','1','\0',
2337 'C','O','M','_','S','C','A','L','A','R','\0',
f3574cc6
DM
2338 'C','O','N','S','T','\0',
2339 'C','O','P','H','H','\0',
c2380ea1 2340 'C','V','\0',
f3574cc6
DM
2341 'C','V','2','G','V','\0',
2342 'D','B','G','\0',
2343 'D','E','L','\0',
fedf30e1 2344 'D','E','L','E','T','E','\0',
f3574cc6
DM
2345 'D','E','R','E','F','1','\0',
2346 'D','E','R','E','F','2','\0',
2347 'D','E','S','C','\0',
2348 'D','O','L','I','S','T','\0',
2349 'D','R','E','F','A','V','\0',
2350 'D','R','E','F','H','V','\0',
2351 'D','R','E','F','S','V','\0',
2352 'E','A','R','L','Y','C','V','\0',
6102323a 2353 'E','L','E','M','\0',
f3574cc6 2354 'E','N','T','E','R','E','D','\0',
fedf30e1 2355 'E','X','I','S','T','S','\0',
f3574cc6
DM
2356 'F','A','K','E','\0',
2357 'F','T','A','C','C','E','S','S','\0',
2358 'F','T','A','F','T','E','R','t','\0',
2359 'F','T','S','T','A','C','K','E','D','\0',
2360 'F','T','S','T','A','C','K','I','N','G','\0',
f3574cc6
DM
2361 'G','R','O','W','S','\0',
2362 'G','U','E','S','S','E','D','\0',
2363 'H','A','S','_','H','H','\0',
2364 'H','U','S','H','\0',
c2380ea1 2365 'H','V','\0',
f3574cc6
DM
2366 'I','D','E','N','T','\0',
2367 'I','M','P','L','I','M','\0',
2368 'I','N','A','R','G','S','\0',
2369 'I','N','B','I','N','\0',
2370 'I','N','C','R','\0',
2371 'I','N','P','L','A','C','E','\0',
2372 'I','N','T','\0',
5a36b2c0 2373 'I','T','E','R','\0',
748f2c65 2374 'K','E','Y','S','\0',
cc0776d6 2375 'K','V','S','L','I','C','E','\0',
5012eebe 2376 'L','E','X','\0',
f3574cc6
DM
2377 'L','I','N','E','N','U','M','\0',
2378 'L','V','\0',
2379 'L','V','D','E','F','E','R','\0',
2380 'L','V','I','N','T','R','O','\0',
2381 'L','V','S','U','B','\0',
2382 'M','A','R','K','\0',
7e8d786b 2383 'N','E','G','\0',
d962625f 2384 'N','E','S','T','E','D','\0',
f3574cc6
DM
2385 'N','O','(',')','\0',
2386 'N','O','I','N','I','T','\0',
2387 'N','O','V','E','R','\0',
2388 'N','U','M','\0',
2389 'O','U','R','I','N','T','R','\0',
2390 'O','U','T','B','I','N','\0',
2391 'O','U','T','C','R','\0',
f3574cc6 2392 'R','E','F','C','\0',
c486bd5c 2393 'R','E','P','A','R','S','E','\0',
f3574cc6
DM
2394 'R','E','P','L','1','S','T','\0',
2395 'R','E','V','\0',
2396 'R','E','V','E','R','S','E','D','\0',
f3574cc6
DM
2397 'S','H','O','R','T','\0',
2398 'S','L','I','C','E','\0',
2399 'S','L','I','C','E','W','A','R','N','\0',
2400 'S','Q','U','A','S','H','\0',
2401 'S','T','A','B','L','E','\0',
2402 'S','T','A','T','E','\0',
2403 'S','T','R','I','C','T','\0',
e839e6ed 2404 'S','T','R','I','N','G','I','F','Y','\0',
f3574cc6 2405 'S','U','B','\0',
c2380ea1 2406 'S','V','\0',
f3574cc6
DM
2407 'T','A','R','G','\0',
2408 'T','A','R','G','M','Y','\0',
2409 'U','N','I','\0',
afe59f35 2410 'U','N','S','T','A','B','L','E','\0',
f3574cc6 2411 'U','T','F','\0',
e9fb18e4 2412 'k','e','y','\0',
e1e26374 2413 'o','f','f','s','e','t','\0',
e9fb18e4 2414 'r','a','n','g','e','\0',
f3574cc6
DM
2415
2416};
2417
2418
2419
2420/* PL_op_private_bitfields[]: details about each bit field type.
ac5b5e2c 2421 * Each definition consists of the following list of words:
f3574cc6
DM
2422 * bitmin
2423 * label (index into PL_op_private_labels[]; -1 if no label)
2424 * repeat for each enum entry (if any):
2425 * enum value
2426 * enum label (index into PL_op_private_labels[])
2427 * -1
2428 */
2429
2430EXTCONST I16 PL_op_private_bitfields[] = {
2431 0, 8, -1,
2432 0, 8, -1,
da4e040f 2433 0, 579, -1,
f3574cc6
DM
2434 0, 8, -1,
2435 0, 8, -1,
da4e040f
Z
2436 0, 586, -1,
2437 0, 575, -1,
2438 1, -1, 0, 543, 1, 40, 2, 286, -1,
e98c3eae 2439 4, -1, 1, 167, 2, 174, 3, 181, -1,
da4e040f 2440 4, -1, 0, 543, 1, 40, 2, 286, 3, 117, -1,
f3574cc6
DM
2441
2442};
2443
2444
2445/* PL_op_private_bitdef_ix[]: map an op number to a starting position
2446 * in PL_op_private_bitdefs. If -1, the op has no bits defined */
2447
2448EXTCONST I16 PL_op_private_bitdef_ix[] = {
2449 -1, /* null */
2450 -1, /* stub */
2451 0, /* scalar */
2452 1, /* pushmark */
2453 3, /* wantarray */
2454 4, /* const */
2455 9, /* gvsv */
2456 11, /* gv */
2457 12, /* gelem */
2458 13, /* padsv */
2459 16, /* padav */
7be75ccf 2460 21, /* padhv */
f3574cc6 2461 -1, /* padany */
7be75ccf
DM
2462 28, /* rv2gv */
2463 35, /* rv2sv */
2464 40, /* av2arylen */
2465 42, /* rv2cv */
f3574cc6 2466 -1, /* anoncode */
dd6eeb56
FC
2467 0, /* prototype */
2468 0, /* refgen */
2469 0, /* srefgen */
7be75ccf
DM
2470 49, /* ref */
2471 52, /* bless */
2472 53, /* backtick */
2473 52, /* glob */
dd6eeb56 2474 0, /* readline */
f3574cc6 2475 -1, /* rcatline */
dd6eeb56
FC
2476 0, /* regcmaybe */
2477 0, /* regcreset */
2478 0, /* regcomp */
2e2d70f2
DM
2479 -1, /* match */
2480 -1, /* qr */
7b394f12 2481 58, /* subst */
2e2d70f2 2482 0, /* substcont */
7b394f12
DM
2483 59, /* trans */
2484 59, /* transr */
2485 66, /* sassign */
2486 69, /* aassign */
dd6eeb56
FC
2487 0, /* chop */
2488 0, /* schop */
7b394f12
DM
2489 75, /* chomp */
2490 75, /* schomp */
dd6eeb56
FC
2491 0, /* defined */
2492 0, /* undef */
2493 0, /* study */
7b394f12 2494 77, /* pos */
dd6eeb56
FC
2495 0, /* preinc */
2496 0, /* i_preinc */
2497 0, /* predec */
2498 0, /* i_predec */
3baa0581
FC
2499 0, /* postinc */
2500 0, /* i_postinc */
2501 0, /* postdec */
2502 0, /* i_postdec */
7b394f12
DM
2503 80, /* pow */
2504 80, /* multiply */
2505 80, /* i_multiply */
2506 80, /* divide */
2507 80, /* i_divide */
2508 80, /* modulo */
2509 80, /* i_modulo */
2510 82, /* repeat */
2511 80, /* add */
2512 80, /* i_add */
2513 80, /* subtract */
2514 80, /* i_subtract */
d962625f
DM
2515 84, /* concat */
2516 87, /* multiconcat */
2517 93, /* stringify */
7b394f12
DM
2518 80, /* left_shift */
2519 80, /* right_shift */
dd6eeb56
FC
2520 12, /* lt */
2521 12, /* i_lt */
2522 12, /* gt */
2523 12, /* i_gt */
2524 12, /* le */
2525 12, /* i_le */
2526 12, /* ge */
2527 12, /* i_ge */
2528 12, /* eq */
2529 12, /* i_eq */
2530 12, /* ne */
2531 12, /* i_ne */
2532 12, /* ncmp */
21639bf4 2533 12, /* i_ncmp */
dd6eeb56
FC
2534 12, /* slt */
2535 12, /* sgt */
2536 12, /* sle */
2537 12, /* sge */
2538 12, /* seq */
2539 12, /* sne */
21639bf4 2540 12, /* scmp */
dd6eeb56
FC
2541 12, /* bit_and */
2542 12, /* bit_xor */
2543 12, /* bit_or */
7b394f12
DM
2544 80, /* nbit_and */
2545 80, /* nbit_xor */
2546 80, /* nbit_or */
5d01050a
FC
2547 12, /* sbit_and */
2548 12, /* sbit_xor */
2549 12, /* sbit_or */
dd6eeb56 2550 0, /* negate */
a9dec3fe 2551 0, /* i_negate */
dd6eeb56 2552 0, /* not */
21639bf4 2553 0, /* complement */
7b394f12
DM
2554 75, /* ncomplement */
2555 75, /* scomplement */
dd6eeb56 2556 12, /* smartmatch */
d962625f 2557 93, /* atan2 */
7b394f12
DM
2558 75, /* sin */
2559 75, /* cos */
d962625f
DM
2560 93, /* rand */
2561 93, /* srand */
7b394f12
DM
2562 75, /* exp */
2563 75, /* log */
2564 75, /* sqrt */
2565 75, /* int */
2566 75, /* hex */
2567 75, /* oct */
2568 75, /* abs */
d962625f
DM
2569 95, /* length */
2570 98, /* substr */
2571 101, /* vec */
2572 103, /* index */
2573 103, /* rindex */
7be75ccf
DM
2574 52, /* sprintf */
2575 52, /* formline */
7b394f12
DM
2576 75, /* ord */
2577 75, /* chr */
d962625f 2578 93, /* crypt */
dd6eeb56
FC
2579 0, /* ucfirst */
2580 0, /* lcfirst */
2581 0, /* uc */
2582 0, /* lc */
2583 0, /* quotemeta */
d962625f
DM
2584 107, /* rv2av */
2585 114, /* aelemfast */
2586 114, /* aelemfast_lex */
2587 115, /* aelem */
2588 120, /* aslice */
2589 123, /* kvaslice */
dd6eeb56 2590 0, /* aeach */
dd6eeb56 2591 0, /* avalues */
7be75ccf 2592 40, /* akeys */
dd6eeb56 2593 0, /* each */
7be75ccf
DM
2594 40, /* values */
2595 40, /* keys */
d962625f
DM
2596 124, /* delete */
2597 128, /* exists */
2598 130, /* rv2hv */
2599 115, /* helem */
2600 120, /* hslice */
2601 123, /* kvhslice */
2602 138, /* multideref */
7be75ccf
DM
2603 52, /* unpack */
2604 52, /* pack */
d962625f 2605 145, /* split */
7be75ccf 2606 52, /* join */
d962625f 2607 150, /* list */
dd6eeb56 2608 12, /* lslice */
7be75ccf
DM
2609 52, /* anonlist */
2610 52, /* anonhash */
2611 52, /* splice */
d962625f 2612 93, /* push */
dd6eeb56
FC
2613 0, /* pop */
2614 0, /* shift */
d962625f
DM
2615 93, /* unshift */
2616 152, /* sort */
2617 159, /* reverse */
4c9781b4 2618 0, /* grepstart */
d962625f 2619 161, /* grepwhile */
4c9781b4
FC
2620 0, /* mapstart */
2621 0, /* mapwhile */
dd6eeb56 2622 0, /* range */
d962625f
DM
2623 163, /* flip */
2624 163, /* flop */
dd6eeb56
FC
2625 0, /* and */
2626 0, /* or */
2627 12, /* xor */
2628 0, /* dor */
d962625f 2629 165, /* cond_expr */
dd6eeb56
FC
2630 0, /* andassign */
2631 0, /* orassign */
2632 0, /* dorassign */
d962625f
DM
2633 167, /* entersub */
2634 174, /* leavesub */
2635 174, /* leavesublv */
4fa06845 2636 0, /* argcheck */
d962625f 2637 176, /* argelem */
4fa06845 2638 0, /* argdefelem */
d962625f 2639 178, /* caller */
7be75ccf
DM
2640 52, /* warn */
2641 52, /* die */
2642 52, /* reset */
f3574cc6 2643 -1, /* lineseq */
d962625f
DM
2644 180, /* nextstate */
2645 180, /* dbstate */
f3574cc6
DM
2646 -1, /* unstack */
2647 -1, /* enter */
d962625f 2648 181, /* leave */
f3574cc6 2649 -1, /* scope */
d962625f 2650 183, /* enteriter */
da4e040f 2651 186, /* iter */
f3574cc6 2652 -1, /* enterloop */
da4e040f 2653 187, /* leaveloop */
f3574cc6 2654 -1, /* return */
da4e040f
Z
2655 189, /* last */
2656 189, /* next */
2657 189, /* redo */
2658 189, /* dump */
2659 189, /* goto */
7be75ccf 2660 52, /* exit */
f961b1eb 2661 0, /* method */
dd6eeb56 2662 0, /* method_named */
7d6c333c 2663 0, /* method_super */
810bd8b7 2664 0, /* method_redir */
2665 0, /* method_redir_super */
af8bd34d 2666 -1, /* entergiven */
15e4ac9a
Z
2667 0, /* enterwhereso */
2668 0, /* leavewhereso */
f3574cc6 2669 -1, /* continue */
da4e040f 2670 191, /* open */
7be75ccf
DM
2671 52, /* close */
2672 52, /* pipe_op */
2673 52, /* fileno */
2674 52, /* umask */
2675 52, /* binmode */
2676 52, /* tie */
dd6eeb56
FC
2677 0, /* untie */
2678 0, /* tied */
7be75ccf 2679 52, /* dbmopen */
dd6eeb56 2680 0, /* dbmclose */
7be75ccf
DM
2681 52, /* sselect */
2682 52, /* select */
2683 52, /* getc */
2684 52, /* read */
2685 52, /* enterwrite */
d962625f 2686 174, /* leavewrite */
f3574cc6
DM
2687 -1, /* prtf */
2688 -1, /* print */
2689 -1, /* say */
7be75ccf
DM
2690 52, /* sysopen */
2691 52, /* sysseek */
2692 52, /* sysread */
2693 52, /* syswrite */
2694 52, /* eof */
2695 52, /* tell */
2696 52, /* seek */
2697 52, /* truncate */
2698 52, /* fcntl */
2699 52, /* ioctl */
d962625f 2700 93, /* flock */
7be75ccf
DM
2701 52, /* send */
2702 52, /* recv */
2703 52, /* socket */
2704 52, /* sockpair */
2705 52, /* bind */
2706 52, /* connect */
2707 52, /* listen */
2708 52, /* accept */
2709 52, /* shutdown */
2710 52, /* gsockopt */
2711 52, /* ssockopt */
dd6eeb56
FC
2712 0, /* getsockname */
2713 0, /* getpeername */
2714 0, /* lstat */
2715 0, /* stat */
da4e040f
Z
2716 196, /* ftrread */
2717 196, /* ftrwrite */
2718 196, /* ftrexec */
2719 196, /* fteread */
2720 196, /* ftewrite */
2721 196, /* fteexec */
2722 201, /* ftis */
2723 201, /* ftsize */
2724 201, /* ftmtime */
2725 201, /* ftatime */
2726 201, /* ftctime */
2727 201, /* ftrowned */
2728 201, /* fteowned */
2729 201, /* ftzero */
2730 201, /* ftsock */
2731 201, /* ftchr */
2732 201, /* ftblk */
2733 201, /* ftfile */
2734 201, /* ftdir */
2735 201, /* ftpipe */
2736 201, /* ftsuid */
2737 201, /* ftsgid */
2738 201, /* ftsvtx */
2739 201, /* ftlink */
2740 201, /* fttty */
2741 201, /* fttext */
2742 201, /* ftbinary */
d962625f
DM
2743 93, /* chdir */
2744 93, /* chown */
7b394f12 2745 75, /* chroot */
d962625f
DM
2746 93, /* unlink */
2747 93, /* chmod */
2748 93, /* utime */
2749 93, /* rename */
2750 93, /* link */
2751 93, /* symlink */
dd6eeb56 2752 0, /* readlink */
d962625f 2753 93, /* mkdir */
7b394f12 2754 75, /* rmdir */
7be75ccf 2755 52, /* open_dir */
dd6eeb56
FC
2756 0, /* readdir */
2757 0, /* telldir */
7be75ccf 2758 52, /* seekdir */
dd6eeb56
FC
2759 0, /* rewinddir */
2760 0, /* closedir */
f3574cc6 2761 -1, /* fork */
da4e040f 2762 205, /* wait */
d962625f
DM
2763 93, /* waitpid */
2764 93, /* system */
2765 93, /* exec */
2766 93, /* kill */
da4e040f 2767 205, /* getppid */
d962625f
DM
2768 93, /* getpgrp */
2769 93, /* setpgrp */
2770 93, /* getpriority */
2771 93, /* setpriority */
da4e040f 2772 205, /* time */
f3574cc6 2773 -1, /* tms */
dd6eeb56 2774 0, /* localtime */
7be75ccf 2775 52, /* gmtime */
dd6eeb56 2776 0, /* alarm */
d962625f 2777 93, /* sleep */
7be75ccf
DM
2778 52, /* shmget */
2779 52, /* shmctl */
2780 52, /* shmread */
2781 52, /* shmwrite */
2782 52, /* msgget */
2783 52, /* msgctl */
2784 52, /* msgsnd */
2785 52, /* msgrcv */
2786 52, /* semop */
2787 52, /* semget */
2788 52, /* semctl */
dd6eeb56
FC
2789 0, /* require */
2790 0, /* dofile */
f3574cc6 2791 -1, /* hintseval */
da4e040f 2792 206, /* entereval */
d962625f 2793 174, /* leaveeval */
dd6eeb56 2794 0, /* entertry */
f3574cc6 2795 -1, /* leavetry */
dd6eeb56 2796 0, /* ghbyname */
7be75ccf 2797 52, /* ghbyaddr */
f3574cc6 2798 -1, /* ghostent */
dd6eeb56 2799 0, /* gnbyname */
7be75ccf 2800 52, /* gnbyaddr */
f3574cc6 2801 -1, /* gnetent */
dd6eeb56 2802 0, /* gpbyname */
7be75ccf 2803 52, /* gpbynumber */
f3574cc6 2804 -1, /* gprotoent */
7be75ccf
DM
2805 52, /* gsbyname */
2806 52, /* gsbyport */
f3574cc6 2807 -1, /* gservent */
dd6eeb56
FC
2808 0, /* shostent */
2809 0, /* snetent */
2810 0, /* sprotoent */
2811 0, /* sservent */
f3574cc6
DM
2812 -1, /* ehostent */
2813 -1, /* enetent */
2814 -1, /* eprotoent */
2815 -1, /* eservent */
dd6eeb56
FC
2816 0, /* gpwnam */
2817 0, /* gpwuid */
f3574cc6
DM
2818 -1, /* gpwent */
2819 -1, /* spwent */
2820 -1, /* epwent */
dd6eeb56
FC
2821 0, /* ggrnam */
2822 0, /* ggrgid */
f3574cc6
DM
2823 -1, /* ggrent */
2824 -1, /* sgrent */
2825 -1, /* egrent */
2826 -1, /* getlogin */
7be75ccf 2827 52, /* syscall */
dd6eeb56
FC
2828 0, /* lock */
2829 0, /* once */
f3574cc6 2830 -1, /* custom */
da4e040f
Z
2831 212, /* coreargs */
2832 216, /* avhvswitch */
dd6eeb56
FC
2833 3, /* runcv */
2834 0, /* fc */
f3574cc6
DM
2835 -1, /* padcv */
2836 -1, /* introcv */
2837 -1, /* clonecv */
da4e040f
Z
2838 218, /* padrange */
2839 220, /* refassign */
2840 226, /* lvref */
2841 232, /* lvrefslice */
2842 233, /* lvavref */
b77472f9 2843 0, /* anonconst */
f3574cc6
DM
2844
2845};
2846
2847
2848
2849/* PL_op_private_bitdefs[]: given a starting position in this array (as
2850 * supplied by PL_op_private_bitdef_ix[]), each word (until a stop bit is
2851 * seen) defines the meaning of a particular op_private bit for a
2852 * particular op. Each word consists of:
2853 * bit 0: stop bit: this is the last bit def for the current op
2854 * bit 1: bitfield: if set, this defines a bit field rather than a flag
2855 * bits 2..4: unsigned number in the range 0..7 which is the bit number
2856 * bits 5..15: unsigned number in the range 0..2047 which is an index
2857 * into PL_op_private_labels[] (for a flag), or
2858 * into PL_op_private_bitfields[] (for a bit field)
2859 */
2860
2861EXTCONST U16 PL_op_private_bitdefs[] = {
15e4ac9a 2862 0x0003, /* scalar, prototype, refgen, srefgen, readline, regcmaybe, regcreset, regcomp, substcont, chop, schop, defined, undef, study, preinc, i_preinc, predec, i_predec, postinc, i_postinc, postdec, i_postdec, negate, i_negate, not, complement, ucfirst, lcfirst, uc, lc, quotemeta, aeach, avalues, each, pop, shift, grepstart, mapstart, mapwhile, range, and, or, dor, andassign, orassign, dorassign, argcheck, argdefelem, method, method_named, method_super, method_redir, method_redir_super, enterwhereso, leavewhereso, untie, tied, dbmclose, getsockname, getpeername, lstat, stat, readlink, readdir, telldir, rewinddir, closedir, localtime, alarm, require, dofile, entertry, ghbyname, gnbyname, gpbyname, shostent, snetent, sprotoent, sservent, gpwnam, gpwuid, ggrnam, ggrgid, lock, once, fc, anonconst */
da4e040f 2863 0x2ebc, 0x4099, /* pushmark */
dd6eeb56 2864 0x00bd, /* wantarray, runcv */
da4e040f
Z
2865 0x0578, 0x1930, 0x414c, 0x3c08, 0x33e5, /* const */
2866 0x2ebc, 0x3539, /* gvsv */
e98c3eae 2867 0x1795, /* gv */
21639bf4 2868 0x0067, /* gelem, lt, i_lt, gt, i_gt, le, i_le, ge, i_ge, eq, i_eq, ne, i_ne, ncmp, i_ncmp, slt, sgt, sle, sge, seq, sne, scmp, bit_and, bit_xor, bit_or, sbit_and, sbit_xor, sbit_or, smartmatch, lslice, xor */
da4e040f
Z
2869 0x2ebc, 0x4098, 0x03d7, /* padsv */
2870 0x2ebc, 0x4098, 0x06f4, 0x2fac, 0x3d89, /* padav */
2871 0x2ebc, 0x4098, 0x06f4, 0x0790, 0x2fac, 0x3d88, 0x2a21, /* padhv */
2872 0x2ebc, 0x1b18, 0x03d6, 0x2fac, 0x3308, 0x4144, 0x0003, /* rv2gv */
2873 0x2ebc, 0x3538, 0x03d6, 0x4144, 0x0003, /* rv2sv */
e98c3eae 2874 0x2fac, 0x0003, /* av2arylen, akeys, values, keys */
da4e040f 2875 0x327c, 0x0fd8, 0x0d34, 0x028c, 0x4448, 0x4144, 0x0003, /* rv2cv */
e839e6ed 2876 0x06f4, 0x0790, 0x0003, /* ref */
cd642408 2877 0x018f, /* bless, glob, sprintf, formline, unpack, pack, join, anonlist, anonhash, splice, warn, die, reset, exit, close, pipe_op, fileno, umask, binmode, tie, dbmopen, sselect, select, getc, read, enterwrite, sysopen, sysseek, sysread, syswrite, eof, tell, seek, truncate, fcntl, ioctl, send, recv, socket, sockpair, bind, connect, listen, accept, shutdown, gsockopt, ssockopt, open_dir, seekdir, gmtime, shmget, shmctl, shmread, shmwrite, msgget, msgctl, msgsnd, msgrcv, semop, semget, semctl, ghbyaddr, gnbyaddr, gpbynumber, gsbyname, gsbyport, syscall */
da4e040f 2878 0x371c, 0x3638, 0x2774, 0x26b0, 0x0003, /* backtick */
e839e6ed 2879 0x06f5, /* subst */
da4e040f 2880 0x105c, 0x2098, 0x0914, 0x3ecc, 0x2428, 0x01e4, 0x0141, /* trans, transr */
e839e6ed 2881 0x0f1c, 0x0618, 0x0067, /* sassign */
e98c3eae 2882 0x0bd8, 0x0ad4, 0x09d0, 0x2fac, 0x06e8, 0x0067, /* aassign */
da4e040f 2883 0x44f0, 0x0003, /* chomp, schomp, ncomplement, scomplement, sin, cos, exp, log, sqrt, int, hex, oct, abs, ord, chr, chroot, rmdir */
e98c3eae 2884 0x06f4, 0x2fac, 0x0003, /* pos */
da4e040f 2885 0x44f0, 0x0067, /* pow, multiply, i_multiply, divide, i_divide, modulo, i_modulo, add, i_add, subtract, i_subtract, left_shift, right_shift, nbit_and, nbit_xor, nbit_or */
e98c3eae 2886 0x1418, 0x0067, /* repeat */
da4e040f
Z
2887 0x3198, 0x44f0, 0x0067, /* concat */
2888 0x2ebc, 0x0358, 0x1b14, 0x44f0, 0x422c, 0x0003, /* multiconcat */
2889 0x44f0, 0x018f, /* stringify, atan2, rand, srand, crypt, push, unshift, flock, chdir, chown, unlink, chmod, utime, rename, link, symlink, mkdir, waitpid, system, exec, kill, getpgrp, setpgrp, getpriority, setpriority, sleep */
2890 0x06f4, 0x44f0, 0x0003, /* length */
2891 0x3970, 0x2fac, 0x012b, /* substr */
e98c3eae 2892 0x2fac, 0x0067, /* vec */
da4e040f
Z
2893 0x3118, 0x06f4, 0x44f0, 0x018f, /* index, rindex */
2894 0x2ebc, 0x3538, 0x06f4, 0x2fac, 0x3d88, 0x4144, 0x0003, /* rv2av */
cd642408 2895 0x025f, /* aelemfast, aelemfast_lex */
e98c3eae 2896 0x2ebc, 0x2db8, 0x03d6, 0x2fac, 0x0067, /* aelem, helem */
da4e040f 2897 0x2ebc, 0x2fac, 0x3d89, /* aslice, hslice */
e98c3eae 2898 0x2fad, /* kvaslice, kvhslice */
da4e040f
Z
2899 0x2ebc, 0x3cd8, 0x2ad4, 0x0003, /* delete */
2900 0x4378, 0x0003, /* exists */
2901 0x2ebc, 0x3538, 0x06f4, 0x0790, 0x2fac, 0x3d88, 0x4144, 0x2a21, /* rv2hv */
2902 0x2ebc, 0x2db8, 0x10d4, 0x1a30, 0x2fac, 0x4144, 0x0003, /* multideref */
2903 0x2ebc, 0x3538, 0x0430, 0x2bcc, 0x24e9, /* split */
e98c3eae 2904 0x2ebc, 0x2159, /* list */
da4e040f 2905 0x465c, 0x3fb8, 0x1370, 0x280c, 0x3a68, 0x2904, 0x34a1, /* sort */
e98c3eae 2906 0x280c, 0x0003, /* reverse */
e839e6ed 2907 0x06f4, 0x0003, /* grepwhile */
e98c3eae
Z
2908 0x2c58, 0x0003, /* flip, flop */
2909 0x2ebc, 0x0003, /* cond_expr */
da4e040f
Z
2910 0x2ebc, 0x0fd8, 0x03d6, 0x028c, 0x4448, 0x4144, 0x25c1, /* entersub */
2911 0x37d8, 0x0003, /* leavesub, leavesublv, leavewrite, leaveeval */
4fa06845 2912 0x02aa, 0x0003, /* argelem */
cd642408 2913 0x00bc, 0x018f, /* caller */
e98c3eae 2914 0x2335, /* nextstate, dbstate */
da4e040f
Z
2915 0x2d5c, 0x37d9, /* leave */
2916 0x2ebc, 0x3538, 0x3ae5, /* enteriter */
2917 0x3ae5, /* iter */
e98c3eae 2918 0x2d5c, 0x0067, /* leaveloop */
da4e040f
Z
2919 0x477c, 0x0003, /* last, next, redo, dump, goto */
2920 0x371c, 0x3638, 0x2774, 0x26b0, 0x018f, /* open */
e98c3eae
Z
2921 0x1cd0, 0x1f2c, 0x1de8, 0x1ba4, 0x0003, /* ftrread, ftrwrite, ftrexec, fteread, ftewrite, fteexec */
2922 0x1cd0, 0x1f2c, 0x1de8, 0x0003, /* ftis, ftsize, ftmtime, ftatime, ftctime, ftrowned, fteowned, ftzero, ftsock, ftchr, ftblk, ftfile, ftdir, ftpipe, ftsuid, ftsgid, ftsvtx, ftlink, fttty, fttext, ftbinary */
da4e040f
Z
2923 0x44f1, /* wait, getppid, time */
2924 0x3874, 0x0df0, 0x084c, 0x45c8, 0x2244, 0x0003, /* entereval */
e98c3eae
Z
2925 0x307c, 0x0018, 0x1284, 0x11a1, /* coreargs */
2926 0x2fac, 0x00c7, /* avhvswitch */
2927 0x2ebc, 0x01fb, /* padrange */
da4e040f
Z
2928 0x2ebc, 0x4098, 0x04f6, 0x298c, 0x1888, 0x0067, /* refassign */
2929 0x2ebc, 0x4098, 0x04f6, 0x298c, 0x1888, 0x0003, /* lvref */
e98c3eae 2930 0x2ebd, /* lvrefslice */
da4e040f 2931 0x2ebc, 0x4098, 0x0003, /* lvavref */
f3574cc6
DM
2932
2933};
2934
2935
2936/* PL_op_private_valid: for each op, indexed by op_type, indicate which
2937 * flags bits in op_private are legal */
2938
2939EXTCONST U8 PL_op_private_valid[] = {
2940 /* NULL */ (0xff),
2941 /* STUB */ (0),
2942 /* SCALAR */ (OPpARG1_MASK),
2943 /* PUSHMARK */ (OPpPAD_STATE|OPpLVAL_INTRO),
2944 /* WANTARRAY */ (OPpOFFBYONE),
2945 /* CONST */ (OPpCONST_NOVER|OPpCONST_SHORTCIRCUIT|OPpCONST_STRICT|OPpCONST_ENTERED|OPpCONST_BARE),
2946 /* GVSV */ (OPpOUR_INTRO|OPpLVAL_INTRO),
2947 /* GV */ (OPpEARLY_CV),
2948 /* GELEM */ (OPpARG2_MASK),
9e209402 2949 /* PADSV */ (OPpDEREF|OPpPAD_STATE|OPpLVAL_INTRO),
7be75ccf 2950 /* PADAV */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpTRUEBOOL|OPpPAD_STATE|OPpLVAL_INTRO),
748f2c65 2951 /* PADHV */ (OPpPADHV_ISKEYS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL|OPpPAD_STATE|OPpLVAL_INTRO),
f3574cc6 2952 /* PADANY */ (0),
9e209402
FC
2953 /* RV2GV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpDONT_INIT_GV|OPpMAYBE_LVSUB|OPpDEREF|OPpALLOW_FAKE|OPpLVAL_INTRO),
2954 /* RV2SV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpDEREF|OPpOUR_INTRO|OPpLVAL_INTRO),
f3574cc6 2955 /* AV2ARYLEN */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
9e209402 2956 /* RV2CV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpMAY_RETURN_CONSTANT|OPpENTERSUB_DB|OPpENTERSUB_NOPAREN),
f3574cc6
DM
2957 /* ANONCODE */ (0),
2958 /* PROTOTYPE */ (OPpARG1_MASK),
2959 /* REFGEN */ (OPpARG1_MASK),
2960 /* SREFGEN */ (OPpARG1_MASK),
ba75e9a4 2961 /* REF */ (OPpARG1_MASK|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL),
f3574cc6
DM
2962 /* BLESS */ (OPpARG4_MASK),
2963 /* BACKTICK */ (OPpARG1_MASK|OPpOPEN_IN_RAW|OPpOPEN_IN_CRLF|OPpOPEN_OUT_RAW|OPpOPEN_OUT_CRLF),
2964 /* GLOB */ (OPpARG4_MASK),
2965 /* READLINE */ (OPpARG1_MASK),
2966 /* RCATLINE */ (0),
2967 /* REGCMAYBE */ (OPpARG1_MASK),
2968 /* REGCRESET */ (OPpARG1_MASK),
2969 /* REGCOMP */ (OPpARG1_MASK),
2e2d70f2
DM
2970 /* MATCH */ (0),
2971 /* QR */ (0),
7b394f12 2972 /* SUBST */ (OPpTRUEBOOL),
2e2d70f2 2973 /* SUBSTCONT */ (OPpARG1_MASK),
f7563eba
FC
2974 /* TRANS */ (OPpTRANS_FROM_UTF|OPpTRANS_TO_UTF|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
2975 /* TRANSR */ (OPpTRANS_FROM_UTF|OPpTRANS_TO_UTF|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
f3574cc6 2976 /* SASSIGN */ (OPpARG2_MASK|OPpASSIGN_BACKWARDS|OPpASSIGN_CV_TO_GV),
7b394f12 2977 /* AASSIGN */ (OPpARG2_MASK|OPpASSIGN_TRUEBOOL|OPpMAYBE_LVSUB|OPpASSIGN_COMMON_AGG|OPpASSIGN_COMMON_RC1|OPpASSIGN_COMMON_SCALAR),
f3574cc6
DM
2978 /* CHOP */ (OPpARG1_MASK),
2979 /* SCHOP */ (OPpARG1_MASK),
2980 /* CHOMP */ (OPpARG1_MASK|OPpTARGET_MY),
2981 /* SCHOMP */ (OPpARG1_MASK|OPpTARGET_MY),
2982 /* DEFINED */ (OPpARG1_MASK),
2983 /* UNDEF */ (OPpARG1_MASK),
2984 /* STUDY */ (OPpARG1_MASK),
7b394f12 2985 /* POS */ (OPpARG1_MASK|OPpMAYBE_LVSUB|OPpTRUEBOOL),
f3574cc6
DM
2986 /* PREINC */ (OPpARG1_MASK),
2987 /* I_PREINC */ (OPpARG1_MASK),
2988 /* PREDEC */ (OPpARG1_MASK),
2989 /* I_PREDEC */ (OPpARG1_MASK),
3baa0581
FC
2990 /* POSTINC */ (OPpARG1_MASK),
2991 /* I_POSTINC */ (OPpARG1_MASK),
2992 /* POSTDEC */ (OPpARG1_MASK),
2993 /* I_POSTDEC */ (OPpARG1_MASK),
f3574cc6
DM
2994 /* POW */ (OPpARG2_MASK|OPpTARGET_MY),
2995 /* MULTIPLY */ (OPpARG2_MASK|OPpTARGET_MY),
2996 /* I_MULTIPLY */ (OPpARG2_MASK|OPpTARGET_MY),
2997 /* DIVIDE */ (OPpARG2_MASK|OPpTARGET_MY),
2998 /* I_DIVIDE */ (OPpARG2_MASK|OPpTARGET_MY),
2999 /* MODULO */ (OPpARG2_MASK|OPpTARGET_MY),
3000 /* I_MODULO */ (OPpARG2_MASK|OPpTARGET_MY),
21639bf4 3001 /* REPEAT */ (OPpARG2_MASK|OPpREPEAT_DOLIST),
f3574cc6
DM
3002 /* ADD */ (OPpARG2_MASK|OPpTARGET_MY),
3003 /* I_ADD */ (OPpARG2_MASK|OPpTARGET_MY),
3004 /* SUBTRACT */ (OPpARG2_MASK|OPpTARGET_MY),
3005 /* I_SUBTRACT */ (OPpARG2_MASK|OPpTARGET_MY),
d962625f 3006 /* CONCAT */ (OPpARG2_MASK|OPpTARGET_MY|OPpCONCAT_NESTED),
e839e6ed 3007 /* MULTICONCAT */ (OPpARG1_MASK|OPpMULTICONCAT_STRINGIFY|OPpTARGET_MY|OPpMULTICONCAT_FAKE|OPpMULTICONCAT_APPEND|OPpLVAL_INTRO),
f3574cc6
DM
3008 /* STRINGIFY */ (OPpARG4_MASK|OPpTARGET_MY),
3009 /* LEFT_SHIFT */ (OPpARG2_MASK|OPpTARGET_MY),
3010 /* RIGHT_SHIFT */ (OPpARG2_MASK|OPpTARGET_MY),
3011 /* LT */ (OPpARG2_MASK),
3012 /* I_LT */ (OPpARG2_MASK),
3013 /* GT */ (OPpARG2_MASK),
3014 /* I_GT */ (OPpARG2_MASK),
3015 /* LE */ (OPpARG2_MASK),
3016 /* I_LE */ (OPpARG2_MASK),
3017 /* GE */ (OPpARG2_MASK),
3018 /* I_GE */ (OPpARG2_MASK),
3019 /* EQ */ (OPpARG2_MASK),
3020 /* I_EQ */ (OPpARG2_MASK),
3021 /* NE */ (OPpARG2_MASK),
3022 /* I_NE */ (OPpARG2_MASK),
3023 /* NCMP */ (OPpARG2_MASK),
21639bf4 3024 /* I_NCMP */ (OPpARG2_MASK),
f3574cc6
DM
3025 /* SLT */ (OPpARG2_MASK),
3026 /* SGT */ (OPpARG2_MASK),
3027 /* SLE */ (OPpARG2_MASK),
3028 /* SGE */ (OPpARG2_MASK),
3029 /* SEQ */ (OPpARG2_MASK),
3030 /* SNE */ (OPpARG2_MASK),
21639bf4 3031 /* SCMP */ (OPpARG2_MASK),
f3574cc6
DM
3032 /* BIT_AND */ (OPpARG2_MASK),
3033 /* BIT_XOR */ (OPpARG2_MASK),
3034 /* BIT_OR */ (OPpARG2_MASK),
5d01050a
FC
3035 /* NBIT_AND */ (OPpARG2_MASK|OPpTARGET_MY),
3036 /* NBIT_XOR */ (OPpARG2_MASK|OPpTARGET_MY),
3037 /* NBIT_OR */ (OPpARG2_MASK|OPpTARGET_MY),
3038 /* SBIT_AND */ (OPpARG2_MASK),
3039 /* SBIT_XOR */ (OPpARG2_MASK),
3040 /* SBIT_OR */ (OPpARG2_MASK),
f3574cc6 3041 /* NEGATE */ (OPpARG1_MASK),
a9dec3fe 3042 /* I_NEGATE */ (OPpARG1_MASK),
f3574cc6 3043 /* NOT */ (OPpARG1_MASK),
21639bf4 3044 /* COMPLEMENT */ (OPpARG1_MASK),
5d01050a
FC
3045 /* NCOMPLEMENT */ (OPpARG1_MASK|OPpTARGET_MY),
3046 /* SCOMPLEMENT */ (OPpARG1_MASK|OPpTARGET_MY),
f3574cc6
DM
3047 /* SMARTMATCH */ (OPpARG2_MASK),
3048 /* ATAN2 */ (OPpARG4_MASK|OPpTARGET_MY),
3049 /* SIN */ (OPpARG1_MASK|OPpTARGET_MY),
3050 /* COS */ (OPpARG1_MASK|OPpTARGET_MY),
3051 /* RAND */ (OPpARG4_MASK|OPpTARGET_MY),
3052 /* SRAND */ (OPpARG4_MASK|OPpTARGET_MY),
3053 /* EXP */ (OPpARG1_MASK|OPpTARGET_MY),
3054 /* LOG */ (OPpARG1_MASK|OPpTARGET_MY),
3055 /* SQRT */ (OPpARG1_MASK|OPpTARGET_MY),
3056 /* INT */ (OPpARG1_MASK|OPpTARGET_MY),
3057 /* HEX */ (OPpARG1_MASK|OPpTARGET_MY),
3058 /* OCT */ (OPpARG1_MASK|OPpTARGET_MY),
3059 /* ABS */ (OPpARG1_MASK|OPpTARGET_MY),
7b394f12 3060 /* LENGTH */ (OPpARG1_MASK|OPpTARGET_MY|OPpTRUEBOOL),
4e0538d9 3061 /* SUBSTR */ (OPpARG3_MASK|OPpMAYBE_LVSUB|OPpSUBSTR_REPL_FIRST),
21639bf4 3062 /* VEC */ (OPpARG2_MASK|OPpMAYBE_LVSUB),
7e8d786b
DM
3063 /* INDEX */ (OPpARG4_MASK|OPpTARGET_MY|OPpTRUEBOOL|OPpINDEX_BOOLNEG),
3064 /* RINDEX */ (OPpARG4_MASK|OPpTARGET_MY|OPpTRUEBOOL|OPpINDEX_BOOLNEG),
f3574cc6
DM
3065 /* SPRINTF */ (OPpARG4_MASK),
3066 /* FORMLINE */ (OPpARG4_MASK),
3067 /* ORD */ (OPpARG1_MASK|OPpTARGET_MY),
3068 /* CHR */ (OPpARG1_MASK|OPpTARGET_MY),
3069 /* CRYPT */ (OPpARG4_MASK|OPpTARGET_MY),
3070 /* UCFIRST */ (OPpARG1_MASK),
3071 /* LCFIRST */ (OPpARG1_MASK),
3072 /* UC */ (OPpARG1_MASK),
3073 /* LC */ (OPpARG1_MASK),
3074 /* QUOTEMETA */ (OPpARG1_MASK),
7be75ccf 3075 /* RV2AV */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpTRUEBOOL|OPpOUR_INTRO|OPpLVAL_INTRO),
f3574cc6
DM
3076 /* AELEMFAST */ (255),
3077 /* AELEMFAST_LEX */ (255),
9e209402 3078 /* AELEM */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpDEREF|OPpLVAL_DEFER|OPpLVAL_INTRO),
f3574cc6
DM
3079 /* ASLICE */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpLVAL_INTRO),
3080 /* KVASLICE */ (OPpMAYBE_LVSUB),
3081 /* AEACH */ (OPpARG1_MASK),
f3574cc6 3082 /* AVALUES */ (OPpARG1_MASK),
d88ca568 3083 /* AKEYS */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
f3574cc6 3084 /* EACH */ (OPpARG1_MASK),
4fa080db 3085 /* VALUES */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
f3574cc6 3086 /* KEYS */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
cc0776d6 3087 /* DELETE */ (OPpARG1_MASK|OPpKVSLICE|OPpSLICE|OPpLVAL_INTRO),
f3574cc6 3088 /* EXISTS */ (OPpARG1_MASK|OPpEXISTS_SUB),
748f2c65 3089 /* RV2HV */ (OPpRV2HV_ISKEYS|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL|OPpOUR_INTRO|OPpLVAL_INTRO),
9e209402 3090 /* HELEM */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpDEREF|OPpLVAL_DEFER|OPpLVAL_INTRO),
f3574cc6
DM
3091 /* HSLICE */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpLVAL_INTRO),
3092 /* KVHSLICE */ (OPpMAYBE_LVSUB),
fedf30e1 3093 /* MULTIDEREF */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpMAYBE_LVSUB|OPpMULTIDEREF_EXISTS|OPpMULTIDEREF_DELETE|OPpLVAL_DEFER|OPpLVAL_INTRO),
f3574cc6
DM
3094 /* UNPACK */ (OPpARG4_MASK),
3095 /* PACK */ (OPpARG4_MASK),
2e2d70f2 3096 /* SPLIT */ (OPpSPLIT_IMPLIM|OPpSPLIT_LEX|OPpSPLIT_ASSIGN|OPpOUR_INTRO|OPpLVAL_INTRO),
f3574cc6
DM
3097 /* JOIN */ (OPpARG4_MASK),
3098 /* LIST */ (OPpLIST_GUESSED|OPpLVAL_INTRO),
3099 /* LSLICE */ (OPpARG2_MASK),
3100 /* ANONLIST */ (OPpARG4_MASK),
3101 /* ANONHASH */ (OPpARG4_MASK),
3102 /* SPLICE */ (OPpARG4_MASK),
3103 /* PUSH */ (OPpARG4_MASK|OPpTARGET_MY),
3104 /* POP */ (OPpARG1_MASK),
3105 /* SHIFT */ (OPpARG1_MASK),
3106 /* UNSHIFT */ (OPpARG4_MASK|OPpTARGET_MY),
e2091bb6 3107 /* SORT */ (OPpSORT_NUMERIC|OPpSORT_INTEGER|OPpSORT_REVERSE|OPpSORT_INPLACE|OPpSORT_DESCEND|OPpSORT_STABLE|OPpSORT_UNSTABLE),
f3574cc6 3108 /* REVERSE */ (OPpARG1_MASK|OPpREVERSE_INPLACE),
4c9781b4 3109 /* GREPSTART */ (OPpARG1_MASK),
7b394f12 3110 /* GREPWHILE */ (OPpARG1_MASK|OPpTRUEBOOL),
4c9781b4
FC
3111 /* MAPSTART */ (OPpARG1_MASK),
3112 /* MAPWHILE */ (OPpARG1_MASK),
f3574cc6
DM
3113 /* RANGE */ (OPpARG1_MASK),
3114 /* FLIP */ (OPpARG1_MASK|OPpFLIP_LINENUM),
3115 /* FLOP */ (OPpARG1_MASK|OPpFLIP_LINENUM),
3116 /* AND */ (OPpARG1_MASK),
3117 /* OR */ (OPpARG1_MASK),
3118 /* XOR */ (OPpARG2_MASK),
3119 /* DOR */ (OPpARG1_MASK),
3120 /* COND_EXPR */ (OPpARG1_MASK|OPpLVAL_INTRO),
3121 /* ANDASSIGN */ (OPpARG1_MASK),
3122 /* ORASSIGN */ (OPpARG1_MASK),
3123 /* DORASSIGN */ (OPpARG1_MASK),
9e209402 3124 /* ENTERSUB */ (OPpENTERSUB_INARGS|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpDEREF|OPpENTERSUB_DB|OPpLVAL_INTRO),
f3574cc6
DM
3125 /* LEAVESUB */ (OPpARG1_MASK|OPpREFCOUNTED),
3126 /* LEAVESUBLV */ (OPpARG1_MASK|OPpREFCOUNTED),
4fa06845
DM
3127 /* ARGCHECK */ (OPpARG1_MASK),
3128 /* ARGELEM */ (OPpARG1_MASK|OPpARGELEM_MASK),
3129 /* ARGDEFELEM */ (OPpARG1_MASK),
f3574cc6
DM
3130 /* CALLER */ (OPpARG4_MASK|OPpOFFBYONE),
3131 /* WARN */ (OPpARG4_MASK),
3132 /* DIE */ (OPpARG4_MASK),
3133 /* RESET */ (OPpARG4_MASK),
3134 /* LINESEQ */ (0),
15da1ccf
FC
3135 /* NEXTSTATE */ (OPpHUSH_VMSISH),
3136 /* DBSTATE */ (OPpHUSH_VMSISH),
f3574cc6
DM
3137 /* UNSTACK */ (0),
3138 /* ENTER */ (0),
3139 /* LEAVE */ (OPpREFCOUNTED|OPpLVALUE),
3140 /* SCOPE */ (0),
e98c3eae 3141 /* ENTERITER */ (OPpITER_REVERSED|OPpOUR_INTRO|OPpLVAL_INTRO),
f3574cc6
DM
3142 /* ITER */ (OPpITER_REVERSED),
3143 /* ENTERLOOP */ (0),
3144 /* LEAVELOOP */ (OPpARG2_MASK|OPpLVALUE),
3145 /* RETURN */ (0),
3146 /* LAST */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3147 /* NEXT */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3148 /* REDO */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3149 /* DUMP */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3150 /* GOTO */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3151 /* EXIT */ (OPpARG4_MASK),
f961b1eb 3152 /* METHOD */ (OPpARG1_MASK),
b46e009d 3153 /* METHOD_NAMED */ (OPpARG1_MASK),
7d6c333c 3154 /* METHOD_SUPER */ (OPpARG1_MASK),
810bd8b7 3155 /* METHOD_REDIR */ (OPpARG1_MASK),
3156 /* METHOD_REDIR_SUPER */ (OPpARG1_MASK),
af8bd34d 3157 /* ENTERGIVEN */ (0),
15e4ac9a
Z
3158 /* ENTERWHERESO */ (OPpARG1_MASK),
3159 /* LEAVEWHERESO */ (OPpARG1_MASK),
f3574cc6
DM
3160 /* CONTINUE */ (0),
3161 /* OPEN */ (OPpARG4_MASK|OPpOPEN_IN_RAW|OPpOPEN_IN_CRLF|OPpOPEN_OUT_RAW|OPpOPEN_OUT_CRLF),
3162 /* CLOSE */ (OPpARG4_MASK),
3163 /* PIPE_OP */ (OPpARG4_MASK),
3164 /* FILENO */ (OPpARG4_MASK),
3165 /* UMASK */ (OPpARG4_MASK),
3166 /* BINMODE */ (OPpARG4_MASK),
3167 /* TIE */ (OPpARG4_MASK),
3168 /* UNTIE */ (OPpARG1_MASK),
3169 /* TIED */ (OPpARG1_MASK),
3170 /* DBMOPEN */ (OPpARG4_MASK),
3171 /* DBMCLOSE */ (OPpARG1_MASK),
3172 /* SSELECT */ (OPpARG4_MASK),
3173 /* SELECT */ (OPpARG4_MASK),
3174 /* GETC */ (OPpARG4_MASK),
3175 /* READ */ (OPpARG4_MASK),
3176 /* ENTERWRITE */ (OPpARG4_MASK),
3177 /* LEAVEWRITE */ (OPpARG1_MASK|OPpREFCOUNTED),
3178 /* PRTF */ (0),
3179 /* PRINT */ (0),
3180 /* SAY */ (0),
3181 /* SYSOPEN */ (OPpARG4_MASK),
3182 /* SYSSEEK */ (OPpARG4_MASK),
3183 /* SYSREAD */ (OPpARG4_MASK),
3184 /* SYSWRITE */ (OPpARG4_MASK),
3185 /* EOF */ (OPpARG4_MASK),
3186 /* TELL */ (OPpARG4_MASK),
3187 /* SEEK */ (OPpARG4_MASK),
3188 /* TRUNCATE */ (OPpARG4_MASK),
3189 /* FCNTL */ (OPpARG4_MASK),
3190 /* IOCTL */ (OPpARG4_MASK),
3191 /* FLOCK */ (OPpARG4_MASK|OPpTARGET_MY),
3192 /* SEND */ (OPpARG4_MASK),
3193 /* RECV */ (OPpARG4_MASK),
3194 /* SOCKET */ (OPpARG4_MASK),
3195 /* SOCKPAIR */ (OPpARG4_MASK),
3196 /* BIND */ (OPpARG4_MASK),
3197 /* CONNECT */ (OPpARG4_MASK),
3198 /* LISTEN */ (OPpARG4_MASK),
3199 /* ACCEPT */ (OPpARG4_MASK),
3200 /* SHUTDOWN */ (OPpARG4_MASK),
3201 /* GSOCKOPT */ (OPpARG4_MASK),
3202 /* SSOCKOPT */ (OPpARG4_MASK),
3203 /* GETSOCKNAME */ (OPpARG1_MASK),
3204 /* GETPEERNAME */ (OPpARG1_MASK),
3205 /* LSTAT */ (OPpARG1_MASK),
3206 /* STAT */ (OPpARG1_MASK),
3207 /* FTRREAD */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3208 /* FTRWRITE */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3209 /* FTREXEC */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3210 /* FTEREAD */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3211 /* FTEWRITE */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3212 /* FTEEXEC */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3213 /* FTIS */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3214 /* FTSIZE */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3215 /* FTMTIME */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3216 /* FTATIME */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3217 /* FTCTIME */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3218 /* FTROWNED */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3219 /* FTEOWNED */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3220 /* FTZERO */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3221 /* FTSOCK */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3222 /* FTCHR */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3223 /* FTBLK */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3224 /* FTFILE */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3225 /* FTDIR */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3226 /* FTPIPE */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3227 /* FTSUID */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3228 /* FTSGID */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3229 /* FTSVTX */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3230 /* FTLINK */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3231 /* FTTTY */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3232 /* FTTEXT */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3233 /* FTBINARY */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3234 /* CHDIR */ (OPpARG4_MASK|OPpTARGET_MY),
3235 /* CHOWN */ (OPpARG4_MASK|OPpTARGET_MY),
3236 /* CHROOT */ (OPpARG1_MASK|OPpTARGET_MY),
3237 /* UNLINK */ (OPpARG4_MASK|OPpTARGET_MY),
3238 /* CHMOD */ (OPpARG4_MASK|OPpTARGET_MY),
3239 /* UTIME */ (OPpARG4_MASK|OPpTARGET_MY),
3240 /* RENAME */ (OPpARG4_MASK|OPpTARGET_MY),
3241 /* LINK */ (OPpARG4_MASK|OPpTARGET_MY),
3242 /* SYMLINK */ (OPpARG4_MASK|OPpTARGET_MY),
3243 /* READLINK */ (OPpARG1_MASK),
3244 /* MKDIR */ (OPpARG4_MASK|OPpTARGET_MY),
3245 /* RMDIR */ (OPpARG1_MASK|OPpTARGET_MY),
3246 /* OPEN_DIR */ (OPpARG4_MASK),
3247 /* READDIR */ (OPpARG1_MASK),
3248 /* TELLDIR */ (OPpARG1_MASK),
3249 /* SEEKDIR */ (OPpARG4_MASK),
3250 /* REWINDDIR */ (OPpARG1_MASK),
3251 /* CLOSEDIR */ (OPpARG1_MASK),
3252 /* FORK */ (0),
3253 /* WAIT */ (OPpTARGET_MY),
3254 /* WAITPID */ (OPpARG4_MASK|OPpTARGET_MY),
3255 /* SYSTEM */ (OPpARG4_MASK|OPpTARGET_MY),
3256 /* EXEC */ (OPpARG4_MASK|OPpTARGET_MY),
3257 /* KILL */ (OPpARG4_MASK|OPpTARGET_MY),
3258 /* GETPPID */ (OPpTARGET_MY),
3259 /* GETPGRP */ (OPpARG4_MASK|OPpTARGET_MY),
3260 /* SETPGRP */ (OPpARG4_MASK|OPpTARGET_MY),
3261 /* GETPRIORITY */ (OPpARG4_MASK|OPpTARGET_MY),
3262 /* SETPRIORITY */ (OPpARG4_MASK|OPpTARGET_MY),
3263 /* TIME */ (OPpTARGET_MY),
3264 /* TMS */ (0),
3265 /* LOCALTIME */ (OPpARG1_MASK),
3266 /* GMTIME */ (OPpARG4_MASK),
3267 /* ALARM */ (OPpARG1_MASK),
3268 /* SLEEP */ (OPpARG4_MASK|OPpTARGET_MY),
3269 /* SHMGET */ (OPpARG4_MASK),
3270 /* SHMCTL */ (OPpARG4_MASK),
3271 /* SHMREAD */ (OPpARG4_MASK),
3272 /* SHMWRITE */ (OPpARG4_MASK),
3273 /* MSGGET */ (OPpARG4_MASK),
3274 /* MSGCTL */ (OPpARG4_MASK),
3275 /* MSGSND */ (OPpARG4_MASK),
3276 /* MSGRCV */ (OPpARG4_MASK),
3277 /* SEMOP */ (OPpARG4_MASK),
3278 /* SEMGET */ (OPpARG4_MASK),
3279 /* SEMCTL */ (OPpARG4_MASK),
3280 /* REQUIRE */ (OPpARG1_MASK),
3281 /* DOFILE */ (OPpARG1_MASK),
3282 /* HINTSEVAL */ (0),
3283 /* ENTEREVAL */ (OPpARG1_MASK|OPpEVAL_HAS_HH|OPpEVAL_UNICODE|OPpEVAL_BYTES|OPpEVAL_COPHH|OPpEVAL_RE_REPARSING),
3284 /* LEAVEEVAL */ (OPpARG1_MASK|OPpREFCOUNTED),
3285 /* ENTERTRY */ (OPpARG1_MASK),
3286 /* LEAVETRY */ (0),
3287 /* GHBYNAME */ (OPpARG1_MASK),
3288 /* GHBYADDR */ (OPpARG4_MASK),
3289 /* GHOSTENT */ (0),
3290 /* GNBYNAME */ (OPpARG1_MASK),
3291 /* GNBYADDR */ (OPpARG4_MASK),
3292 /* GNETENT */ (0),
3293 /* GPBYNAME */ (OPpARG1_MASK),
3294 /* GPBYNUMBER */ (OPpARG4_MASK),
3295 /* GPROTOENT */ (0),
3296 /* GSBYNAME */ (OPpARG4_MASK),
3297 /* GSBYPORT */ (OPpARG4_MASK),
3298 /* GSERVENT */ (0),
3299 /* SHOSTENT */ (OPpARG1_MASK),
3300 /* SNETENT */ (OPpARG1_MASK),
3301 /* SPROTOENT */ (OPpARG1_MASK),
3302 /* SSERVENT */ (OPpARG1_MASK),
3303 /* EHOSTENT */ (0),
3304 /* ENETENT */ (0),
3305 /* EPROTOENT */ (0),
3306 /* ESERVENT */ (0),
3307 /* GPWNAM */ (OPpARG1_MASK),
3308 /* GPWUID */ (OPpARG1_MASK),
3309 /* GPWENT */ (0),
3310 /* SPWENT */ (0),
3311 /* EPWENT */ (0),
3312 /* GGRNAM */ (OPpARG1_MASK),
3313 /* GGRGID */ (OPpARG1_MASK),
3314 /* GGRENT */ (0),
3315 /* SGRENT */ (0),
3316 /* EGRENT */ (0),
3317 /* GETLOGIN */ (0),
3318 /* SYSCALL */ (OPpARG4_MASK),
3319 /* LOCK */ (OPpARG1_MASK),
3320 /* ONCE */ (OPpARG1_MASK),
3321 /* CUSTOM */ (0xff),
f3574cc6 3322 /* COREARGS */ (OPpCOREARGS_DEREF1|OPpCOREARGS_DEREF2|OPpCOREARGS_SCALARMOD|OPpCOREARGS_PUSHMARK),
e1e26374 3323 /* AVHVSWITCH */ (OPpAVHVSWITCH_MASK|OPpMAYBE_LVSUB),
f3574cc6
DM
3324 /* RUNCV */ (OPpOFFBYONE),
3325 /* FC */ (OPpARG1_MASK),
3326 /* PADCV */ (0),
3327 /* INTROCV */ (0),
3328 /* CLONECV */ (0),
3329 /* PADRANGE */ (OPpPADRANGE_COUNTMASK|OPpLVAL_INTRO),
9e209402
FC
3330 /* REFASSIGN */ (OPpARG2_MASK|OPpLVREF_ELEM|OPpLVREF_ITER|OPpLVREF_TYPE|OPpPAD_STATE|OPpLVAL_INTRO),
3331 /* LVREF */ (OPpARG1_MASK|OPpLVREF_ELEM|OPpLVREF_ITER|OPpLVREF_TYPE|OPpPAD_STATE|OPpLVAL_INTRO),
838b9de4 3332 /* LVREFSLICE */ (OPpLVAL_INTRO),
4cb21796 3333 /* LVAVREF */ (OPpARG1_MASK|OPpPAD_STATE|OPpLVAL_INTRO),
b77472f9 3334 /* ANONCONST */ (OPpARG1_MASK),
f3574cc6
DM
3335
3336};
3337
3338# endif /* !DOINIT */
3339#endif /* !PERL_GLOBAL_STRUCT_INIT */
3340
3341END_EXTERN_C
3342
3343
3344
37442d52 3345/* ex: set ro: */