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