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