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