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