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