This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Correct code-like snippet in documentation
[perl5.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 #if defined(PERL_CORE) || defined(PERL_EXT)
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_i_predec Perl_pp_predec
26 #define Perl_pp_i_postinc Perl_pp_postinc
27 #define Perl_pp_i_postdec Perl_pp_postdec
28 #define Perl_pp_slt Perl_pp_sle
29 #define Perl_pp_sgt Perl_pp_sle
30 #define Perl_pp_sge Perl_pp_sle
31 #define Perl_pp_bit_xor Perl_pp_bit_or
32 #define Perl_pp_nbit_xor Perl_pp_nbit_or
33 #define Perl_pp_sbit_xor Perl_pp_sbit_or
34 #define Perl_pp_cos Perl_pp_sin
35 #define Perl_pp_exp Perl_pp_sin
36 #define Perl_pp_log Perl_pp_sin
37 #define Perl_pp_sqrt Perl_pp_sin
38 #define Perl_pp_hex Perl_pp_oct
39 #define Perl_pp_rindex Perl_pp_index
40 #define Perl_pp_lcfirst Perl_pp_ucfirst
41 #define Perl_pp_aelemfast_lex Perl_pp_aelemfast
42 #define Perl_pp_avalues Perl_pp_akeys
43 #define Perl_pp_values Perl_do_kv
44 #define Perl_pp_keys Perl_do_kv
45 #define Perl_pp_rv2hv Perl_pp_rv2av
46 #define Perl_pp_pop Perl_pp_shift
47 #define Perl_pp_mapstart Perl_pp_grepstart
48 #define Perl_pp_dor Perl_pp_defined
49 #define Perl_pp_andassign Perl_pp_and
50 #define Perl_pp_orassign Perl_pp_or
51 #define Perl_pp_dorassign Perl_pp_defined
52 #define Perl_pp_lineseq Perl_pp_null
53 #define Perl_pp_scope Perl_pp_null
54 #define Perl_pp_dump Perl_pp_goto
55 #define Perl_pp_dbmclose Perl_pp_untie
56 #define Perl_pp_read Perl_pp_sysread
57 #define Perl_pp_say Perl_pp_print
58 #define Perl_pp_seek Perl_pp_sysseek
59 #define Perl_pp_fcntl Perl_pp_ioctl
60 #ifdef HAS_SOCKET
61 #define Perl_pp_send Perl_pp_syswrite
62 #define Perl_pp_recv Perl_pp_sysread
63 #else
64 #define Perl_pp_send Perl_unimplemented_op
65 #define Perl_pp_recv Perl_unimplemented_op
66 #define Perl_pp_socket Perl_unimplemented_op
67 #endif
68 #ifdef HAS_SOCKET
69 #define Perl_pp_connect Perl_pp_bind
70 #define Perl_pp_gsockopt Perl_pp_ssockopt
71 #define Perl_pp_getsockname Perl_pp_getpeername
72 #else
73 #define Perl_pp_bind Perl_unimplemented_op
74 #define Perl_pp_connect Perl_unimplemented_op
75 #define Perl_pp_listen Perl_unimplemented_op
76 #define Perl_pp_accept Perl_unimplemented_op
77 #define Perl_pp_shutdown Perl_unimplemented_op
78 #define Perl_pp_gsockopt Perl_unimplemented_op
79 #define Perl_pp_ssockopt Perl_unimplemented_op
80 #define Perl_pp_getsockname Perl_unimplemented_op
81 #define Perl_pp_getpeername Perl_unimplemented_op
82 #endif
83 #define Perl_pp_lstat Perl_pp_stat
84 #define Perl_pp_ftrwrite Perl_pp_ftrread
85 #define Perl_pp_ftrexec Perl_pp_ftrread
86 #define Perl_pp_fteread Perl_pp_ftrread
87 #define Perl_pp_ftewrite Perl_pp_ftrread
88 #define Perl_pp_fteexec Perl_pp_ftrread
89 #define Perl_pp_ftsize Perl_pp_ftis
90 #define Perl_pp_ftmtime Perl_pp_ftis
91 #define Perl_pp_ftatime Perl_pp_ftis
92 #define Perl_pp_ftctime Perl_pp_ftis
93 #define Perl_pp_fteowned Perl_pp_ftrowned
94 #define Perl_pp_ftzero Perl_pp_ftrowned
95 #define Perl_pp_ftsock Perl_pp_ftrowned
96 #define Perl_pp_ftchr Perl_pp_ftrowned
97 #define Perl_pp_ftblk Perl_pp_ftrowned
98 #define Perl_pp_ftfile Perl_pp_ftrowned
99 #define Perl_pp_ftdir Perl_pp_ftrowned
100 #define Perl_pp_ftpipe Perl_pp_ftrowned
101 #define Perl_pp_ftsuid Perl_pp_ftrowned
102 #define Perl_pp_ftsgid Perl_pp_ftrowned
103 #define Perl_pp_ftsvtx Perl_pp_ftrowned
104 #define Perl_pp_ftbinary Perl_pp_fttext
105 #define Perl_pp_unlink Perl_pp_chown
106 #define Perl_pp_chmod Perl_pp_chown
107 #define Perl_pp_utime Perl_pp_chown
108 #define Perl_pp_symlink Perl_pp_link
109 #define Perl_pp_kill Perl_pp_chown
110 #define Perl_pp_localtime Perl_pp_gmtime
111 #define Perl_pp_shmget Perl_pp_semget
112 #define Perl_pp_shmctl Perl_pp_semctl
113 #define Perl_pp_shmread Perl_pp_shmwrite
114 #define Perl_pp_msgget Perl_pp_semget
115 #define Perl_pp_msgctl Perl_pp_semctl
116 #define Perl_pp_msgsnd Perl_pp_shmwrite
117 #define Perl_pp_msgrcv Perl_pp_shmwrite
118 #define Perl_pp_semop Perl_pp_shmwrite
119 #define Perl_pp_dofile Perl_pp_require
120 #define Perl_pp_ghbyname Perl_pp_ghostent
121 #define Perl_pp_ghbyaddr Perl_pp_ghostent
122 #define Perl_pp_gnbyname Perl_pp_gnetent
123 #define Perl_pp_gnbyaddr Perl_pp_gnetent
124 #define Perl_pp_gpbyname Perl_pp_gprotoent
125 #define Perl_pp_gpbynumber Perl_pp_gprotoent
126 #define Perl_pp_gsbyname Perl_pp_gservent
127 #define Perl_pp_gsbyport Perl_pp_gservent
128 #define Perl_pp_snetent Perl_pp_shostent
129 #define Perl_pp_sprotoent Perl_pp_shostent
130 #define Perl_pp_sservent Perl_pp_shostent
131 #define Perl_pp_enetent Perl_pp_ehostent
132 #define Perl_pp_eprotoent Perl_pp_ehostent
133 #define Perl_pp_eservent Perl_pp_ehostent
134 #define Perl_pp_gpwnam Perl_pp_gpwent
135 #define Perl_pp_gpwuid Perl_pp_gpwent
136 #define Perl_pp_spwent Perl_pp_ehostent
137 #define Perl_pp_epwent Perl_pp_ehostent
138 #define Perl_pp_ggrnam Perl_pp_ggrent
139 #define Perl_pp_ggrgid Perl_pp_ggrent
140 #define Perl_pp_sgrent Perl_pp_ehostent
141 #define Perl_pp_egrent Perl_pp_ehostent
142 #define Perl_pp_custom Perl_unimplemented_op
143
144 #endif /* End of if defined(PERL_CORE) || defined(PERL_EXT) */
145
146 START_EXTERN_C
147
148 EXTCONST char* const PL_op_name[] INIT({
149         [OP_NULL]               = "null",
150         [OP_STUB]               = "stub",
151         [OP_SCALAR]             = "scalar",
152         [OP_PUSHMARK]           = "pushmark",
153         [OP_WANTARRAY]          = "wantarray",
154         [OP_CONST]              = "const",
155         [OP_GVSV]               = "gvsv",
156         [OP_GV]                 = "gv",
157         [OP_GELEM]              = "gelem",
158         [OP_PADSV]              = "padsv",
159         [OP_PADSV_STORE]        = "padsv_store",
160         [OP_PADAV]              = "padav",
161         [OP_PADHV]              = "padhv",
162         [OP_PADANY]             = "padany",
163         [OP_RV2GV]              = "rv2gv",
164         [OP_RV2SV]              = "rv2sv",
165         [OP_AV2ARYLEN]          = "av2arylen",
166         [OP_RV2CV]              = "rv2cv",
167         [OP_ANONCODE]           = "anoncode",
168         [OP_PROTOTYPE]          = "prototype",
169         [OP_REFGEN]             = "refgen",
170         [OP_SREFGEN]            = "srefgen",
171         [OP_REF]                = "ref",
172         [OP_BLESS]              = "bless",
173         [OP_BACKTICK]           = "backtick",
174         [OP_GLOB]               = "glob",
175         [OP_READLINE]           = "readline",
176         [OP_RCATLINE]           = "rcatline",
177         [OP_REGCMAYBE]          = "regcmaybe",
178         [OP_REGCRESET]          = "regcreset",
179         [OP_REGCOMP]            = "regcomp",
180         [OP_MATCH]              = "match",
181         [OP_QR]                 = "qr",
182         [OP_SUBST]              = "subst",
183         [OP_SUBSTCONT]          = "substcont",
184         [OP_TRANS]              = "trans",
185         [OP_TRANSR]             = "transr",
186         [OP_SASSIGN]            = "sassign",
187         [OP_AASSIGN]            = "aassign",
188         [OP_CHOP]               = "chop",
189         [OP_SCHOP]              = "schop",
190         [OP_CHOMP]              = "chomp",
191         [OP_SCHOMP]             = "schomp",
192         [OP_DEFINED]            = "defined",
193         [OP_UNDEF]              = "undef",
194         [OP_STUDY]              = "study",
195         [OP_POS]                = "pos",
196         [OP_PREINC]             = "preinc",
197         [OP_I_PREINC]           = "i_preinc",
198         [OP_PREDEC]             = "predec",
199         [OP_I_PREDEC]           = "i_predec",
200         [OP_POSTINC]            = "postinc",
201         [OP_I_POSTINC]          = "i_postinc",
202         [OP_POSTDEC]            = "postdec",
203         [OP_I_POSTDEC]          = "i_postdec",
204         [OP_POW]                = "pow",
205         [OP_MULTIPLY]           = "multiply",
206         [OP_I_MULTIPLY]         = "i_multiply",
207         [OP_DIVIDE]             = "divide",
208         [OP_I_DIVIDE]           = "i_divide",
209         [OP_MODULO]             = "modulo",
210         [OP_I_MODULO]           = "i_modulo",
211         [OP_REPEAT]             = "repeat",
212         [OP_ADD]                = "add",
213         [OP_I_ADD]              = "i_add",
214         [OP_SUBTRACT]           = "subtract",
215         [OP_I_SUBTRACT]         = "i_subtract",
216         [OP_CONCAT]             = "concat",
217         [OP_MULTICONCAT]        = "multiconcat",
218         [OP_STRINGIFY]          = "stringify",
219         [OP_LEFT_SHIFT]         = "left_shift",
220         [OP_RIGHT_SHIFT]        = "right_shift",
221         [OP_LT]                 = "lt",
222         [OP_I_LT]               = "i_lt",
223         [OP_GT]                 = "gt",
224         [OP_I_GT]               = "i_gt",
225         [OP_LE]                 = "le",
226         [OP_I_LE]               = "i_le",
227         [OP_GE]                 = "ge",
228         [OP_I_GE]               = "i_ge",
229         [OP_EQ]                 = "eq",
230         [OP_I_EQ]               = "i_eq",
231         [OP_NE]                 = "ne",
232         [OP_I_NE]               = "i_ne",
233         [OP_NCMP]               = "ncmp",
234         [OP_I_NCMP]             = "i_ncmp",
235         [OP_SLT]                = "slt",
236         [OP_SGT]                = "sgt",
237         [OP_SLE]                = "sle",
238         [OP_SGE]                = "sge",
239         [OP_SEQ]                = "seq",
240         [OP_SNE]                = "sne",
241         [OP_SCMP]               = "scmp",
242         [OP_BIT_AND]            = "bit_and",
243         [OP_BIT_XOR]            = "bit_xor",
244         [OP_BIT_OR]             = "bit_or",
245         [OP_NBIT_AND]           = "nbit_and",
246         [OP_NBIT_XOR]           = "nbit_xor",
247         [OP_NBIT_OR]            = "nbit_or",
248         [OP_SBIT_AND]           = "sbit_and",
249         [OP_SBIT_XOR]           = "sbit_xor",
250         [OP_SBIT_OR]            = "sbit_or",
251         [OP_NEGATE]             = "negate",
252         [OP_I_NEGATE]           = "i_negate",
253         [OP_NOT]                = "not",
254         [OP_COMPLEMENT]         = "complement",
255         [OP_NCOMPLEMENT]        = "ncomplement",
256         [OP_SCOMPLEMENT]        = "scomplement",
257         [OP_SMARTMATCH]         = "smartmatch",
258         [OP_ATAN2]              = "atan2",
259         [OP_SIN]                = "sin",
260         [OP_COS]                = "cos",
261         [OP_RAND]               = "rand",
262         [OP_SRAND]              = "srand",
263         [OP_EXP]                = "exp",
264         [OP_LOG]                = "log",
265         [OP_SQRT]               = "sqrt",
266         [OP_INT]                = "int",
267         [OP_HEX]                = "hex",
268         [OP_OCT]                = "oct",
269         [OP_ABS]                = "abs",
270         [OP_LENGTH]             = "length",
271         [OP_SUBSTR]             = "substr",
272         [OP_VEC]                = "vec",
273         [OP_INDEX]              = "index",
274         [OP_RINDEX]             = "rindex",
275         [OP_SPRINTF]            = "sprintf",
276         [OP_FORMLINE]           = "formline",
277         [OP_ORD]                = "ord",
278         [OP_CHR]                = "chr",
279         [OP_CRYPT]              = "crypt",
280         [OP_UCFIRST]            = "ucfirst",
281         [OP_LCFIRST]            = "lcfirst",
282         [OP_UC]                 = "uc",
283         [OP_LC]                 = "lc",
284         [OP_QUOTEMETA]          = "quotemeta",
285         [OP_RV2AV]              = "rv2av",
286         [OP_AELEMFAST]          = "aelemfast",
287         [OP_AELEMFAST_LEX]      = "aelemfast_lex",
288         [OP_AELEMFASTLEX_STORE] = "aelemfastlex_store",
289         [OP_AELEM]              = "aelem",
290         [OP_ASLICE]             = "aslice",
291         [OP_KVASLICE]           = "kvaslice",
292         [OP_AEACH]              = "aeach",
293         [OP_AVALUES]            = "avalues",
294         [OP_AKEYS]              = "akeys",
295         [OP_EACH]               = "each",
296         [OP_VALUES]             = "values",
297         [OP_KEYS]               = "keys",
298         [OP_DELETE]             = "delete",
299         [OP_EXISTS]             = "exists",
300         [OP_RV2HV]              = "rv2hv",
301         [OP_HELEM]              = "helem",
302         [OP_HSLICE]             = "hslice",
303         [OP_KVHSLICE]           = "kvhslice",
304         [OP_MULTIDEREF]         = "multideref",
305         [OP_UNPACK]             = "unpack",
306         [OP_PACK]               = "pack",
307         [OP_SPLIT]              = "split",
308         [OP_JOIN]               = "join",
309         [OP_LIST]               = "list",
310         [OP_LSLICE]             = "lslice",
311         [OP_ANONLIST]           = "anonlist",
312         [OP_ANONHASH]           = "anonhash",
313         [OP_EMPTYAVHV]          = "emptyavhv",
314         [OP_SPLICE]             = "splice",
315         [OP_PUSH]               = "push",
316         [OP_POP]                = "pop",
317         [OP_SHIFT]              = "shift",
318         [OP_UNSHIFT]            = "unshift",
319         [OP_SORT]               = "sort",
320         [OP_REVERSE]            = "reverse",
321         [OP_GREPSTART]          = "grepstart",
322         [OP_GREPWHILE]          = "grepwhile",
323         [OP_MAPSTART]           = "mapstart",
324         [OP_MAPWHILE]           = "mapwhile",
325         [OP_RANGE]              = "range",
326         [OP_FLIP]               = "flip",
327         [OP_FLOP]               = "flop",
328         [OP_AND]                = "and",
329         [OP_OR]                 = "or",
330         [OP_XOR]                = "xor",
331         [OP_DOR]                = "dor",
332         [OP_COND_EXPR]          = "cond_expr",
333         [OP_ANDASSIGN]          = "andassign",
334         [OP_ORASSIGN]           = "orassign",
335         [OP_DORASSIGN]          = "dorassign",
336         [OP_ENTERSUB]           = "entersub",
337         [OP_LEAVESUB]           = "leavesub",
338         [OP_LEAVESUBLV]         = "leavesublv",
339         [OP_ARGCHECK]           = "argcheck",
340         [OP_ARGELEM]            = "argelem",
341         [OP_ARGDEFELEM]         = "argdefelem",
342         [OP_CALLER]             = "caller",
343         [OP_WARN]               = "warn",
344         [OP_DIE]                = "die",
345         [OP_RESET]              = "reset",
346         [OP_LINESEQ]            = "lineseq",
347         [OP_NEXTSTATE]          = "nextstate",
348         [OP_DBSTATE]            = "dbstate",
349         [OP_UNSTACK]            = "unstack",
350         [OP_ENTER]              = "enter",
351         [OP_LEAVE]              = "leave",
352         [OP_SCOPE]              = "scope",
353         [OP_ENTERITER]          = "enteriter",
354         [OP_ITER]               = "iter",
355         [OP_ENTERLOOP]          = "enterloop",
356         [OP_LEAVELOOP]          = "leaveloop",
357         [OP_RETURN]             = "return",
358         [OP_LAST]               = "last",
359         [OP_NEXT]               = "next",
360         [OP_REDO]               = "redo",
361         [OP_DUMP]               = "dump",
362         [OP_GOTO]               = "goto",
363         [OP_EXIT]               = "exit",
364         [OP_METHOD]             = "method",
365         [OP_METHOD_NAMED]       = "method_named",
366         [OP_METHOD_SUPER]       = "method_super",
367         [OP_METHOD_REDIR]       = "method_redir",
368         [OP_METHOD_REDIR_SUPER] = "method_redir_super",
369         [OP_ENTERGIVEN]         = "entergiven",
370         [OP_LEAVEGIVEN]         = "leavegiven",
371         [OP_ENTERWHEN]          = "enterwhen",
372         [OP_LEAVEWHEN]          = "leavewhen",
373         [OP_BREAK]              = "break",
374         [OP_CONTINUE]           = "continue",
375         [OP_OPEN]               = "open",
376         [OP_CLOSE]              = "close",
377         [OP_PIPE_OP]            = "pipe_op",
378         [OP_FILENO]             = "fileno",
379         [OP_UMASK]              = "umask",
380         [OP_BINMODE]            = "binmode",
381         [OP_TIE]                = "tie",
382         [OP_UNTIE]              = "untie",
383         [OP_TIED]               = "tied",
384         [OP_DBMOPEN]            = "dbmopen",
385         [OP_DBMCLOSE]           = "dbmclose",
386         [OP_SSELECT]            = "sselect",
387         [OP_SELECT]             = "select",
388         [OP_GETC]               = "getc",
389         [OP_READ]               = "read",
390         [OP_ENTERWRITE]         = "enterwrite",
391         [OP_LEAVEWRITE]         = "leavewrite",
392         [OP_PRTF]               = "prtf",
393         [OP_PRINT]              = "print",
394         [OP_SAY]                = "say",
395         [OP_SYSOPEN]            = "sysopen",
396         [OP_SYSSEEK]            = "sysseek",
397         [OP_SYSREAD]            = "sysread",
398         [OP_SYSWRITE]           = "syswrite",
399         [OP_EOF]                = "eof",
400         [OP_TELL]               = "tell",
401         [OP_SEEK]               = "seek",
402         [OP_TRUNCATE]           = "truncate",
403         [OP_FCNTL]              = "fcntl",
404         [OP_IOCTL]              = "ioctl",
405         [OP_FLOCK]              = "flock",
406         [OP_SEND]               = "send",
407         [OP_RECV]               = "recv",
408         [OP_SOCKET]             = "socket",
409         [OP_SOCKPAIR]           = "sockpair",
410         [OP_BIND]               = "bind",
411         [OP_CONNECT]            = "connect",
412         [OP_LISTEN]             = "listen",
413         [OP_ACCEPT]             = "accept",
414         [OP_SHUTDOWN]           = "shutdown",
415         [OP_GSOCKOPT]           = "gsockopt",
416         [OP_SSOCKOPT]           = "ssockopt",
417         [OP_GETSOCKNAME]        = "getsockname",
418         [OP_GETPEERNAME]        = "getpeername",
419         [OP_LSTAT]              = "lstat",
420         [OP_STAT]               = "stat",
421         [OP_FTRREAD]            = "ftrread",
422         [OP_FTRWRITE]           = "ftrwrite",
423         [OP_FTREXEC]            = "ftrexec",
424         [OP_FTEREAD]            = "fteread",
425         [OP_FTEWRITE]           = "ftewrite",
426         [OP_FTEEXEC]            = "fteexec",
427         [OP_FTIS]               = "ftis",
428         [OP_FTSIZE]             = "ftsize",
429         [OP_FTMTIME]            = "ftmtime",
430         [OP_FTATIME]            = "ftatime",
431         [OP_FTCTIME]            = "ftctime",
432         [OP_FTROWNED]           = "ftrowned",
433         [OP_FTEOWNED]           = "fteowned",
434         [OP_FTZERO]             = "ftzero",
435         [OP_FTSOCK]             = "ftsock",
436         [OP_FTCHR]              = "ftchr",
437         [OP_FTBLK]              = "ftblk",
438         [OP_FTFILE]             = "ftfile",
439         [OP_FTDIR]              = "ftdir",
440         [OP_FTPIPE]             = "ftpipe",
441         [OP_FTSUID]             = "ftsuid",
442         [OP_FTSGID]             = "ftsgid",
443         [OP_FTSVTX]             = "ftsvtx",
444         [OP_FTLINK]             = "ftlink",
445         [OP_FTTTY]              = "fttty",
446         [OP_FTTEXT]             = "fttext",
447         [OP_FTBINARY]           = "ftbinary",
448         [OP_CHDIR]              = "chdir",
449         [OP_CHOWN]              = "chown",
450         [OP_CHROOT]             = "chroot",
451         [OP_UNLINK]             = "unlink",
452         [OP_CHMOD]              = "chmod",
453         [OP_UTIME]              = "utime",
454         [OP_RENAME]             = "rename",
455         [OP_LINK]               = "link",
456         [OP_SYMLINK]            = "symlink",
457         [OP_READLINK]           = "readlink",
458         [OP_MKDIR]              = "mkdir",
459         [OP_RMDIR]              = "rmdir",
460         [OP_OPEN_DIR]           = "open_dir",
461         [OP_READDIR]            = "readdir",
462         [OP_TELLDIR]            = "telldir",
463         [OP_SEEKDIR]            = "seekdir",
464         [OP_REWINDDIR]          = "rewinddir",
465         [OP_CLOSEDIR]           = "closedir",
466         [OP_FORK]               = "fork",
467         [OP_WAIT]               = "wait",
468         [OP_WAITPID]            = "waitpid",
469         [OP_SYSTEM]             = "system",
470         [OP_EXEC]               = "exec",
471         [OP_KILL]               = "kill",
472         [OP_GETPPID]            = "getppid",
473         [OP_GETPGRP]            = "getpgrp",
474         [OP_SETPGRP]            = "setpgrp",
475         [OP_GETPRIORITY]        = "getpriority",
476         [OP_SETPRIORITY]        = "setpriority",
477         [OP_TIME]               = "time",
478         [OP_TMS]                = "tms",
479         [OP_LOCALTIME]          = "localtime",
480         [OP_GMTIME]             = "gmtime",
481         [OP_ALARM]              = "alarm",
482         [OP_SLEEP]              = "sleep",
483         [OP_SHMGET]             = "shmget",
484         [OP_SHMCTL]             = "shmctl",
485         [OP_SHMREAD]            = "shmread",
486         [OP_SHMWRITE]           = "shmwrite",
487         [OP_MSGGET]             = "msgget",
488         [OP_MSGCTL]             = "msgctl",
489         [OP_MSGSND]             = "msgsnd",
490         [OP_MSGRCV]             = "msgrcv",
491         [OP_SEMOP]              = "semop",
492         [OP_SEMGET]             = "semget",
493         [OP_SEMCTL]             = "semctl",
494         [OP_REQUIRE]            = "require",
495         [OP_DOFILE]             = "dofile",
496         [OP_HINTSEVAL]          = "hintseval",
497         [OP_ENTEREVAL]          = "entereval",
498         [OP_LEAVEEVAL]          = "leaveeval",
499         [OP_ENTERTRY]           = "entertry",
500         [OP_LEAVETRY]           = "leavetry",
501         [OP_GHBYNAME]           = "ghbyname",
502         [OP_GHBYADDR]           = "ghbyaddr",
503         [OP_GHOSTENT]           = "ghostent",
504         [OP_GNBYNAME]           = "gnbyname",
505         [OP_GNBYADDR]           = "gnbyaddr",
506         [OP_GNETENT]            = "gnetent",
507         [OP_GPBYNAME]           = "gpbyname",
508         [OP_GPBYNUMBER]         = "gpbynumber",
509         [OP_GPROTOENT]          = "gprotoent",
510         [OP_GSBYNAME]           = "gsbyname",
511         [OP_GSBYPORT]           = "gsbyport",
512         [OP_GSERVENT]           = "gservent",
513         [OP_SHOSTENT]           = "shostent",
514         [OP_SNETENT]            = "snetent",
515         [OP_SPROTOENT]          = "sprotoent",
516         [OP_SSERVENT]           = "sservent",
517         [OP_EHOSTENT]           = "ehostent",
518         [OP_ENETENT]            = "enetent",
519         [OP_EPROTOENT]          = "eprotoent",
520         [OP_ESERVENT]           = "eservent",
521         [OP_GPWNAM]             = "gpwnam",
522         [OP_GPWUID]             = "gpwuid",
523         [OP_GPWENT]             = "gpwent",
524         [OP_SPWENT]             = "spwent",
525         [OP_EPWENT]             = "epwent",
526         [OP_GGRNAM]             = "ggrnam",
527         [OP_GGRGID]             = "ggrgid",
528         [OP_GGRENT]             = "ggrent",
529         [OP_SGRENT]             = "sgrent",
530         [OP_EGRENT]             = "egrent",
531         [OP_GETLOGIN]           = "getlogin",
532         [OP_SYSCALL]            = "syscall",
533         [OP_LOCK]               = "lock",
534         [OP_ONCE]               = "once",
535         [OP_CUSTOM]             = "custom",
536         [OP_COREARGS]           = "coreargs",
537         [OP_AVHVSWITCH]         = "avhvswitch",
538         [OP_RUNCV]              = "runcv",
539         [OP_FC]                 = "fc",
540         [OP_PADCV]              = "padcv",
541         [OP_INTROCV]            = "introcv",
542         [OP_CLONECV]            = "clonecv",
543         [OP_PADRANGE]           = "padrange",
544         [OP_REFASSIGN]          = "refassign",
545         [OP_LVREF]              = "lvref",
546         [OP_LVREFSLICE]         = "lvrefslice",
547         [OP_LVAVREF]            = "lvavref",
548         [OP_ANONCONST]          = "anonconst",
549         [OP_ISA]                = "isa",
550         [OP_CMPCHAIN_AND]       = "cmpchain_and",
551         [OP_CMPCHAIN_DUP]       = "cmpchain_dup",
552         [OP_ENTERTRYCATCH]      = "entertrycatch",
553         [OP_LEAVETRYCATCH]      = "leavetrycatch",
554         [OP_POPTRY]             = "poptry",
555         [OP_CATCH]              = "catch",
556         [OP_PUSHDEFER]          = "pushdefer",
557         [OP_IS_BOOL]            = "is_bool",
558         [OP_IS_WEAK]            = "is_weak",
559         [OP_WEAKEN]             = "weaken",
560         [OP_UNWEAKEN]           = "unweaken",
561         [OP_BLESSED]            = "blessed",
562         [OP_REFADDR]            = "refaddr",
563         [OP_REFTYPE]            = "reftype",
564         [OP_CEIL]               = "ceil",
565         [OP_FLOOR]              = "floor",
566         [OP_IS_TAINTED]         = "is_tainted",
567         [OP_HELEMEXISTSOR]      = "helemexistsor",
568     [OP_max] = "freed",
569 });
570
571 EXTCONST char* const PL_op_desc[] INIT({
572         [OP_NULL]               = "null operation",
573         [OP_STUB]               = "stub",
574         [OP_SCALAR]             = "scalar",
575         [OP_PUSHMARK]           = "pushmark",
576         [OP_WANTARRAY]          = "wantarray",
577         [OP_CONST]              = "constant item",
578         [OP_GVSV]               = "scalar variable",
579         [OP_GV]                 = "glob value",
580         [OP_GELEM]              = "glob elem",
581         [OP_PADSV]              = "private variable",
582         [OP_PADSV_STORE]        = "padsv scalar assignment",
583         [OP_PADAV]              = "private array",
584         [OP_PADHV]              = "private hash",
585         [OP_PADANY]             = "private value",
586         [OP_RV2GV]              = "ref-to-glob cast",
587         [OP_RV2SV]              = "scalar dereference",
588         [OP_AV2ARYLEN]          = "array length",
589         [OP_RV2CV]              = "subroutine dereference",
590         [OP_ANONCODE]           = "anonymous subroutine",
591         [OP_PROTOTYPE]          = "subroutine prototype",
592         [OP_REFGEN]             = "reference constructor",
593         [OP_SREFGEN]            = "single ref constructor",
594         [OP_REF]                = "reference-type operator",
595         [OP_BLESS]              = "bless",
596         [OP_BACKTICK]           = "quoted execution (``, qx)",
597         [OP_GLOB]               = "glob",
598         [OP_READLINE]           = "<HANDLE>",
599         [OP_RCATLINE]           = "append I/O operator",
600         [OP_REGCMAYBE]          = "regexp internal guard",
601         [OP_REGCRESET]          = "regexp internal reset",
602         [OP_REGCOMP]            = "regexp compilation",
603         [OP_MATCH]              = "pattern match (m//)",
604         [OP_QR]                 = "pattern quote (qr//)",
605         [OP_SUBST]              = "substitution (s///)",
606         [OP_SUBSTCONT]          = "substitution iterator",
607         [OP_TRANS]              = "transliteration (tr///)",
608         [OP_TRANSR]             = "transliteration (tr///)",
609         [OP_SASSIGN]            = "scalar assignment",
610         [OP_AASSIGN]            = "list assignment",
611         [OP_CHOP]               = "chop",
612         [OP_SCHOP]              = "scalar chop",
613         [OP_CHOMP]              = "chomp",
614         [OP_SCHOMP]             = "scalar chomp",
615         [OP_DEFINED]            = "defined operator",
616         [OP_UNDEF]              = "undef operator",
617         [OP_STUDY]              = "study",
618         [OP_POS]                = "match position",
619         [OP_PREINC]             = "preincrement (++)",
620         [OP_I_PREINC]           = "integer preincrement (++)",
621         [OP_PREDEC]             = "predecrement (--)",
622         [OP_I_PREDEC]           = "integer predecrement (--)",
623         [OP_POSTINC]            = "postincrement (++)",
624         [OP_I_POSTINC]          = "integer postincrement (++)",
625         [OP_POSTDEC]            = "postdecrement (--)",
626         [OP_I_POSTDEC]          = "integer postdecrement (--)",
627         [OP_POW]                = "exponentiation (**)",
628         [OP_MULTIPLY]           = "multiplication (*)",
629         [OP_I_MULTIPLY]         = "integer multiplication (*)",
630         [OP_DIVIDE]             = "division (/)",
631         [OP_I_DIVIDE]           = "integer division (/)",
632         [OP_MODULO]             = "modulus (%)",
633         [OP_I_MODULO]           = "integer modulus (%)",
634         [OP_REPEAT]             = "repeat (x)",
635         [OP_ADD]                = "addition (+)",
636         [OP_I_ADD]              = "integer addition (+)",
637         [OP_SUBTRACT]           = "subtraction (-)",
638         [OP_I_SUBTRACT]         = "integer subtraction (-)",
639         [OP_CONCAT]             = "concatenation (.) or string",
640         [OP_MULTICONCAT]        = "concatenation (.) or string",
641         [OP_STRINGIFY]          = "string",
642         [OP_LEFT_SHIFT]         = "left bitshift (<<)",
643         [OP_RIGHT_SHIFT]        = "right bitshift (>>)",
644         [OP_LT]                 = "numeric lt (<)",
645         [OP_I_LT]               = "integer lt (<)",
646         [OP_GT]                 = "numeric gt (>)",
647         [OP_I_GT]               = "integer gt (>)",
648         [OP_LE]                 = "numeric le (<=)",
649         [OP_I_LE]               = "integer le (<=)",
650         [OP_GE]                 = "numeric ge (>=)",
651         [OP_I_GE]               = "integer ge (>=)",
652         [OP_EQ]                 = "numeric eq (==)",
653         [OP_I_EQ]               = "integer eq (==)",
654         [OP_NE]                 = "numeric ne (!=)",
655         [OP_I_NE]               = "integer ne (!=)",
656         [OP_NCMP]               = "numeric comparison (<=>)",
657         [OP_I_NCMP]             = "integer comparison (<=>)",
658         [OP_SLT]                = "string lt",
659         [OP_SGT]                = "string gt",
660         [OP_SLE]                = "string le",
661         [OP_SGE]                = "string ge",
662         [OP_SEQ]                = "string eq",
663         [OP_SNE]                = "string ne",
664         [OP_SCMP]               = "string comparison (cmp)",
665         [OP_BIT_AND]            = "bitwise and (&)",
666         [OP_BIT_XOR]            = "bitwise xor (^)",
667         [OP_BIT_OR]             = "bitwise or (|)",
668         [OP_NBIT_AND]           = "numeric bitwise and (&)",
669         [OP_NBIT_XOR]           = "numeric bitwise xor (^)",
670         [OP_NBIT_OR]            = "numeric bitwise or (|)",
671         [OP_SBIT_AND]           = "string bitwise and (&.)",
672         [OP_SBIT_XOR]           = "string bitwise xor (^.)",
673         [OP_SBIT_OR]            = "string bitwise or (|.)",
674         [OP_NEGATE]             = "negation (-)",
675         [OP_I_NEGATE]           = "integer negation (-)",
676         [OP_NOT]                = "not",
677         [OP_COMPLEMENT]         = "1's complement (~)",
678         [OP_NCOMPLEMENT]        = "numeric 1's complement (~)",
679         [OP_SCOMPLEMENT]        = "string 1's complement (~)",
680         [OP_SMARTMATCH]         = "smart match",
681         [OP_ATAN2]              = "atan2",
682         [OP_SIN]                = "sin",
683         [OP_COS]                = "cos",
684         [OP_RAND]               = "rand",
685         [OP_SRAND]              = "srand",
686         [OP_EXP]                = "exp",
687         [OP_LOG]                = "log",
688         [OP_SQRT]               = "sqrt",
689         [OP_INT]                = "int",
690         [OP_HEX]                = "hex",
691         [OP_OCT]                = "oct",
692         [OP_ABS]                = "abs",
693         [OP_LENGTH]             = "length",
694         [OP_SUBSTR]             = "substr",
695         [OP_VEC]                = "vec",
696         [OP_INDEX]              = "index",
697         [OP_RINDEX]             = "rindex",
698         [OP_SPRINTF]            = "sprintf",
699         [OP_FORMLINE]           = "formline",
700         [OP_ORD]                = "ord",
701         [OP_CHR]                = "chr",
702         [OP_CRYPT]              = "crypt",
703         [OP_UCFIRST]            = "ucfirst",
704         [OP_LCFIRST]            = "lcfirst",
705         [OP_UC]                 = "uc",
706         [OP_LC]                 = "lc",
707         [OP_QUOTEMETA]          = "quotemeta",
708         [OP_RV2AV]              = "array dereference",
709         [OP_AELEMFAST]          = "constant array element",
710         [OP_AELEMFAST_LEX]      = "constant lexical array element",
711         [OP_AELEMFASTLEX_STORE] = "const lexical array element store",
712         [OP_AELEM]              = "array element",
713         [OP_ASLICE]             = "array slice",
714         [OP_KVASLICE]           = "index/value array slice",
715         [OP_AEACH]              = "each on array",
716         [OP_AVALUES]            = "values on array",
717         [OP_AKEYS]              = "keys on array",
718         [OP_EACH]               = "each",
719         [OP_VALUES]             = "values",
720         [OP_KEYS]               = "keys",
721         [OP_DELETE]             = "delete",
722         [OP_EXISTS]             = "exists",
723         [OP_RV2HV]              = "hash dereference",
724         [OP_HELEM]              = "hash element",
725         [OP_HSLICE]             = "hash slice",
726         [OP_KVHSLICE]           = "key/value hash slice",
727         [OP_MULTIDEREF]         = "array or hash lookup",
728         [OP_UNPACK]             = "unpack",
729         [OP_PACK]               = "pack",
730         [OP_SPLIT]              = "split",
731         [OP_JOIN]               = "join or string",
732         [OP_LIST]               = "list",
733         [OP_LSLICE]             = "list slice",
734         [OP_ANONLIST]           = "anonymous array ([])",
735         [OP_ANONHASH]           = "anonymous hash ({})",
736         [OP_EMPTYAVHV]          = "empty anon hash/array",
737         [OP_SPLICE]             = "splice",
738         [OP_PUSH]               = "push",
739         [OP_POP]                = "pop",
740         [OP_SHIFT]              = "shift",
741         [OP_UNSHIFT]            = "unshift",
742         [OP_SORT]               = "sort",
743         [OP_REVERSE]            = "reverse",
744         [OP_GREPSTART]          = "grep",
745         [OP_GREPWHILE]          = "grep iterator",
746         [OP_MAPSTART]           = "map",
747         [OP_MAPWHILE]           = "map iterator",
748         [OP_RANGE]              = "flipflop",
749         [OP_FLIP]               = "range (or flip)",
750         [OP_FLOP]               = "range (or flop)",
751         [OP_AND]                = "logical and (&&)",
752         [OP_OR]                 = "logical or (||)",
753         [OP_XOR]                = "logical xor",
754         [OP_DOR]                = "defined or (//)",
755         [OP_COND_EXPR]          = "conditional expression",
756         [OP_ANDASSIGN]          = "logical and assignment (&&=)",
757         [OP_ORASSIGN]           = "logical or assignment (||=)",
758         [OP_DORASSIGN]          = "defined or assignment (//=)",
759         [OP_ENTERSUB]           = "subroutine entry",
760         [OP_LEAVESUB]           = "subroutine exit",
761         [OP_LEAVESUBLV]         = "lvalue subroutine return",
762         [OP_ARGCHECK]           = "check subroutine arguments",
763         [OP_ARGELEM]            = "subroutine argument",
764         [OP_ARGDEFELEM]         = "subroutine argument default value",
765         [OP_CALLER]             = "caller",
766         [OP_WARN]               = "warn",
767         [OP_DIE]                = "die",
768         [OP_RESET]              = "symbol reset",
769         [OP_LINESEQ]            = "line sequence",
770         [OP_NEXTSTATE]          = "next statement",
771         [OP_DBSTATE]            = "debug next statement",
772         [OP_UNSTACK]            = "iteration finalizer",
773         [OP_ENTER]              = "block entry",
774         [OP_LEAVE]              = "block exit",
775         [OP_SCOPE]              = "block",
776         [OP_ENTERITER]          = "foreach loop entry",
777         [OP_ITER]               = "foreach loop iterator",
778         [OP_ENTERLOOP]          = "loop entry",
779         [OP_LEAVELOOP]          = "loop exit",
780         [OP_RETURN]             = "return",
781         [OP_LAST]               = "last",
782         [OP_NEXT]               = "next",
783         [OP_REDO]               = "redo",
784         [OP_DUMP]               = "dump",
785         [OP_GOTO]               = "goto",
786         [OP_EXIT]               = "exit",
787         [OP_METHOD]             = "method lookup",
788         [OP_METHOD_NAMED]       = "method with known name",
789         [OP_METHOD_SUPER]       = "super with known name",
790         [OP_METHOD_REDIR]       = "redirect method with known name",
791         [OP_METHOD_REDIR_SUPER] = "redirect super method with known name",
792         [OP_ENTERGIVEN]         = "given()",
793         [OP_LEAVEGIVEN]         = "leave given block",
794         [OP_ENTERWHEN]          = "when()",
795         [OP_LEAVEWHEN]          = "leave when block",
796         [OP_BREAK]              = "break",
797         [OP_CONTINUE]           = "continue",
798         [OP_OPEN]               = "open",
799         [OP_CLOSE]              = "close",
800         [OP_PIPE_OP]            = "pipe",
801         [OP_FILENO]             = "fileno",
802         [OP_UMASK]              = "umask",
803         [OP_BINMODE]            = "binmode",
804         [OP_TIE]                = "tie",
805         [OP_UNTIE]              = "untie",
806         [OP_TIED]               = "tied",
807         [OP_DBMOPEN]            = "dbmopen",
808         [OP_DBMCLOSE]           = "dbmclose",
809         [OP_SSELECT]            = "select system call",
810         [OP_SELECT]             = "select",
811         [OP_GETC]               = "getc",
812         [OP_READ]               = "read",
813         [OP_ENTERWRITE]         = "write",
814         [OP_LEAVEWRITE]         = "write exit",
815         [OP_PRTF]               = "printf",
816         [OP_PRINT]              = "print",
817         [OP_SAY]                = "say",
818         [OP_SYSOPEN]            = "sysopen",
819         [OP_SYSSEEK]            = "sysseek",
820         [OP_SYSREAD]            = "sysread",
821         [OP_SYSWRITE]           = "syswrite",
822         [OP_EOF]                = "eof",
823         [OP_TELL]               = "tell",
824         [OP_SEEK]               = "seek",
825         [OP_TRUNCATE]           = "truncate",
826         [OP_FCNTL]              = "fcntl",
827         [OP_IOCTL]              = "ioctl",
828         [OP_FLOCK]              = "flock",
829         [OP_SEND]               = "send",
830         [OP_RECV]               = "recv",
831         [OP_SOCKET]             = "socket",
832         [OP_SOCKPAIR]           = "socketpair",
833         [OP_BIND]               = "bind",
834         [OP_CONNECT]            = "connect",
835         [OP_LISTEN]             = "listen",
836         [OP_ACCEPT]             = "accept",
837         [OP_SHUTDOWN]           = "shutdown",
838         [OP_GSOCKOPT]           = "getsockopt",
839         [OP_SSOCKOPT]           = "setsockopt",
840         [OP_GETSOCKNAME]        = "getsockname",
841         [OP_GETPEERNAME]        = "getpeername",
842         [OP_LSTAT]              = "lstat",
843         [OP_STAT]               = "stat",
844         [OP_FTRREAD]            = "-R",
845         [OP_FTRWRITE]           = "-W",
846         [OP_FTREXEC]            = "-X",
847         [OP_FTEREAD]            = "-r",
848         [OP_FTEWRITE]           = "-w",
849         [OP_FTEEXEC]            = "-x",
850         [OP_FTIS]               = "-e",
851         [OP_FTSIZE]             = "-s",
852         [OP_FTMTIME]            = "-M",
853         [OP_FTATIME]            = "-A",
854         [OP_FTCTIME]            = "-C",
855         [OP_FTROWNED]           = "-O",
856         [OP_FTEOWNED]           = "-o",
857         [OP_FTZERO]             = "-z",
858         [OP_FTSOCK]             = "-S",
859         [OP_FTCHR]              = "-c",
860         [OP_FTBLK]              = "-b",
861         [OP_FTFILE]             = "-f",
862         [OP_FTDIR]              = "-d",
863         [OP_FTPIPE]             = "-p",
864         [OP_FTSUID]             = "-u",
865         [OP_FTSGID]             = "-g",
866         [OP_FTSVTX]             = "-k",
867         [OP_FTLINK]             = "-l",
868         [OP_FTTTY]              = "-t",
869         [OP_FTTEXT]             = "-T",
870         [OP_FTBINARY]           = "-B",
871         [OP_CHDIR]              = "chdir",
872         [OP_CHOWN]              = "chown",
873         [OP_CHROOT]             = "chroot",
874         [OP_UNLINK]             = "unlink",
875         [OP_CHMOD]              = "chmod",
876         [OP_UTIME]              = "utime",
877         [OP_RENAME]             = "rename",
878         [OP_LINK]               = "link",
879         [OP_SYMLINK]            = "symlink",
880         [OP_READLINK]           = "readlink",
881         [OP_MKDIR]              = "mkdir",
882         [OP_RMDIR]              = "rmdir",
883         [OP_OPEN_DIR]           = "opendir",
884         [OP_READDIR]            = "readdir",
885         [OP_TELLDIR]            = "telldir",
886         [OP_SEEKDIR]            = "seekdir",
887         [OP_REWINDDIR]          = "rewinddir",
888         [OP_CLOSEDIR]           = "closedir",
889         [OP_FORK]               = "fork",
890         [OP_WAIT]               = "wait",
891         [OP_WAITPID]            = "waitpid",
892         [OP_SYSTEM]             = "system",
893         [OP_EXEC]               = "exec",
894         [OP_KILL]               = "kill",
895         [OP_GETPPID]            = "getppid",
896         [OP_GETPGRP]            = "getpgrp",
897         [OP_SETPGRP]            = "setpgrp",
898         [OP_GETPRIORITY]        = "getpriority",
899         [OP_SETPRIORITY]        = "setpriority",
900         [OP_TIME]               = "time",
901         [OP_TMS]                = "times",
902         [OP_LOCALTIME]          = "localtime",
903         [OP_GMTIME]             = "gmtime",
904         [OP_ALARM]              = "alarm",
905         [OP_SLEEP]              = "sleep",
906         [OP_SHMGET]             = "shmget",
907         [OP_SHMCTL]             = "shmctl",
908         [OP_SHMREAD]            = "shmread",
909         [OP_SHMWRITE]           = "shmwrite",
910         [OP_MSGGET]             = "msgget",
911         [OP_MSGCTL]             = "msgctl",
912         [OP_MSGSND]             = "msgsnd",
913         [OP_MSGRCV]             = "msgrcv",
914         [OP_SEMOP]              = "semop",
915         [OP_SEMGET]             = "semget",
916         [OP_SEMCTL]             = "semctl",
917         [OP_REQUIRE]            = "require",
918         [OP_DOFILE]             = "do \"file\"",
919         [OP_HINTSEVAL]          = "eval hints",
920         [OP_ENTEREVAL]          = "eval \"string\"",
921         [OP_LEAVEEVAL]          = "eval \"string\" exit",
922         [OP_ENTERTRY]           = "eval {block}",
923         [OP_LEAVETRY]           = "eval {block} exit",
924         [OP_GHBYNAME]           = "gethostbyname",
925         [OP_GHBYADDR]           = "gethostbyaddr",
926         [OP_GHOSTENT]           = "gethostent",
927         [OP_GNBYNAME]           = "getnetbyname",
928         [OP_GNBYADDR]           = "getnetbyaddr",
929         [OP_GNETENT]            = "getnetent",
930         [OP_GPBYNAME]           = "getprotobyname",
931         [OP_GPBYNUMBER]         = "getprotobynumber",
932         [OP_GPROTOENT]          = "getprotoent",
933         [OP_GSBYNAME]           = "getservbyname",
934         [OP_GSBYPORT]           = "getservbyport",
935         [OP_GSERVENT]           = "getservent",
936         [OP_SHOSTENT]           = "sethostent",
937         [OP_SNETENT]            = "setnetent",
938         [OP_SPROTOENT]          = "setprotoent",
939         [OP_SSERVENT]           = "setservent",
940         [OP_EHOSTENT]           = "endhostent",
941         [OP_ENETENT]            = "endnetent",
942         [OP_EPROTOENT]          = "endprotoent",
943         [OP_ESERVENT]           = "endservent",
944         [OP_GPWNAM]             = "getpwnam",
945         [OP_GPWUID]             = "getpwuid",
946         [OP_GPWENT]             = "getpwent",
947         [OP_SPWENT]             = "setpwent",
948         [OP_EPWENT]             = "endpwent",
949         [OP_GGRNAM]             = "getgrnam",
950         [OP_GGRGID]             = "getgrgid",
951         [OP_GGRENT]             = "getgrent",
952         [OP_SGRENT]             = "setgrent",
953         [OP_EGRENT]             = "endgrent",
954         [OP_GETLOGIN]           = "getlogin",
955         [OP_SYSCALL]            = "syscall",
956         [OP_LOCK]               = "lock",
957         [OP_ONCE]               = "once",
958         [OP_CUSTOM]             = "unknown custom operator",
959         [OP_COREARGS]           = "CORE:: subroutine",
960         [OP_AVHVSWITCH]         = "Array/hash switch",
961         [OP_RUNCV]              = "__SUB__",
962         [OP_FC]                 = "fc",
963         [OP_PADCV]              = "private subroutine",
964         [OP_INTROCV]            = "private subroutine",
965         [OP_CLONECV]            = "private subroutine",
966         [OP_PADRANGE]           = "list of private variables",
967         [OP_REFASSIGN]          = "lvalue ref assignment",
968         [OP_LVREF]              = "lvalue ref assignment",
969         [OP_LVREFSLICE]         = "lvalue ref assignment",
970         [OP_LVAVREF]            = "lvalue array reference",
971         [OP_ANONCONST]          = "anonymous constant",
972         [OP_ISA]                = "derived class test",
973         [OP_CMPCHAIN_AND]       = "comparison chaining",
974         [OP_CMPCHAIN_DUP]       = "comparand shuffling",
975         [OP_ENTERTRYCATCH]      = "try {block}",
976         [OP_LEAVETRYCATCH]      = "try {block} exit",
977         [OP_POPTRY]             = "pop try",
978         [OP_CATCH]              = "catch {} block",
979         [OP_PUSHDEFER]          = "push defer {} block",
980         [OP_IS_BOOL]            = "boolean type test",
981         [OP_IS_WEAK]            = "weakref type test",
982         [OP_WEAKEN]             = "reference weaken",
983         [OP_UNWEAKEN]           = "reference unweaken",
984         [OP_BLESSED]            = "blessed",
985         [OP_REFADDR]            = "refaddr",
986         [OP_REFTYPE]            = "reftype",
987         [OP_CEIL]               = "ceil",
988         [OP_FLOOR]              = "floor",
989         [OP_IS_TAINTED]         = "is_tainted",
990         [OP_HELEMEXISTSOR]      = "hash element exists or",
991     [OP_max] = "freed op",
992 });
993
994 END_EXTERN_C
995
996 START_EXTERN_C
997
998 EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
999 INIT({
1000         [OP_NULL]               = Perl_pp_null,
1001         [OP_STUB]               = Perl_pp_stub,
1002         [OP_SCALAR]             = Perl_pp_scalar,       /* implemented by Perl_pp_null */
1003         [OP_PUSHMARK]           = Perl_pp_pushmark,
1004         [OP_WANTARRAY]          = Perl_pp_wantarray,
1005         [OP_CONST]              = Perl_pp_const,
1006         [OP_GVSV]               = Perl_pp_gvsv,
1007         [OP_GV]                 = Perl_pp_gv,
1008         [OP_GELEM]              = Perl_pp_gelem,
1009         [OP_PADSV]              = Perl_pp_padsv,
1010         [OP_PADSV_STORE]        = Perl_pp_padsv_store,
1011         [OP_PADAV]              = Perl_pp_padav,
1012         [OP_PADHV]              = Perl_pp_padhv,
1013         [OP_PADANY]             = Perl_pp_padany,       /* implemented by Perl_unimplemented_op */
1014         [OP_RV2GV]              = Perl_pp_rv2gv,
1015         [OP_RV2SV]              = Perl_pp_rv2sv,
1016         [OP_AV2ARYLEN]          = Perl_pp_av2arylen,
1017         [OP_RV2CV]              = Perl_pp_rv2cv,
1018         [OP_ANONCODE]           = Perl_pp_anoncode,
1019         [OP_PROTOTYPE]          = Perl_pp_prototype,
1020         [OP_REFGEN]             = Perl_pp_refgen,
1021         [OP_SREFGEN]            = Perl_pp_srefgen,
1022         [OP_REF]                = Perl_pp_ref,
1023         [OP_BLESS]              = Perl_pp_bless,
1024         [OP_BACKTICK]           = Perl_pp_backtick,
1025         [OP_GLOB]               = Perl_pp_glob,
1026         [OP_READLINE]           = Perl_pp_readline,
1027         [OP_RCATLINE]           = Perl_pp_rcatline,
1028         [OP_REGCMAYBE]          = Perl_pp_regcmaybe,    /* implemented by Perl_pp_null */
1029         [OP_REGCRESET]          = Perl_pp_regcreset,
1030         [OP_REGCOMP]            = Perl_pp_regcomp,
1031         [OP_MATCH]              = Perl_pp_match,
1032         [OP_QR]                 = Perl_pp_qr,
1033         [OP_SUBST]              = Perl_pp_subst,
1034         [OP_SUBSTCONT]          = Perl_pp_substcont,
1035         [OP_TRANS]              = Perl_pp_trans,
1036         [OP_TRANSR]             = Perl_pp_transr,       /* implemented by Perl_pp_trans */
1037         [OP_SASSIGN]            = Perl_pp_sassign,
1038         [OP_AASSIGN]            = Perl_pp_aassign,
1039         [OP_CHOP]               = Perl_pp_chop,
1040         [OP_SCHOP]              = Perl_pp_schop,
1041         [OP_CHOMP]              = Perl_pp_chomp,        /* implemented by Perl_pp_chop */
1042         [OP_SCHOMP]             = Perl_pp_schomp,       /* implemented by Perl_pp_schop */
1043         [OP_DEFINED]            = Perl_pp_defined,
1044         [OP_UNDEF]              = Perl_pp_undef,
1045         [OP_STUDY]              = Perl_pp_study,
1046         [OP_POS]                = Perl_pp_pos,
1047         [OP_PREINC]             = Perl_pp_preinc,
1048         [OP_I_PREINC]           = Perl_pp_i_preinc,     /* implemented by Perl_pp_preinc */
1049         [OP_PREDEC]             = Perl_pp_predec,
1050         [OP_I_PREDEC]           = Perl_pp_i_predec,     /* implemented by Perl_pp_predec */
1051         [OP_POSTINC]            = Perl_pp_postinc,
1052         [OP_I_POSTINC]          = Perl_pp_i_postinc,    /* implemented by Perl_pp_postinc */
1053         [OP_POSTDEC]            = Perl_pp_postdec,
1054         [OP_I_POSTDEC]          = Perl_pp_i_postdec,    /* implemented by Perl_pp_postdec */
1055         [OP_POW]                = Perl_pp_pow,
1056         [OP_MULTIPLY]           = Perl_pp_multiply,
1057         [OP_I_MULTIPLY]         = Perl_pp_i_multiply,
1058         [OP_DIVIDE]             = Perl_pp_divide,
1059         [OP_I_DIVIDE]           = Perl_pp_i_divide,
1060         [OP_MODULO]             = Perl_pp_modulo,
1061         [OP_I_MODULO]           = Perl_pp_i_modulo,
1062         [OP_REPEAT]             = Perl_pp_repeat,
1063         [OP_ADD]                = Perl_pp_add,
1064         [OP_I_ADD]              = Perl_pp_i_add,
1065         [OP_SUBTRACT]           = Perl_pp_subtract,
1066         [OP_I_SUBTRACT]         = Perl_pp_i_subtract,
1067         [OP_CONCAT]             = Perl_pp_concat,
1068         [OP_MULTICONCAT]        = Perl_pp_multiconcat,
1069         [OP_STRINGIFY]          = Perl_pp_stringify,
1070         [OP_LEFT_SHIFT]         = Perl_pp_left_shift,
1071         [OP_RIGHT_SHIFT]        = Perl_pp_right_shift,
1072         [OP_LT]                 = Perl_pp_lt,
1073         [OP_I_LT]               = Perl_pp_i_lt,
1074         [OP_GT]                 = Perl_pp_gt,
1075         [OP_I_GT]               = Perl_pp_i_gt,
1076         [OP_LE]                 = Perl_pp_le,
1077         [OP_I_LE]               = Perl_pp_i_le,
1078         [OP_GE]                 = Perl_pp_ge,
1079         [OP_I_GE]               = Perl_pp_i_ge,
1080         [OP_EQ]                 = Perl_pp_eq,
1081         [OP_I_EQ]               = Perl_pp_i_eq,
1082         [OP_NE]                 = Perl_pp_ne,
1083         [OP_I_NE]               = Perl_pp_i_ne,
1084         [OP_NCMP]               = Perl_pp_ncmp,
1085         [OP_I_NCMP]             = Perl_pp_i_ncmp,
1086         [OP_SLT]                = Perl_pp_slt,  /* implemented by Perl_pp_sle */
1087         [OP_SGT]                = Perl_pp_sgt,  /* implemented by Perl_pp_sle */
1088         [OP_SLE]                = Perl_pp_sle,
1089         [OP_SGE]                = Perl_pp_sge,  /* implemented by Perl_pp_sle */
1090         [OP_SEQ]                = Perl_pp_seq,
1091         [OP_SNE]                = Perl_pp_sne,
1092         [OP_SCMP]               = Perl_pp_scmp,
1093         [OP_BIT_AND]            = Perl_pp_bit_and,
1094         [OP_BIT_XOR]            = Perl_pp_bit_xor,      /* implemented by Perl_pp_bit_or */
1095         [OP_BIT_OR]             = Perl_pp_bit_or,
1096         [OP_NBIT_AND]           = Perl_pp_nbit_and,
1097         [OP_NBIT_XOR]           = Perl_pp_nbit_xor,     /* implemented by Perl_pp_nbit_or */
1098         [OP_NBIT_OR]            = Perl_pp_nbit_or,
1099         [OP_SBIT_AND]           = Perl_pp_sbit_and,
1100         [OP_SBIT_XOR]           = Perl_pp_sbit_xor,     /* implemented by Perl_pp_sbit_or */
1101         [OP_SBIT_OR]            = Perl_pp_sbit_or,
1102         [OP_NEGATE]             = Perl_pp_negate,
1103         [OP_I_NEGATE]           = Perl_pp_i_negate,
1104         [OP_NOT]                = Perl_pp_not,
1105         [OP_COMPLEMENT]         = Perl_pp_complement,
1106         [OP_NCOMPLEMENT]        = Perl_pp_ncomplement,
1107         [OP_SCOMPLEMENT]        = Perl_pp_scomplement,
1108         [OP_SMARTMATCH]         = Perl_pp_smartmatch,
1109         [OP_ATAN2]              = Perl_pp_atan2,
1110         [OP_SIN]                = Perl_pp_sin,
1111         [OP_COS]                = Perl_pp_cos,  /* implemented by Perl_pp_sin */
1112         [OP_RAND]               = Perl_pp_rand,
1113         [OP_SRAND]              = Perl_pp_srand,
1114         [OP_EXP]                = Perl_pp_exp,  /* implemented by Perl_pp_sin */
1115         [OP_LOG]                = Perl_pp_log,  /* implemented by Perl_pp_sin */
1116         [OP_SQRT]               = Perl_pp_sqrt, /* implemented by Perl_pp_sin */
1117         [OP_INT]                = Perl_pp_int,
1118         [OP_HEX]                = Perl_pp_hex,  /* implemented by Perl_pp_oct */
1119         [OP_OCT]                = Perl_pp_oct,
1120         [OP_ABS]                = Perl_pp_abs,
1121         [OP_LENGTH]             = Perl_pp_length,
1122         [OP_SUBSTR]             = Perl_pp_substr,
1123         [OP_VEC]                = Perl_pp_vec,
1124         [OP_INDEX]              = Perl_pp_index,
1125         [OP_RINDEX]             = Perl_pp_rindex,       /* implemented by Perl_pp_index */
1126         [OP_SPRINTF]            = Perl_pp_sprintf,
1127         [OP_FORMLINE]           = Perl_pp_formline,
1128         [OP_ORD]                = Perl_pp_ord,
1129         [OP_CHR]                = Perl_pp_chr,
1130         [OP_CRYPT]              = Perl_pp_crypt,
1131         [OP_UCFIRST]            = Perl_pp_ucfirst,
1132         [OP_LCFIRST]            = Perl_pp_lcfirst,      /* implemented by Perl_pp_ucfirst */
1133         [OP_UC]                 = Perl_pp_uc,
1134         [OP_LC]                 = Perl_pp_lc,
1135         [OP_QUOTEMETA]          = Perl_pp_quotemeta,
1136         [OP_RV2AV]              = Perl_pp_rv2av,
1137         [OP_AELEMFAST]          = Perl_pp_aelemfast,
1138         [OP_AELEMFAST_LEX]      = Perl_pp_aelemfast_lex,        /* implemented by Perl_pp_aelemfast */
1139         [OP_AELEMFASTLEX_STORE] = Perl_pp_aelemfastlex_store,
1140         [OP_AELEM]              = Perl_pp_aelem,
1141         [OP_ASLICE]             = Perl_pp_aslice,
1142         [OP_KVASLICE]           = Perl_pp_kvaslice,
1143         [OP_AEACH]              = Perl_pp_aeach,
1144         [OP_AVALUES]            = Perl_pp_avalues,      /* implemented by Perl_pp_akeys */
1145         [OP_AKEYS]              = Perl_pp_akeys,
1146         [OP_EACH]               = Perl_pp_each,
1147         [OP_VALUES]             = Perl_pp_values,       /* implemented by Perl_do_kv */
1148         [OP_KEYS]               = Perl_pp_keys, /* implemented by Perl_do_kv */
1149         [OP_DELETE]             = Perl_pp_delete,
1150         [OP_EXISTS]             = Perl_pp_exists,
1151         [OP_RV2HV]              = Perl_pp_rv2hv,        /* implemented by Perl_pp_rv2av */
1152         [OP_HELEM]              = Perl_pp_helem,
1153         [OP_HSLICE]             = Perl_pp_hslice,
1154         [OP_KVHSLICE]           = Perl_pp_kvhslice,
1155         [OP_MULTIDEREF]         = Perl_pp_multideref,
1156         [OP_UNPACK]             = Perl_pp_unpack,
1157         [OP_PACK]               = Perl_pp_pack,
1158         [OP_SPLIT]              = Perl_pp_split,
1159         [OP_JOIN]               = Perl_pp_join,
1160         [OP_LIST]               = Perl_pp_list,
1161         [OP_LSLICE]             = Perl_pp_lslice,
1162         [OP_ANONLIST]           = Perl_pp_anonlist,
1163         [OP_ANONHASH]           = Perl_pp_anonhash,
1164         [OP_EMPTYAVHV]          = Perl_pp_emptyavhv,
1165         [OP_SPLICE]             = Perl_pp_splice,
1166         [OP_PUSH]               = Perl_pp_push,
1167         [OP_POP]                = Perl_pp_pop,  /* implemented by Perl_pp_shift */
1168         [OP_SHIFT]              = Perl_pp_shift,
1169         [OP_UNSHIFT]            = Perl_pp_unshift,
1170         [OP_SORT]               = Perl_pp_sort,
1171         [OP_REVERSE]            = Perl_pp_reverse,
1172         [OP_GREPSTART]          = Perl_pp_grepstart,
1173         [OP_GREPWHILE]          = Perl_pp_grepwhile,
1174         [OP_MAPSTART]           = Perl_pp_mapstart,     /* implemented by Perl_pp_grepstart */
1175         [OP_MAPWHILE]           = Perl_pp_mapwhile,
1176         [OP_RANGE]              = Perl_pp_range,
1177         [OP_FLIP]               = Perl_pp_flip,
1178         [OP_FLOP]               = Perl_pp_flop,
1179         [OP_AND]                = Perl_pp_and,
1180         [OP_OR]                 = Perl_pp_or,
1181         [OP_XOR]                = Perl_pp_xor,
1182         [OP_DOR]                = Perl_pp_dor,  /* implemented by Perl_pp_defined */
1183         [OP_COND_EXPR]          = Perl_pp_cond_expr,
1184         [OP_ANDASSIGN]          = Perl_pp_andassign,    /* implemented by Perl_pp_and */
1185         [OP_ORASSIGN]           = Perl_pp_orassign,     /* implemented by Perl_pp_or */
1186         [OP_DORASSIGN]          = Perl_pp_dorassign,    /* implemented by Perl_pp_defined */
1187         [OP_ENTERSUB]           = Perl_pp_entersub,
1188         [OP_LEAVESUB]           = Perl_pp_leavesub,
1189         [OP_LEAVESUBLV]         = Perl_pp_leavesublv,
1190         [OP_ARGCHECK]           = Perl_pp_argcheck,
1191         [OP_ARGELEM]            = Perl_pp_argelem,
1192         [OP_ARGDEFELEM]         = Perl_pp_argdefelem,
1193         [OP_CALLER]             = Perl_pp_caller,
1194         [OP_WARN]               = Perl_pp_warn,
1195         [OP_DIE]                = Perl_pp_die,
1196         [OP_RESET]              = Perl_pp_reset,
1197         [OP_LINESEQ]            = Perl_pp_lineseq,      /* implemented by Perl_pp_null */
1198         [OP_NEXTSTATE]          = Perl_pp_nextstate,
1199         [OP_DBSTATE]            = Perl_pp_dbstate,
1200         [OP_UNSTACK]            = Perl_pp_unstack,
1201         [OP_ENTER]              = Perl_pp_enter,
1202         [OP_LEAVE]              = Perl_pp_leave,
1203         [OP_SCOPE]              = Perl_pp_scope,        /* implemented by Perl_pp_null */
1204         [OP_ENTERITER]          = Perl_pp_enteriter,
1205         [OP_ITER]               = Perl_pp_iter,
1206         [OP_ENTERLOOP]          = Perl_pp_enterloop,
1207         [OP_LEAVELOOP]          = Perl_pp_leaveloop,
1208         [OP_RETURN]             = Perl_pp_return,
1209         [OP_LAST]               = Perl_pp_last,
1210         [OP_NEXT]               = Perl_pp_next,
1211         [OP_REDO]               = Perl_pp_redo,
1212         [OP_DUMP]               = Perl_pp_dump, /* implemented by Perl_pp_goto */
1213         [OP_GOTO]               = Perl_pp_goto,
1214         [OP_EXIT]               = Perl_pp_exit,
1215         [OP_METHOD]             = Perl_pp_method,
1216         [OP_METHOD_NAMED]       = Perl_pp_method_named,
1217         [OP_METHOD_SUPER]       = Perl_pp_method_super,
1218         [OP_METHOD_REDIR]       = Perl_pp_method_redir,
1219         [OP_METHOD_REDIR_SUPER] = Perl_pp_method_redir_super,
1220         [OP_ENTERGIVEN]         = Perl_pp_entergiven,
1221         [OP_LEAVEGIVEN]         = Perl_pp_leavegiven,
1222         [OP_ENTERWHEN]          = Perl_pp_enterwhen,
1223         [OP_LEAVEWHEN]          = Perl_pp_leavewhen,
1224         [OP_BREAK]              = Perl_pp_break,
1225         [OP_CONTINUE]           = Perl_pp_continue,
1226         [OP_OPEN]               = Perl_pp_open,
1227         [OP_CLOSE]              = Perl_pp_close,
1228         [OP_PIPE_OP]            = Perl_pp_pipe_op,
1229         [OP_FILENO]             = Perl_pp_fileno,
1230         [OP_UMASK]              = Perl_pp_umask,
1231         [OP_BINMODE]            = Perl_pp_binmode,
1232         [OP_TIE]                = Perl_pp_tie,
1233         [OP_UNTIE]              = Perl_pp_untie,
1234         [OP_TIED]               = Perl_pp_tied,
1235         [OP_DBMOPEN]            = Perl_pp_dbmopen,
1236         [OP_DBMCLOSE]           = Perl_pp_dbmclose,     /* implemented by Perl_pp_untie */
1237         [OP_SSELECT]            = Perl_pp_sselect,
1238         [OP_SELECT]             = Perl_pp_select,
1239         [OP_GETC]               = Perl_pp_getc,
1240         [OP_READ]               = Perl_pp_read, /* implemented by Perl_pp_sysread */
1241         [OP_ENTERWRITE]         = Perl_pp_enterwrite,
1242         [OP_LEAVEWRITE]         = Perl_pp_leavewrite,
1243         [OP_PRTF]               = Perl_pp_prtf,
1244         [OP_PRINT]              = Perl_pp_print,
1245         [OP_SAY]                = Perl_pp_say,  /* implemented by Perl_pp_print */
1246         [OP_SYSOPEN]            = Perl_pp_sysopen,
1247         [OP_SYSSEEK]            = Perl_pp_sysseek,
1248         [OP_SYSREAD]            = Perl_pp_sysread,
1249         [OP_SYSWRITE]           = Perl_pp_syswrite,
1250         [OP_EOF]                = Perl_pp_eof,
1251         [OP_TELL]               = Perl_pp_tell,
1252         [OP_SEEK]               = Perl_pp_seek, /* implemented by Perl_pp_sysseek */
1253         [OP_TRUNCATE]           = Perl_pp_truncate,
1254         [OP_FCNTL]              = Perl_pp_fcntl,        /* implemented by Perl_pp_ioctl */
1255         [OP_IOCTL]              = Perl_pp_ioctl,
1256         [OP_FLOCK]              = Perl_pp_flock,
1257         [OP_SEND]               = Perl_pp_send, /* implemented by Perl_pp_syswrite */
1258         [OP_RECV]               = Perl_pp_recv, /* implemented by Perl_pp_sysread */
1259         [OP_SOCKET]             = Perl_pp_socket,
1260         [OP_SOCKPAIR]           = Perl_pp_sockpair,
1261         [OP_BIND]               = Perl_pp_bind,
1262         [OP_CONNECT]            = Perl_pp_connect,      /* implemented by Perl_pp_bind */
1263         [OP_LISTEN]             = Perl_pp_listen,
1264         [OP_ACCEPT]             = Perl_pp_accept,
1265         [OP_SHUTDOWN]           = Perl_pp_shutdown,
1266         [OP_GSOCKOPT]           = Perl_pp_gsockopt,     /* implemented by Perl_pp_ssockopt */
1267         [OP_SSOCKOPT]           = Perl_pp_ssockopt,
1268         [OP_GETSOCKNAME]        = Perl_pp_getsockname,  /* implemented by Perl_pp_getpeername */
1269         [OP_GETPEERNAME]        = Perl_pp_getpeername,
1270         [OP_LSTAT]              = Perl_pp_lstat,        /* implemented by Perl_pp_stat */
1271         [OP_STAT]               = Perl_pp_stat,
1272         [OP_FTRREAD]            = Perl_pp_ftrread,
1273         [OP_FTRWRITE]           = Perl_pp_ftrwrite,     /* implemented by Perl_pp_ftrread */
1274         [OP_FTREXEC]            = Perl_pp_ftrexec,      /* implemented by Perl_pp_ftrread */
1275         [OP_FTEREAD]            = Perl_pp_fteread,      /* implemented by Perl_pp_ftrread */
1276         [OP_FTEWRITE]           = Perl_pp_ftewrite,     /* implemented by Perl_pp_ftrread */
1277         [OP_FTEEXEC]            = Perl_pp_fteexec,      /* implemented by Perl_pp_ftrread */
1278         [OP_FTIS]               = Perl_pp_ftis,
1279         [OP_FTSIZE]             = Perl_pp_ftsize,       /* implemented by Perl_pp_ftis */
1280         [OP_FTMTIME]            = Perl_pp_ftmtime,      /* implemented by Perl_pp_ftis */
1281         [OP_FTATIME]            = Perl_pp_ftatime,      /* implemented by Perl_pp_ftis */
1282         [OP_FTCTIME]            = Perl_pp_ftctime,      /* implemented by Perl_pp_ftis */
1283         [OP_FTROWNED]           = Perl_pp_ftrowned,
1284         [OP_FTEOWNED]           = Perl_pp_fteowned,     /* implemented by Perl_pp_ftrowned */
1285         [OP_FTZERO]             = Perl_pp_ftzero,       /* implemented by Perl_pp_ftrowned */
1286         [OP_FTSOCK]             = Perl_pp_ftsock,       /* implemented by Perl_pp_ftrowned */
1287         [OP_FTCHR]              = Perl_pp_ftchr,        /* implemented by Perl_pp_ftrowned */
1288         [OP_FTBLK]              = Perl_pp_ftblk,        /* implemented by Perl_pp_ftrowned */
1289         [OP_FTFILE]             = Perl_pp_ftfile,       /* implemented by Perl_pp_ftrowned */
1290         [OP_FTDIR]              = Perl_pp_ftdir,        /* implemented by Perl_pp_ftrowned */
1291         [OP_FTPIPE]             = Perl_pp_ftpipe,       /* implemented by Perl_pp_ftrowned */
1292         [OP_FTSUID]             = Perl_pp_ftsuid,       /* implemented by Perl_pp_ftrowned */
1293         [OP_FTSGID]             = Perl_pp_ftsgid,       /* implemented by Perl_pp_ftrowned */
1294         [OP_FTSVTX]             = Perl_pp_ftsvtx,       /* implemented by Perl_pp_ftrowned */
1295         [OP_FTLINK]             = Perl_pp_ftlink,
1296         [OP_FTTTY]              = Perl_pp_fttty,
1297         [OP_FTTEXT]             = Perl_pp_fttext,
1298         [OP_FTBINARY]           = Perl_pp_ftbinary,     /* implemented by Perl_pp_fttext */
1299         [OP_CHDIR]              = Perl_pp_chdir,
1300         [OP_CHOWN]              = Perl_pp_chown,
1301         [OP_CHROOT]             = Perl_pp_chroot,
1302         [OP_UNLINK]             = Perl_pp_unlink,       /* implemented by Perl_pp_chown */
1303         [OP_CHMOD]              = Perl_pp_chmod,        /* implemented by Perl_pp_chown */
1304         [OP_UTIME]              = Perl_pp_utime,        /* implemented by Perl_pp_chown */
1305         [OP_RENAME]             = Perl_pp_rename,
1306         [OP_LINK]               = Perl_pp_link,
1307         [OP_SYMLINK]            = Perl_pp_symlink,      /* implemented by Perl_pp_link */
1308         [OP_READLINK]           = Perl_pp_readlink,
1309         [OP_MKDIR]              = Perl_pp_mkdir,
1310         [OP_RMDIR]              = Perl_pp_rmdir,
1311         [OP_OPEN_DIR]           = Perl_pp_open_dir,
1312         [OP_READDIR]            = Perl_pp_readdir,
1313         [OP_TELLDIR]            = Perl_pp_telldir,
1314         [OP_SEEKDIR]            = Perl_pp_seekdir,
1315         [OP_REWINDDIR]          = Perl_pp_rewinddir,
1316         [OP_CLOSEDIR]           = Perl_pp_closedir,
1317         [OP_FORK]               = Perl_pp_fork,
1318         [OP_WAIT]               = Perl_pp_wait,
1319         [OP_WAITPID]            = Perl_pp_waitpid,
1320         [OP_SYSTEM]             = Perl_pp_system,
1321         [OP_EXEC]               = Perl_pp_exec,
1322         [OP_KILL]               = Perl_pp_kill, /* implemented by Perl_pp_chown */
1323         [OP_GETPPID]            = Perl_pp_getppid,
1324         [OP_GETPGRP]            = Perl_pp_getpgrp,
1325         [OP_SETPGRP]            = Perl_pp_setpgrp,
1326         [OP_GETPRIORITY]        = Perl_pp_getpriority,
1327         [OP_SETPRIORITY]        = Perl_pp_setpriority,
1328         [OP_TIME]               = Perl_pp_time,
1329         [OP_TMS]                = Perl_pp_tms,
1330         [OP_LOCALTIME]          = Perl_pp_localtime,    /* implemented by Perl_pp_gmtime */
1331         [OP_GMTIME]             = Perl_pp_gmtime,
1332         [OP_ALARM]              = Perl_pp_alarm,
1333         [OP_SLEEP]              = Perl_pp_sleep,
1334         [OP_SHMGET]             = Perl_pp_shmget,       /* implemented by Perl_pp_semget */
1335         [OP_SHMCTL]             = Perl_pp_shmctl,       /* implemented by Perl_pp_semctl */
1336         [OP_SHMREAD]            = Perl_pp_shmread,      /* implemented by Perl_pp_shmwrite */
1337         [OP_SHMWRITE]           = Perl_pp_shmwrite,
1338         [OP_MSGGET]             = Perl_pp_msgget,       /* implemented by Perl_pp_semget */
1339         [OP_MSGCTL]             = Perl_pp_msgctl,       /* implemented by Perl_pp_semctl */
1340         [OP_MSGSND]             = Perl_pp_msgsnd,       /* implemented by Perl_pp_shmwrite */
1341         [OP_MSGRCV]             = Perl_pp_msgrcv,       /* implemented by Perl_pp_shmwrite */
1342         [OP_SEMOP]              = Perl_pp_semop,        /* implemented by Perl_pp_shmwrite */
1343         [OP_SEMGET]             = Perl_pp_semget,
1344         [OP_SEMCTL]             = Perl_pp_semctl,
1345         [OP_REQUIRE]            = Perl_pp_require,
1346         [OP_DOFILE]             = Perl_pp_dofile,       /* implemented by Perl_pp_require */
1347         [OP_HINTSEVAL]          = Perl_pp_hintseval,
1348         [OP_ENTEREVAL]          = Perl_pp_entereval,
1349         [OP_LEAVEEVAL]          = Perl_pp_leaveeval,
1350         [OP_ENTERTRY]           = Perl_pp_entertry,
1351         [OP_LEAVETRY]           = Perl_pp_leavetry,
1352         [OP_GHBYNAME]           = Perl_pp_ghbyname,     /* implemented by Perl_pp_ghostent */
1353         [OP_GHBYADDR]           = Perl_pp_ghbyaddr,     /* implemented by Perl_pp_ghostent */
1354         [OP_GHOSTENT]           = Perl_pp_ghostent,
1355         [OP_GNBYNAME]           = Perl_pp_gnbyname,     /* implemented by Perl_pp_gnetent */
1356         [OP_GNBYADDR]           = Perl_pp_gnbyaddr,     /* implemented by Perl_pp_gnetent */
1357         [OP_GNETENT]            = Perl_pp_gnetent,
1358         [OP_GPBYNAME]           = Perl_pp_gpbyname,     /* implemented by Perl_pp_gprotoent */
1359         [OP_GPBYNUMBER]         = Perl_pp_gpbynumber,   /* implemented by Perl_pp_gprotoent */
1360         [OP_GPROTOENT]          = Perl_pp_gprotoent,
1361         [OP_GSBYNAME]           = Perl_pp_gsbyname,     /* implemented by Perl_pp_gservent */
1362         [OP_GSBYPORT]           = Perl_pp_gsbyport,     /* implemented by Perl_pp_gservent */
1363         [OP_GSERVENT]           = Perl_pp_gservent,
1364         [OP_SHOSTENT]           = Perl_pp_shostent,
1365         [OP_SNETENT]            = Perl_pp_snetent,      /* implemented by Perl_pp_shostent */
1366         [OP_SPROTOENT]          = Perl_pp_sprotoent,    /* implemented by Perl_pp_shostent */
1367         [OP_SSERVENT]           = Perl_pp_sservent,     /* implemented by Perl_pp_shostent */
1368         [OP_EHOSTENT]           = Perl_pp_ehostent,
1369         [OP_ENETENT]            = Perl_pp_enetent,      /* implemented by Perl_pp_ehostent */
1370         [OP_EPROTOENT]          = Perl_pp_eprotoent,    /* implemented by Perl_pp_ehostent */
1371         [OP_ESERVENT]           = Perl_pp_eservent,     /* implemented by Perl_pp_ehostent */
1372         [OP_GPWNAM]             = Perl_pp_gpwnam,       /* implemented by Perl_pp_gpwent */
1373         [OP_GPWUID]             = Perl_pp_gpwuid,       /* implemented by Perl_pp_gpwent */
1374         [OP_GPWENT]             = Perl_pp_gpwent,
1375         [OP_SPWENT]             = Perl_pp_spwent,       /* implemented by Perl_pp_ehostent */
1376         [OP_EPWENT]             = Perl_pp_epwent,       /* implemented by Perl_pp_ehostent */
1377         [OP_GGRNAM]             = Perl_pp_ggrnam,       /* implemented by Perl_pp_ggrent */
1378         [OP_GGRGID]             = Perl_pp_ggrgid,       /* implemented by Perl_pp_ggrent */
1379         [OP_GGRENT]             = Perl_pp_ggrent,
1380         [OP_SGRENT]             = Perl_pp_sgrent,       /* implemented by Perl_pp_ehostent */
1381         [OP_EGRENT]             = Perl_pp_egrent,       /* implemented by Perl_pp_ehostent */
1382         [OP_GETLOGIN]           = Perl_pp_getlogin,
1383         [OP_SYSCALL]            = Perl_pp_syscall,
1384         [OP_LOCK]               = Perl_pp_lock,
1385         [OP_ONCE]               = Perl_pp_once,
1386         [OP_CUSTOM]             = Perl_pp_custom,       /* implemented by Perl_unimplemented_op */
1387         [OP_COREARGS]           = Perl_pp_coreargs,
1388         [OP_AVHVSWITCH]         = Perl_pp_avhvswitch,
1389         [OP_RUNCV]              = Perl_pp_runcv,
1390         [OP_FC]                 = Perl_pp_fc,
1391         [OP_PADCV]              = Perl_pp_padcv,
1392         [OP_INTROCV]            = Perl_pp_introcv,
1393         [OP_CLONECV]            = Perl_pp_clonecv,
1394         [OP_PADRANGE]           = Perl_pp_padrange,
1395         [OP_REFASSIGN]          = Perl_pp_refassign,
1396         [OP_LVREF]              = Perl_pp_lvref,
1397         [OP_LVREFSLICE]         = Perl_pp_lvrefslice,
1398         [OP_LVAVREF]            = Perl_pp_lvavref,
1399         [OP_ANONCONST]          = Perl_pp_anonconst,
1400         [OP_ISA]                = Perl_pp_isa,
1401         [OP_CMPCHAIN_AND]       = Perl_pp_cmpchain_and,
1402         [OP_CMPCHAIN_DUP]       = Perl_pp_cmpchain_dup,
1403         [OP_ENTERTRYCATCH]      = Perl_pp_entertrycatch,
1404         [OP_LEAVETRYCATCH]      = Perl_pp_leavetrycatch,
1405         [OP_POPTRY]             = Perl_pp_poptry,
1406         [OP_CATCH]              = Perl_pp_catch,
1407         [OP_PUSHDEFER]          = Perl_pp_pushdefer,
1408         [OP_IS_BOOL]            = Perl_pp_is_bool,
1409         [OP_IS_WEAK]            = Perl_pp_is_weak,
1410         [OP_WEAKEN]             = Perl_pp_weaken,
1411         [OP_UNWEAKEN]           = Perl_pp_unweaken,
1412         [OP_BLESSED]            = Perl_pp_blessed,
1413         [OP_REFADDR]            = Perl_pp_refaddr,
1414         [OP_REFTYPE]            = Perl_pp_reftype,
1415         [OP_CEIL]               = Perl_pp_ceil,
1416         [OP_FLOOR]              = Perl_pp_floor,
1417         [OP_IS_TAINTED]         = Perl_pp_is_tainted,
1418         [OP_HELEMEXISTSOR]      = Perl_pp_helemexistsor,
1419 });
1420
1421 EXT Perl_check_t PL_check[] /* or perlvars.h */
1422 INIT({
1423         [OP_NULL]               = Perl_ck_null,
1424         [OP_STUB]               = Perl_ck_null,
1425         [OP_SCALAR]             = Perl_ck_fun,
1426         [OP_PUSHMARK]           = Perl_ck_null,
1427         [OP_WANTARRAY]          = Perl_ck_null,
1428         [OP_CONST]              = Perl_ck_svconst,
1429         [OP_GVSV]               = Perl_ck_null,
1430         [OP_GV]                 = Perl_ck_null,
1431         [OP_GELEM]              = Perl_ck_null,
1432         [OP_PADSV]              = Perl_ck_null,
1433         [OP_PADSV_STORE]        = Perl_ck_sassign,
1434         [OP_PADAV]              = Perl_ck_null,
1435         [OP_PADHV]              = Perl_ck_null,
1436         [OP_PADANY]             = Perl_ck_null,
1437         [OP_RV2GV]              = Perl_ck_rvconst,
1438         [OP_RV2SV]              = Perl_ck_rvconst,
1439         [OP_AV2ARYLEN]          = Perl_ck_null,
1440         [OP_RV2CV]              = Perl_ck_rvconst,
1441         [OP_ANONCODE]           = Perl_ck_anoncode,
1442         [OP_PROTOTYPE]          = Perl_ck_prototype,
1443         [OP_REFGEN]             = Perl_ck_spair,
1444         [OP_SREFGEN]            = Perl_ck_null,
1445         [OP_REF]                = Perl_ck_fun,
1446         [OP_BLESS]              = Perl_ck_fun,
1447         [OP_BACKTICK]           = Perl_ck_backtick,
1448         [OP_GLOB]               = Perl_ck_glob,
1449         [OP_READLINE]           = Perl_ck_readline,
1450         [OP_RCATLINE]           = Perl_ck_null,
1451         [OP_REGCMAYBE]          = Perl_ck_fun,
1452         [OP_REGCRESET]          = Perl_ck_fun,
1453         [OP_REGCOMP]            = Perl_ck_null,
1454         [OP_MATCH]              = Perl_ck_match,
1455         [OP_QR]                 = Perl_ck_match,
1456         [OP_SUBST]              = Perl_ck_match,
1457         [OP_SUBSTCONT]          = Perl_ck_null,
1458         [OP_TRANS]              = Perl_ck_match,
1459         [OP_TRANSR]             = Perl_ck_match,
1460         [OP_SASSIGN]            = Perl_ck_sassign,
1461         [OP_AASSIGN]            = Perl_ck_null,
1462         [OP_CHOP]               = Perl_ck_spair,
1463         [OP_SCHOP]              = Perl_ck_null,
1464         [OP_CHOMP]              = Perl_ck_spair,
1465         [OP_SCHOMP]             = Perl_ck_null,
1466         [OP_DEFINED]            = Perl_ck_defined,
1467         [OP_UNDEF]              = Perl_ck_fun,
1468         [OP_STUDY]              = Perl_ck_fun,
1469         [OP_POS]                = Perl_ck_fun,
1470         [OP_PREINC]             = Perl_ck_lfun,
1471         [OP_I_PREINC]           = Perl_ck_lfun,
1472         [OP_PREDEC]             = Perl_ck_lfun,
1473         [OP_I_PREDEC]           = Perl_ck_lfun,
1474         [OP_POSTINC]            = Perl_ck_lfun,
1475         [OP_I_POSTINC]          = Perl_ck_lfun,
1476         [OP_POSTDEC]            = Perl_ck_lfun,
1477         [OP_I_POSTDEC]          = Perl_ck_lfun,
1478         [OP_POW]                = Perl_ck_null,
1479         [OP_MULTIPLY]           = Perl_ck_null,
1480         [OP_I_MULTIPLY]         = Perl_ck_null,
1481         [OP_DIVIDE]             = Perl_ck_null,
1482         [OP_I_DIVIDE]           = Perl_ck_null,
1483         [OP_MODULO]             = Perl_ck_null,
1484         [OP_I_MODULO]           = Perl_ck_null,
1485         [OP_REPEAT]             = Perl_ck_repeat,
1486         [OP_ADD]                = Perl_ck_null,
1487         [OP_I_ADD]              = Perl_ck_null,
1488         [OP_SUBTRACT]           = Perl_ck_null,
1489         [OP_I_SUBTRACT]         = Perl_ck_null,
1490         [OP_CONCAT]             = Perl_ck_concat,
1491         [OP_MULTICONCAT]        = Perl_ck_null,
1492         [OP_STRINGIFY]          = Perl_ck_stringify,
1493         [OP_LEFT_SHIFT]         = Perl_ck_bitop,
1494         [OP_RIGHT_SHIFT]        = Perl_ck_bitop,
1495         [OP_LT]                 = Perl_ck_cmp,
1496         [OP_I_LT]               = Perl_ck_cmp,
1497         [OP_GT]                 = Perl_ck_cmp,
1498         [OP_I_GT]               = Perl_ck_cmp,
1499         [OP_LE]                 = Perl_ck_cmp,
1500         [OP_I_LE]               = Perl_ck_cmp,
1501         [OP_GE]                 = Perl_ck_cmp,
1502         [OP_I_GE]               = Perl_ck_cmp,
1503         [OP_EQ]                 = Perl_ck_cmp,
1504         [OP_I_EQ]               = Perl_ck_cmp,
1505         [OP_NE]                 = Perl_ck_cmp,
1506         [OP_I_NE]               = Perl_ck_cmp,
1507         [OP_NCMP]               = Perl_ck_null,
1508         [OP_I_NCMP]             = Perl_ck_null,
1509         [OP_SLT]                = Perl_ck_null,
1510         [OP_SGT]                = Perl_ck_null,
1511         [OP_SLE]                = Perl_ck_null,
1512         [OP_SGE]                = Perl_ck_null,
1513         [OP_SEQ]                = Perl_ck_null,
1514         [OP_SNE]                = Perl_ck_null,
1515         [OP_SCMP]               = Perl_ck_null,
1516         [OP_BIT_AND]            = Perl_ck_bitop,
1517         [OP_BIT_XOR]            = Perl_ck_bitop,
1518         [OP_BIT_OR]             = Perl_ck_bitop,
1519         [OP_NBIT_AND]           = Perl_ck_bitop,
1520         [OP_NBIT_XOR]           = Perl_ck_bitop,
1521         [OP_NBIT_OR]            = Perl_ck_bitop,
1522         [OP_SBIT_AND]           = Perl_ck_bitop,
1523         [OP_SBIT_XOR]           = Perl_ck_bitop,
1524         [OP_SBIT_OR]            = Perl_ck_bitop,
1525         [OP_NEGATE]             = Perl_ck_null,
1526         [OP_I_NEGATE]           = Perl_ck_null,
1527         [OP_NOT]                = Perl_ck_null,
1528         [OP_COMPLEMENT]         = Perl_ck_bitop,
1529         [OP_NCOMPLEMENT]        = Perl_ck_bitop,
1530         [OP_SCOMPLEMENT]        = Perl_ck_null,
1531         [OP_SMARTMATCH]         = Perl_ck_smartmatch,
1532         [OP_ATAN2]              = Perl_ck_fun,
1533         [OP_SIN]                = Perl_ck_fun,
1534         [OP_COS]                = Perl_ck_fun,
1535         [OP_RAND]               = Perl_ck_fun,
1536         [OP_SRAND]              = Perl_ck_fun,
1537         [OP_EXP]                = Perl_ck_fun,
1538         [OP_LOG]                = Perl_ck_fun,
1539         [OP_SQRT]               = Perl_ck_fun,
1540         [OP_INT]                = Perl_ck_fun,
1541         [OP_HEX]                = Perl_ck_fun,
1542         [OP_OCT]                = Perl_ck_fun,
1543         [OP_ABS]                = Perl_ck_fun,
1544         [OP_LENGTH]             = Perl_ck_length,
1545         [OP_SUBSTR]             = Perl_ck_substr,
1546         [OP_VEC]                = Perl_ck_fun,
1547         [OP_INDEX]              = Perl_ck_index,
1548         [OP_RINDEX]             = Perl_ck_index,
1549         [OP_SPRINTF]            = Perl_ck_lfun,
1550         [OP_FORMLINE]           = Perl_ck_fun,
1551         [OP_ORD]                = Perl_ck_fun,
1552         [OP_CHR]                = Perl_ck_fun,
1553         [OP_CRYPT]              = Perl_ck_fun,
1554         [OP_UCFIRST]            = Perl_ck_fun,
1555         [OP_LCFIRST]            = Perl_ck_fun,
1556         [OP_UC]                 = Perl_ck_fun,
1557         [OP_LC]                 = Perl_ck_fun,
1558         [OP_QUOTEMETA]          = Perl_ck_fun,
1559         [OP_RV2AV]              = Perl_ck_rvconst,
1560         [OP_AELEMFAST]          = Perl_ck_null,
1561         [OP_AELEMFAST_LEX]      = Perl_ck_null,
1562         [OP_AELEMFASTLEX_STORE] = Perl_ck_null,
1563         [OP_AELEM]              = Perl_ck_null,
1564         [OP_ASLICE]             = Perl_ck_null,
1565         [OP_KVASLICE]           = Perl_ck_null,
1566         [OP_AEACH]              = Perl_ck_each,
1567         [OP_AVALUES]            = Perl_ck_each,
1568         [OP_AKEYS]              = Perl_ck_each,
1569         [OP_EACH]               = Perl_ck_each,
1570         [OP_VALUES]             = Perl_ck_each,
1571         [OP_KEYS]               = Perl_ck_each,
1572         [OP_DELETE]             = Perl_ck_delete,
1573         [OP_EXISTS]             = Perl_ck_exists,
1574         [OP_RV2HV]              = Perl_ck_rvconst,
1575         [OP_HELEM]              = Perl_ck_null,
1576         [OP_HSLICE]             = Perl_ck_null,
1577         [OP_KVHSLICE]           = Perl_ck_null,
1578         [OP_MULTIDEREF]         = Perl_ck_null,
1579         [OP_UNPACK]             = Perl_ck_fun,
1580         [OP_PACK]               = Perl_ck_fun,
1581         [OP_SPLIT]              = Perl_ck_split,
1582         [OP_JOIN]               = Perl_ck_join,
1583         [OP_LIST]               = Perl_ck_null,
1584         [OP_LSLICE]             = Perl_ck_null,
1585         [OP_ANONLIST]           = Perl_ck_fun,
1586         [OP_ANONHASH]           = Perl_ck_fun,
1587         [OP_EMPTYAVHV]          = Perl_ck_fun,
1588         [OP_SPLICE]             = Perl_ck_fun,
1589         [OP_PUSH]               = Perl_ck_fun,
1590         [OP_POP]                = Perl_ck_shift,
1591         [OP_SHIFT]              = Perl_ck_shift,
1592         [OP_UNSHIFT]            = Perl_ck_fun,
1593         [OP_SORT]               = Perl_ck_sort,
1594         [OP_REVERSE]            = Perl_ck_fun,
1595         [OP_GREPSTART]          = Perl_ck_grep,
1596         [OP_GREPWHILE]          = Perl_ck_null,
1597         [OP_MAPSTART]           = Perl_ck_grep,
1598         [OP_MAPWHILE]           = Perl_ck_null,
1599         [OP_RANGE]              = Perl_ck_null,
1600         [OP_FLIP]               = Perl_ck_null,
1601         [OP_FLOP]               = Perl_ck_null,
1602         [OP_AND]                = Perl_ck_null,
1603         [OP_OR]                 = Perl_ck_null,
1604         [OP_XOR]                = Perl_ck_null,
1605         [OP_DOR]                = Perl_ck_null,
1606         [OP_COND_EXPR]          = Perl_ck_null,
1607         [OP_ANDASSIGN]          = Perl_ck_null,
1608         [OP_ORASSIGN]           = Perl_ck_null,
1609         [OP_DORASSIGN]          = Perl_ck_null,
1610         [OP_ENTERSUB]           = Perl_ck_subr,
1611         [OP_LEAVESUB]           = Perl_ck_null,
1612         [OP_LEAVESUBLV]         = Perl_ck_null,
1613         [OP_ARGCHECK]           = Perl_ck_null,
1614         [OP_ARGELEM]            = Perl_ck_null,
1615         [OP_ARGDEFELEM]         = Perl_ck_null,
1616         [OP_CALLER]             = Perl_ck_fun,
1617         [OP_WARN]               = Perl_ck_fun,
1618         [OP_DIE]                = Perl_ck_fun,
1619         [OP_RESET]              = Perl_ck_fun,
1620         [OP_LINESEQ]            = Perl_ck_null,
1621         [OP_NEXTSTATE]          = Perl_ck_null,
1622         [OP_DBSTATE]            = Perl_ck_null,
1623         [OP_UNSTACK]            = Perl_ck_null,
1624         [OP_ENTER]              = Perl_ck_null,
1625         [OP_LEAVE]              = Perl_ck_null,
1626         [OP_SCOPE]              = Perl_ck_null,
1627         [OP_ENTERITER]          = Perl_ck_null,
1628         [OP_ITER]               = Perl_ck_null,
1629         [OP_ENTERLOOP]          = Perl_ck_null,
1630         [OP_LEAVELOOP]          = Perl_ck_null,
1631         [OP_RETURN]             = Perl_ck_return,
1632         [OP_LAST]               = Perl_ck_null,
1633         [OP_NEXT]               = Perl_ck_null,
1634         [OP_REDO]               = Perl_ck_null,
1635         [OP_DUMP]               = Perl_ck_null,
1636         [OP_GOTO]               = Perl_ck_null,
1637         [OP_EXIT]               = Perl_ck_fun,
1638         [OP_METHOD]             = Perl_ck_method,
1639         [OP_METHOD_NAMED]       = Perl_ck_null,
1640         [OP_METHOD_SUPER]       = Perl_ck_null,
1641         [OP_METHOD_REDIR]       = Perl_ck_null,
1642         [OP_METHOD_REDIR_SUPER] = Perl_ck_null,
1643         [OP_ENTERGIVEN]         = Perl_ck_null,
1644         [OP_LEAVEGIVEN]         = Perl_ck_null,
1645         [OP_ENTERWHEN]          = Perl_ck_null,
1646         [OP_LEAVEWHEN]          = Perl_ck_null,
1647         [OP_BREAK]              = Perl_ck_null,
1648         [OP_CONTINUE]           = Perl_ck_null,
1649         [OP_OPEN]               = Perl_ck_open,
1650         [OP_CLOSE]              = Perl_ck_fun,
1651         [OP_PIPE_OP]            = Perl_ck_fun,
1652         [OP_FILENO]             = Perl_ck_fun,
1653         [OP_UMASK]              = Perl_ck_fun,
1654         [OP_BINMODE]            = Perl_ck_fun,
1655         [OP_TIE]                = Perl_ck_fun,
1656         [OP_UNTIE]              = Perl_ck_fun,
1657         [OP_TIED]               = Perl_ck_fun,
1658         [OP_DBMOPEN]            = Perl_ck_fun,
1659         [OP_DBMCLOSE]           = Perl_ck_fun,
1660         [OP_SSELECT]            = Perl_ck_select,
1661         [OP_SELECT]             = Perl_ck_select,
1662         [OP_GETC]               = Perl_ck_eof,
1663         [OP_READ]               = Perl_ck_fun,
1664         [OP_ENTERWRITE]         = Perl_ck_fun,
1665         [OP_LEAVEWRITE]         = Perl_ck_null,
1666         [OP_PRTF]               = Perl_ck_listiob,
1667         [OP_PRINT]              = Perl_ck_listiob,
1668         [OP_SAY]                = Perl_ck_listiob,
1669         [OP_SYSOPEN]            = Perl_ck_fun,
1670         [OP_SYSSEEK]            = Perl_ck_fun,
1671         [OP_SYSREAD]            = Perl_ck_fun,
1672         [OP_SYSWRITE]           = Perl_ck_fun,
1673         [OP_EOF]                = Perl_ck_eof,
1674         [OP_TELL]               = Perl_ck_tell,
1675         [OP_SEEK]               = Perl_ck_tell,
1676         [OP_TRUNCATE]           = Perl_ck_trunc,
1677         [OP_FCNTL]              = Perl_ck_fun,
1678         [OP_IOCTL]              = Perl_ck_fun,
1679         [OP_FLOCK]              = Perl_ck_fun,
1680         [OP_SEND]               = Perl_ck_fun,
1681         [OP_RECV]               = Perl_ck_fun,
1682         [OP_SOCKET]             = Perl_ck_fun,
1683         [OP_SOCKPAIR]           = Perl_ck_fun,
1684         [OP_BIND]               = Perl_ck_fun,
1685         [OP_CONNECT]            = Perl_ck_fun,
1686         [OP_LISTEN]             = Perl_ck_fun,
1687         [OP_ACCEPT]             = Perl_ck_fun,
1688         [OP_SHUTDOWN]           = Perl_ck_fun,
1689         [OP_GSOCKOPT]           = Perl_ck_fun,
1690         [OP_SSOCKOPT]           = Perl_ck_fun,
1691         [OP_GETSOCKNAME]        = Perl_ck_fun,
1692         [OP_GETPEERNAME]        = Perl_ck_fun,
1693         [OP_LSTAT]              = Perl_ck_ftst,
1694         [OP_STAT]               = Perl_ck_ftst,
1695         [OP_FTRREAD]            = Perl_ck_ftst,
1696         [OP_FTRWRITE]           = Perl_ck_ftst,
1697         [OP_FTREXEC]            = Perl_ck_ftst,
1698         [OP_FTEREAD]            = Perl_ck_ftst,
1699         [OP_FTEWRITE]           = Perl_ck_ftst,
1700         [OP_FTEEXEC]            = Perl_ck_ftst,
1701         [OP_FTIS]               = Perl_ck_ftst,
1702         [OP_FTSIZE]             = Perl_ck_ftst,
1703         [OP_FTMTIME]            = Perl_ck_ftst,
1704         [OP_FTATIME]            = Perl_ck_ftst,
1705         [OP_FTCTIME]            = Perl_ck_ftst,
1706         [OP_FTROWNED]           = Perl_ck_ftst,
1707         [OP_FTEOWNED]           = Perl_ck_ftst,
1708         [OP_FTZERO]             = Perl_ck_ftst,
1709         [OP_FTSOCK]             = Perl_ck_ftst,
1710         [OP_FTCHR]              = Perl_ck_ftst,
1711         [OP_FTBLK]              = Perl_ck_ftst,
1712         [OP_FTFILE]             = Perl_ck_ftst,
1713         [OP_FTDIR]              = Perl_ck_ftst,
1714         [OP_FTPIPE]             = Perl_ck_ftst,
1715         [OP_FTSUID]             = Perl_ck_ftst,
1716         [OP_FTSGID]             = Perl_ck_ftst,
1717         [OP_FTSVTX]             = Perl_ck_ftst,
1718         [OP_FTLINK]             = Perl_ck_ftst,
1719         [OP_FTTTY]              = Perl_ck_ftst,
1720         [OP_FTTEXT]             = Perl_ck_ftst,
1721         [OP_FTBINARY]           = Perl_ck_ftst,
1722         [OP_CHDIR]              = Perl_ck_trunc,
1723         [OP_CHOWN]              = Perl_ck_fun,
1724         [OP_CHROOT]             = Perl_ck_fun,
1725         [OP_UNLINK]             = Perl_ck_fun,
1726         [OP_CHMOD]              = Perl_ck_fun,
1727         [OP_UTIME]              = Perl_ck_fun,
1728         [OP_RENAME]             = Perl_ck_fun,
1729         [OP_LINK]               = Perl_ck_fun,
1730         [OP_SYMLINK]            = Perl_ck_fun,
1731         [OP_READLINK]           = Perl_ck_fun,
1732         [OP_MKDIR]              = Perl_ck_fun,
1733         [OP_RMDIR]              = Perl_ck_fun,
1734         [OP_OPEN_DIR]           = Perl_ck_fun,
1735         [OP_READDIR]            = Perl_ck_fun,
1736         [OP_TELLDIR]            = Perl_ck_fun,
1737         [OP_SEEKDIR]            = Perl_ck_fun,
1738         [OP_REWINDDIR]          = Perl_ck_fun,
1739         [OP_CLOSEDIR]           = Perl_ck_fun,
1740         [OP_FORK]               = Perl_ck_null,
1741         [OP_WAIT]               = Perl_ck_null,
1742         [OP_WAITPID]            = Perl_ck_fun,
1743         [OP_SYSTEM]             = Perl_ck_exec,
1744         [OP_EXEC]               = Perl_ck_exec,
1745         [OP_KILL]               = Perl_ck_fun,
1746         [OP_GETPPID]            = Perl_ck_null,
1747         [OP_GETPGRP]            = Perl_ck_fun,
1748         [OP_SETPGRP]            = Perl_ck_fun,
1749         [OP_GETPRIORITY]        = Perl_ck_fun,
1750         [OP_SETPRIORITY]        = Perl_ck_fun,
1751         [OP_TIME]               = Perl_ck_null,
1752         [OP_TMS]                = Perl_ck_null,
1753         [OP_LOCALTIME]          = Perl_ck_fun,
1754         [OP_GMTIME]             = Perl_ck_fun,
1755         [OP_ALARM]              = Perl_ck_fun,
1756         [OP_SLEEP]              = Perl_ck_fun,
1757         [OP_SHMGET]             = Perl_ck_fun,
1758         [OP_SHMCTL]             = Perl_ck_fun,
1759         [OP_SHMREAD]            = Perl_ck_fun,
1760         [OP_SHMWRITE]           = Perl_ck_fun,
1761         [OP_MSGGET]             = Perl_ck_fun,
1762         [OP_MSGCTL]             = Perl_ck_fun,
1763         [OP_MSGSND]             = Perl_ck_fun,
1764         [OP_MSGRCV]             = Perl_ck_fun,
1765         [OP_SEMOP]              = Perl_ck_fun,
1766         [OP_SEMGET]             = Perl_ck_fun,
1767         [OP_SEMCTL]             = Perl_ck_fun,
1768         [OP_REQUIRE]            = Perl_ck_require,
1769         [OP_DOFILE]             = Perl_ck_fun,
1770         [OP_HINTSEVAL]          = Perl_ck_svconst,
1771         [OP_ENTEREVAL]          = Perl_ck_eval,
1772         [OP_LEAVEEVAL]          = Perl_ck_null,
1773         [OP_ENTERTRY]           = Perl_ck_eval,
1774         [OP_LEAVETRY]           = Perl_ck_null,
1775         [OP_GHBYNAME]           = Perl_ck_fun,
1776         [OP_GHBYADDR]           = Perl_ck_fun,
1777         [OP_GHOSTENT]           = Perl_ck_null,
1778         [OP_GNBYNAME]           = Perl_ck_fun,
1779         [OP_GNBYADDR]           = Perl_ck_fun,
1780         [OP_GNETENT]            = Perl_ck_null,
1781         [OP_GPBYNAME]           = Perl_ck_fun,
1782         [OP_GPBYNUMBER]         = Perl_ck_fun,
1783         [OP_GPROTOENT]          = Perl_ck_null,
1784         [OP_GSBYNAME]           = Perl_ck_fun,
1785         [OP_GSBYPORT]           = Perl_ck_fun,
1786         [OP_GSERVENT]           = Perl_ck_null,
1787         [OP_SHOSTENT]           = Perl_ck_fun,
1788         [OP_SNETENT]            = Perl_ck_fun,
1789         [OP_SPROTOENT]          = Perl_ck_fun,
1790         [OP_SSERVENT]           = Perl_ck_fun,
1791         [OP_EHOSTENT]           = Perl_ck_null,
1792         [OP_ENETENT]            = Perl_ck_null,
1793         [OP_EPROTOENT]          = Perl_ck_null,
1794         [OP_ESERVENT]           = Perl_ck_null,
1795         [OP_GPWNAM]             = Perl_ck_fun,
1796         [OP_GPWUID]             = Perl_ck_fun,
1797         [OP_GPWENT]             = Perl_ck_null,
1798         [OP_SPWENT]             = Perl_ck_null,
1799         [OP_EPWENT]             = Perl_ck_null,
1800         [OP_GGRNAM]             = Perl_ck_fun,
1801         [OP_GGRGID]             = Perl_ck_fun,
1802         [OP_GGRENT]             = Perl_ck_null,
1803         [OP_SGRENT]             = Perl_ck_null,
1804         [OP_EGRENT]             = Perl_ck_null,
1805         [OP_GETLOGIN]           = Perl_ck_null,
1806         [OP_SYSCALL]            = Perl_ck_fun,
1807         [OP_LOCK]               = Perl_ck_rfun,
1808         [OP_ONCE]               = Perl_ck_null,
1809         [OP_CUSTOM]             = Perl_ck_null,
1810         [OP_COREARGS]           = Perl_ck_null,
1811         [OP_AVHVSWITCH]         = Perl_ck_null,
1812         [OP_RUNCV]              = Perl_ck_null,
1813         [OP_FC]                 = Perl_ck_fun,
1814         [OP_PADCV]              = Perl_ck_null,
1815         [OP_INTROCV]            = Perl_ck_null,
1816         [OP_CLONECV]            = Perl_ck_null,
1817         [OP_PADRANGE]           = Perl_ck_null,
1818         [OP_REFASSIGN]          = Perl_ck_refassign,
1819         [OP_LVREF]              = Perl_ck_null,
1820         [OP_LVREFSLICE]         = Perl_ck_null,
1821         [OP_LVAVREF]            = Perl_ck_null,
1822         [OP_ANONCONST]          = Perl_ck_null,
1823         [OP_ISA]                = Perl_ck_isa,
1824         [OP_CMPCHAIN_AND]       = Perl_ck_null,
1825         [OP_CMPCHAIN_DUP]       = Perl_ck_null,
1826         [OP_ENTERTRYCATCH]      = Perl_ck_trycatch,
1827         [OP_LEAVETRYCATCH]      = Perl_ck_null,
1828         [OP_POPTRY]             = Perl_ck_null,
1829         [OP_CATCH]              = Perl_ck_null,
1830         [OP_PUSHDEFER]          = Perl_ck_null,
1831         [OP_IS_BOOL]            = Perl_ck_null,
1832         [OP_IS_WEAK]            = Perl_ck_null,
1833         [OP_WEAKEN]             = Perl_ck_null,
1834         [OP_UNWEAKEN]           = Perl_ck_null,
1835         [OP_BLESSED]            = Perl_ck_null,
1836         [OP_REFADDR]            = Perl_ck_null,
1837         [OP_REFTYPE]            = Perl_ck_null,
1838         [OP_CEIL]               = Perl_ck_null,
1839         [OP_FLOOR]              = Perl_ck_null,
1840         [OP_IS_TAINTED]         = Perl_ck_null,
1841         [OP_HELEMEXISTSOR]      = Perl_ck_helemexistsor,
1842 });
1843
1844 EXTCONST U32 PL_opargs[] INIT({
1845         [OP_NULL]               = 0x00000000,
1846         [OP_STUB]               = 0x00000000,
1847         [OP_SCALAR]             = 0x00001b04,
1848         [OP_PUSHMARK]           = 0x00000004,
1849         [OP_WANTARRAY]          = 0x00000004,
1850         [OP_CONST]              = 0x00000604,
1851         [OP_GVSV]               = 0x00000644,
1852         [OP_GV]                 = 0x00000644,
1853         [OP_GELEM]              = 0x00011244,
1854         [OP_PADSV]              = 0x00000044,
1855         [OP_PADSV_STORE]        = 0x00011104,
1856         [OP_PADAV]              = 0x00000040,
1857         [OP_PADHV]              = 0x00000040,
1858         [OP_PADANY]             = 0x00000040,
1859         [OP_RV2GV]              = 0x00000144,
1860         [OP_RV2SV]              = 0x00000144,
1861         [OP_AV2ARYLEN]          = 0x00000104,
1862         [OP_RV2CV]              = 0x00000140,
1863         [OP_ANONCODE]           = 0x00000604,
1864         [OP_PROTOTYPE]          = 0x00009b84,
1865         [OP_REFGEN]             = 0x00002101,
1866         [OP_SREFGEN]            = 0x00001106,
1867         [OP_REF]                = 0x00009b8c,
1868         [OP_BLESS]              = 0x00091404,
1869         [OP_BACKTICK]           = 0x00009b88,
1870         [OP_GLOB]               = 0x00009408,
1871         [OP_READLINE]           = 0x0000eb08,
1872         [OP_RCATLINE]           = 0x00000608,
1873         [OP_REGCMAYBE]          = 0x00001104,
1874         [OP_REGCRESET]          = 0x00001104,
1875         [OP_REGCOMP]            = 0x00001304,
1876         [OP_MATCH]              = 0x00000500,
1877         [OP_QR]                 = 0x00000504,
1878         [OP_SUBST]              = 0x00001504,
1879         [OP_SUBSTCONT]          = 0x00000304,
1880         [OP_TRANS]              = 0x00001804,
1881         [OP_TRANSR]             = 0x00001804,
1882         [OP_SASSIGN]            = 0x00011204,
1883         [OP_AASSIGN]            = 0x00022208,
1884         [OP_CHOP]               = 0x00002b0d,
1885         [OP_SCHOP]              = 0x00009b8c,
1886         [OP_CHOMP]              = 0x00002b1d,
1887         [OP_SCHOMP]             = 0x00009b9c,
1888         [OP_DEFINED]            = 0x00009b84,
1889         [OP_UNDEF]              = 0x0000fb04,
1890         [OP_STUDY]              = 0x00009b84,
1891         [OP_POS]                = 0x0000fb8c,
1892         [OP_PREINC]             = 0x00001164,
1893         [OP_I_PREINC]           = 0x00001144,
1894         [OP_PREDEC]             = 0x00001164,
1895         [OP_I_PREDEC]           = 0x00001144,
1896         [OP_POSTINC]            = 0x0000112c,
1897         [OP_I_POSTINC]          = 0x0000110c,
1898         [OP_POSTDEC]            = 0x0000112c,
1899         [OP_I_POSTDEC]          = 0x0000110c,
1900         [OP_POW]                = 0x0001121e,
1901         [OP_MULTIPLY]           = 0x0001123e,
1902         [OP_I_MULTIPLY]         = 0x0001121e,
1903         [OP_DIVIDE]             = 0x0001123e,
1904         [OP_I_DIVIDE]           = 0x0001121e,
1905         [OP_MODULO]             = 0x0001123e,
1906         [OP_I_MODULO]           = 0x0001121e,
1907         [OP_REPEAT]             = 0x0001220b,
1908         [OP_ADD]                = 0x0001123e,
1909         [OP_I_ADD]              = 0x0001121e,
1910         [OP_SUBTRACT]           = 0x0001123e,
1911         [OP_I_SUBTRACT]         = 0x0001121e,
1912         [OP_CONCAT]             = 0x0001121e,
1913         [OP_MULTICONCAT]        = 0x00000f1c,
1914         [OP_STRINGIFY]          = 0x0000141e,
1915         [OP_LEFT_SHIFT]         = 0x0001121e,
1916         [OP_RIGHT_SHIFT]        = 0x0001121e,
1917         [OP_LT]                 = 0x00011226,
1918         [OP_I_LT]               = 0x00011206,
1919         [OP_GT]                 = 0x00011226,
1920         [OP_I_GT]               = 0x00011206,
1921         [OP_LE]                 = 0x00011226,
1922         [OP_I_LE]               = 0x00011206,
1923         [OP_GE]                 = 0x00011226,
1924         [OP_I_GE]               = 0x00011206,
1925         [OP_EQ]                 = 0x00011226,
1926         [OP_I_EQ]               = 0x00011206,
1927         [OP_NE]                 = 0x00011226,
1928         [OP_I_NE]               = 0x00011206,
1929         [OP_NCMP]               = 0x0001122e,
1930         [OP_I_NCMP]             = 0x0001120e,
1931         [OP_SLT]                = 0x00011206,
1932         [OP_SGT]                = 0x00011206,
1933         [OP_SLE]                = 0x00011206,
1934         [OP_SGE]                = 0x00011206,
1935         [OP_SEQ]                = 0x00011206,
1936         [OP_SNE]                = 0x00011206,
1937         [OP_SCMP]               = 0x0001120e,
1938         [OP_BIT_AND]            = 0x0001120e,
1939         [OP_BIT_XOR]            = 0x0001120e,
1940         [OP_BIT_OR]             = 0x0001120e,
1941         [OP_NBIT_AND]           = 0x0001121e,
1942         [OP_NBIT_XOR]           = 0x0001121e,
1943         [OP_NBIT_OR]            = 0x0001121e,
1944         [OP_SBIT_AND]           = 0x0001120e,
1945         [OP_SBIT_XOR]           = 0x0001120e,
1946         [OP_SBIT_OR]            = 0x0001120e,
1947         [OP_NEGATE]             = 0x0000112e,
1948         [OP_I_NEGATE]           = 0x0000110e,
1949         [OP_NOT]                = 0x00001106,
1950         [OP_COMPLEMENT]         = 0x0000110e,
1951         [OP_NCOMPLEMENT]        = 0x0000111e,
1952         [OP_SCOMPLEMENT]        = 0x0000111e,
1953         [OP_SMARTMATCH]         = 0x00000204,
1954         [OP_ATAN2]              = 0x0001141e,
1955         [OP_SIN]                = 0x00009b9e,
1956         [OP_COS]                = 0x00009b9e,
1957         [OP_RAND]               = 0x00009b1c,
1958         [OP_SRAND]              = 0x00009b1c,
1959         [OP_EXP]                = 0x00009b9e,
1960         [OP_LOG]                = 0x00009b9e,
1961         [OP_SQRT]               = 0x00009b9e,
1962         [OP_INT]                = 0x00009b9e,
1963         [OP_HEX]                = 0x00009b9e,
1964         [OP_OCT]                = 0x00009b9e,
1965         [OP_ABS]                = 0x00009b9e,
1966         [OP_LENGTH]             = 0x00009b9e,
1967         [OP_SUBSTR]             = 0x0991140c,
1968         [OP_VEC]                = 0x0011140c,
1969         [OP_INDEX]              = 0x0091141c,
1970         [OP_RINDEX]             = 0x0091141c,
1971         [OP_SPRINTF]            = 0x0002140f,
1972         [OP_FORMLINE]           = 0x00021405,
1973         [OP_ORD]                = 0x00009b9e,
1974         [OP_CHR]                = 0x00009b9e,
1975         [OP_CRYPT]              = 0x0001141e,
1976         [OP_UCFIRST]            = 0x00009b8e,
1977         [OP_LCFIRST]            = 0x00009b8e,
1978         [OP_UC]                 = 0x00009b8e,
1979         [OP_LC]                 = 0x00009b8e,
1980         [OP_QUOTEMETA]          = 0x00009b8e,
1981         [OP_RV2AV]              = 0x00000148,
1982         [OP_AELEMFAST]          = 0x00013644,
1983         [OP_AELEMFAST_LEX]      = 0x00013040,
1984         [OP_AELEMFASTLEX_STORE] = 0x00013140,
1985         [OP_AELEM]              = 0x00013204,
1986         [OP_ASLICE]             = 0x00023401,
1987         [OP_KVASLICE]           = 0x00023401,
1988         [OP_AEACH]              = 0x00003b40,
1989         [OP_AVALUES]            = 0x00003b48,
1990         [OP_AKEYS]              = 0x00003b08,
1991         [OP_EACH]               = 0x00004b40,
1992         [OP_VALUES]             = 0x00004b48,
1993         [OP_KEYS]               = 0x00004b08,
1994         [OP_DELETE]             = 0x00001b00,
1995         [OP_EXISTS]             = 0x00001b04,
1996         [OP_RV2HV]              = 0x00000148,
1997         [OP_HELEM]              = 0x00014204,
1998         [OP_HSLICE]             = 0x00024401,
1999         [OP_KVHSLICE]           = 0x00024401,
2000         [OP_MULTIDEREF]         = 0x00000f44,
2001         [OP_UNPACK]             = 0x00091480,
2002         [OP_PACK]               = 0x0002140f,
2003         [OP_SPLIT]              = 0x00111508,
2004         [OP_JOIN]               = 0x0002140f,
2005         [OP_LIST]               = 0x00002401,
2006         [OP_LSLICE]             = 0x00224200,
2007         [OP_ANONLIST]           = 0x00002405,
2008         [OP_ANONHASH]           = 0x00002405,
2009         [OP_EMPTYAVHV]          = 0x0000241c,
2010         [OP_SPLICE]             = 0x02993401,
2011         [OP_PUSH]               = 0x0002341d,
2012         [OP_POP]                = 0x0000bb04,
2013         [OP_SHIFT]              = 0x0000bb04,
2014         [OP_UNSHIFT]            = 0x0002341d,
2015         [OP_SORT]               = 0x0002d401,
2016         [OP_REVERSE]            = 0x00002409,
2017         [OP_GREPSTART]          = 0x00025401,
2018         [OP_GREPWHILE]          = 0x00000308,
2019         [OP_MAPSTART]           = 0x00025401,
2020         [OP_MAPWHILE]           = 0x00000308,
2021         [OP_RANGE]              = 0x00011300,
2022         [OP_FLIP]               = 0x00011100,
2023         [OP_FLOP]               = 0x00000100,
2024         [OP_AND]                = 0x00000300,
2025         [OP_OR]                 = 0x00000300,
2026         [OP_XOR]                = 0x00011206,
2027         [OP_DOR]                = 0x00000300,
2028         [OP_COND_EXPR]          = 0x00000300,
2029         [OP_ANDASSIGN]          = 0x00000304,
2030         [OP_ORASSIGN]           = 0x00000304,
2031         [OP_DORASSIGN]          = 0x00000304,
2032         [OP_ENTERSUB]           = 0x00002141,
2033         [OP_LEAVESUB]           = 0x00000100,
2034         [OP_LEAVESUBLV]         = 0x00000100,
2035         [OP_ARGCHECK]           = 0x00000f00,
2036         [OP_ARGELEM]            = 0x00000f00,
2037         [OP_ARGDEFELEM]         = 0x00000300,
2038         [OP_CALLER]             = 0x00009b08,
2039         [OP_WARN]               = 0x0000240d,
2040         [OP_DIE]                = 0x0000240d,
2041         [OP_RESET]              = 0x00009b04,
2042         [OP_LINESEQ]            = 0x00000400,
2043         [OP_NEXTSTATE]          = 0x00000a04,
2044         [OP_DBSTATE]            = 0x00000a04,
2045         [OP_UNSTACK]            = 0x00000004,
2046         [OP_ENTER]              = 0x00000000,
2047         [OP_LEAVE]              = 0x00000400,
2048         [OP_SCOPE]              = 0x00000400,
2049         [OP_ENTERITER]          = 0x00000940,
2050         [OP_ITER]               = 0x00000000,
2051         [OP_ENTERLOOP]          = 0x00000940,
2052         [OP_LEAVELOOP]          = 0x00000200,
2053         [OP_RETURN]             = 0x00002401,
2054         [OP_LAST]               = 0x00000d04,
2055         [OP_NEXT]               = 0x00000d04,
2056         [OP_REDO]               = 0x00000d04,
2057         [OP_DUMP]               = 0x00000d44,
2058         [OP_GOTO]               = 0x00000d04,
2059         [OP_EXIT]               = 0x00009b04,
2060         [OP_METHOD]             = 0x00000e40,
2061         [OP_METHOD_NAMED]       = 0x00000e40,
2062         [OP_METHOD_SUPER]       = 0x00000e40,
2063         [OP_METHOD_REDIR]       = 0x00000e40,
2064         [OP_METHOD_REDIR_SUPER] = 0x00000e40,
2065         [OP_ENTERGIVEN]         = 0x00000340,
2066         [OP_LEAVEGIVEN]         = 0x00000100,
2067         [OP_ENTERWHEN]          = 0x00000340,
2068         [OP_LEAVEWHEN]          = 0x00000100,
2069         [OP_BREAK]              = 0x00000000,
2070         [OP_CONTINUE]           = 0x00000000,
2071         [OP_OPEN]               = 0x0029640d,
2072         [OP_CLOSE]              = 0x0000eb04,
2073         [OP_PIPE_OP]            = 0x00066404,
2074         [OP_FILENO]             = 0x00006b0c,
2075         [OP_UMASK]              = 0x00009b0c,
2076         [OP_BINMODE]            = 0x00096404,
2077         [OP_TIE]                = 0x00217445,
2078         [OP_UNTIE]              = 0x00007b04,
2079         [OP_TIED]               = 0x00007b44,
2080         [OP_DBMOPEN]            = 0x00114404,
2081         [OP_DBMCLOSE]           = 0x00004b04,
2082         [OP_SSELECT]            = 0x01111408,
2083         [OP_SELECT]             = 0x0000e40c,
2084         [OP_GETC]               = 0x0000eb0c,
2085         [OP_READ]               = 0x0917640d,
2086         [OP_ENTERWRITE]         = 0x0000eb04,
2087         [OP_LEAVEWRITE]         = 0x00000100,
2088         [OP_PRTF]               = 0x0002e405,
2089         [OP_PRINT]              = 0x0002e405,
2090         [OP_SAY]                = 0x0002e405,
2091         [OP_SYSOPEN]            = 0x09116404,
2092         [OP_SYSSEEK]            = 0x00116404,
2093         [OP_SYSREAD]            = 0x0917640d,
2094         [OP_SYSWRITE]           = 0x0991640d,
2095         [OP_EOF]                = 0x0000eb04,
2096         [OP_TELL]               = 0x0000eb0c,
2097         [OP_SEEK]               = 0x00116404,
2098         [OP_TRUNCATE]           = 0x00011404,
2099         [OP_FCNTL]              = 0x0011640c,
2100         [OP_IOCTL]              = 0x0011640c,
2101         [OP_FLOCK]              = 0x0001641c,
2102         [OP_SEND]               = 0x0911640d,
2103         [OP_RECV]               = 0x0117640d,
2104         [OP_SOCKET]             = 0x01116404,
2105         [OP_SOCKPAIR]           = 0x11166404,
2106         [OP_BIND]               = 0x00016404,
2107         [OP_CONNECT]            = 0x00016404,
2108         [OP_LISTEN]             = 0x00016404,
2109         [OP_ACCEPT]             = 0x0006640c,
2110         [OP_SHUTDOWN]           = 0x0001640c,
2111         [OP_GSOCKOPT]           = 0x00116404,
2112         [OP_SSOCKOPT]           = 0x01116404,
2113         [OP_GETSOCKNAME]        = 0x00006b04,
2114         [OP_GETPEERNAME]        = 0x00006b04,
2115         [OP_LSTAT]              = 0x0000ec80,
2116         [OP_STAT]               = 0x0000ec80,
2117         [OP_FTRREAD]            = 0x00006c84,
2118         [OP_FTRWRITE]           = 0x00006c84,
2119         [OP_FTREXEC]            = 0x00006c84,
2120         [OP_FTEREAD]            = 0x00006c84,
2121         [OP_FTEWRITE]           = 0x00006c84,
2122         [OP_FTEEXEC]            = 0x00006c84,
2123         [OP_FTIS]               = 0x00006c84,
2124         [OP_FTSIZE]             = 0x00006c8c,
2125         [OP_FTMTIME]            = 0x00006c8c,
2126         [OP_FTATIME]            = 0x00006c8c,
2127         [OP_FTCTIME]            = 0x00006c8c,
2128         [OP_FTROWNED]           = 0x00006c84,
2129         [OP_FTEOWNED]           = 0x00006c84,
2130         [OP_FTZERO]             = 0x00006c84,
2131         [OP_FTSOCK]             = 0x00006c84,
2132         [OP_FTCHR]              = 0x00006c84,
2133         [OP_FTBLK]              = 0x00006c84,
2134         [OP_FTFILE]             = 0x00006c84,
2135         [OP_FTDIR]              = 0x00006c84,
2136         [OP_FTPIPE]             = 0x00006c84,
2137         [OP_FTSUID]             = 0x00006c84,
2138         [OP_FTSGID]             = 0x00006c84,
2139         [OP_FTSVTX]             = 0x00006c84,
2140         [OP_FTLINK]             = 0x00006c84,
2141         [OP_FTTTY]              = 0x00006c04,
2142         [OP_FTTEXT]             = 0x00006c84,
2143         [OP_FTBINARY]           = 0x00006c84,
2144         [OP_CHDIR]              = 0x00009b1c,
2145         [OP_CHOWN]              = 0x0000241d,
2146         [OP_CHROOT]             = 0x00009b9c,
2147         [OP_UNLINK]             = 0x0000249d,
2148         [OP_CHMOD]              = 0x0000241d,
2149         [OP_UTIME]              = 0x0000241d,
2150         [OP_RENAME]             = 0x0001141c,
2151         [OP_LINK]               = 0x0001141c,
2152         [OP_SYMLINK]            = 0x0001141c,
2153         [OP_READLINK]           = 0x00009b8c,
2154         [OP_MKDIR]              = 0x0009949c,
2155         [OP_RMDIR]              = 0x00009b9c,
2156         [OP_OPEN_DIR]           = 0x00016404,
2157         [OP_READDIR]            = 0x00006b00,
2158         [OP_TELLDIR]            = 0x00006b0c,
2159         [OP_SEEKDIR]            = 0x00016404,
2160         [OP_REWINDDIR]          = 0x00006b04,
2161         [OP_CLOSEDIR]           = 0x00006b04,
2162         [OP_FORK]               = 0x0000000c,
2163         [OP_WAIT]               = 0x0000001c,
2164         [OP_WAITPID]            = 0x0001141c,
2165         [OP_SYSTEM]             = 0x0002941d,
2166         [OP_EXEC]               = 0x0002941d,
2167         [OP_KILL]               = 0x0000241d,
2168         [OP_GETPPID]            = 0x0000001c,
2169         [OP_GETPGRP]            = 0x00009b1c,
2170         [OP_SETPGRP]            = 0x0009941c,
2171         [OP_GETPRIORITY]        = 0x0001141c,
2172         [OP_SETPRIORITY]        = 0x0011141c,
2173         [OP_TIME]               = 0x0000001c,
2174         [OP_TMS]                = 0x00000000,
2175         [OP_LOCALTIME]          = 0x00009b08,
2176         [OP_GMTIME]             = 0x00009b08,
2177         [OP_ALARM]              = 0x00009b8c,
2178         [OP_SLEEP]              = 0x00009b1c,
2179         [OP_SHMGET]             = 0x0011140d,
2180         [OP_SHMCTL]             = 0x0011140d,
2181         [OP_SHMREAD]            = 0x0111140d,
2182         [OP_SHMWRITE]           = 0x0111140d,
2183         [OP_MSGGET]             = 0x0001140d,
2184         [OP_MSGCTL]             = 0x0011140d,
2185         [OP_MSGSND]             = 0x0011140d,
2186         [OP_MSGRCV]             = 0x1111140d,
2187         [OP_SEMOP]              = 0x0001140d,
2188         [OP_SEMGET]             = 0x0011140d,
2189         [OP_SEMCTL]             = 0x0111140d,
2190         [OP_REQUIRE]            = 0x00009bc4,
2191         [OP_DOFILE]             = 0x00001140,
2192         [OP_HINTSEVAL]          = 0x00000604,
2193         [OP_ENTEREVAL]          = 0x00009bc0,
2194         [OP_LEAVEEVAL]          = 0x00001100,
2195         [OP_ENTERTRY]           = 0x00000340,
2196         [OP_LEAVETRY]           = 0x00000400,
2197         [OP_GHBYNAME]           = 0x00001b00,
2198         [OP_GHBYADDR]           = 0x00011400,
2199         [OP_GHOSTENT]           = 0x00000000,
2200         [OP_GNBYNAME]           = 0x00001b00,
2201         [OP_GNBYADDR]           = 0x00011400,
2202         [OP_GNETENT]            = 0x00000000,
2203         [OP_GPBYNAME]           = 0x00001b00,
2204         [OP_GPBYNUMBER]         = 0x00001400,
2205         [OP_GPROTOENT]          = 0x00000000,
2206         [OP_GSBYNAME]           = 0x00011400,
2207         [OP_GSBYPORT]           = 0x00011400,
2208         [OP_GSERVENT]           = 0x00000000,
2209         [OP_SHOSTENT]           = 0x00001b04,
2210         [OP_SNETENT]            = 0x00001b04,
2211         [OP_SPROTOENT]          = 0x00001b04,
2212         [OP_SSERVENT]           = 0x00001b04,
2213         [OP_EHOSTENT]           = 0x00000004,
2214         [OP_ENETENT]            = 0x00000004,
2215         [OP_EPROTOENT]          = 0x00000004,
2216         [OP_ESERVENT]           = 0x00000004,
2217         [OP_GPWNAM]             = 0x00001b00,
2218         [OP_GPWUID]             = 0x00001b00,
2219         [OP_GPWENT]             = 0x00000000,
2220         [OP_SPWENT]             = 0x00000004,
2221         [OP_EPWENT]             = 0x00000004,
2222         [OP_GGRNAM]             = 0x00001b00,
2223         [OP_GGRGID]             = 0x00001b00,
2224         [OP_GGRENT]             = 0x00000000,
2225         [OP_SGRENT]             = 0x00000004,
2226         [OP_EGRENT]             = 0x00000004,
2227         [OP_GETLOGIN]           = 0x0000000c,
2228         [OP_SYSCALL]            = 0x0002140d,
2229         [OP_LOCK]               = 0x00007b04,
2230         [OP_ONCE]               = 0x00000300,
2231         [OP_CUSTOM]             = 0x00000000,
2232         [OP_COREARGS]           = 0x00000600,
2233         [OP_AVHVSWITCH]         = 0x00000108,
2234         [OP_RUNCV]              = 0x00000004,
2235         [OP_FC]                 = 0x00009b8e,
2236         [OP_PADCV]              = 0x00000040,
2237         [OP_INTROCV]            = 0x00000040,
2238         [OP_CLONECV]            = 0x00000040,
2239         [OP_PADRANGE]           = 0x00000040,
2240         [OP_REFASSIGN]          = 0x00000244,
2241         [OP_LVREF]              = 0x00000b40,
2242         [OP_LVREFSLICE]         = 0x00000440,
2243         [OP_LVAVREF]            = 0x00000b40,
2244         [OP_ANONCONST]          = 0x00000144,
2245         [OP_ISA]                = 0x00000204,
2246         [OP_CMPCHAIN_AND]       = 0x00000300,
2247         [OP_CMPCHAIN_DUP]       = 0x00000100,
2248         [OP_ENTERTRYCATCH]      = 0x00000300,
2249         [OP_LEAVETRYCATCH]      = 0x00000400,
2250         [OP_POPTRY]             = 0x00000400,
2251         [OP_CATCH]              = 0x00000300,
2252         [OP_PUSHDEFER]          = 0x00000300,
2253         [OP_IS_BOOL]            = 0x00000106,
2254         [OP_IS_WEAK]            = 0x00000106,
2255         [OP_WEAKEN]             = 0x00000100,
2256         [OP_UNWEAKEN]           = 0x00000100,
2257         [OP_BLESSED]            = 0x00000106,
2258         [OP_REFADDR]            = 0x0000011e,
2259         [OP_REFTYPE]            = 0x0000011e,
2260         [OP_CEIL]               = 0x0000011e,
2261         [OP_FLOOR]              = 0x0000011e,
2262         [OP_IS_TAINTED]         = 0x00000106,
2263         [OP_HELEMEXISTSOR]      = 0x00011300,
2264 });
2265
2266 END_EXTERN_C
2267
2268
2269 #define OPpARGELEM_SV           0x00
2270 #define OPpLVREF_SV             0x00
2271 #define OPpARG1_MASK            0x01
2272 #define OPpCOREARGS_DEREF1      0x01
2273 #define OPpENTERSUB_INARGS      0x01
2274 #define OPpPADHV_ISKEYS         0x01
2275 #define OPpRV2HV_ISKEYS         0x01
2276 #define OPpSORT_NUMERIC         0x01
2277 #define OPpTRANS_CAN_FORCE_UTF8 0x01
2278 #define OPpARGELEM_AV           0x02
2279 #define OPpCONST_NOVER          0x02
2280 #define OPpCOREARGS_DEREF2      0x02
2281 #define OPpEVAL_HAS_HH          0x02
2282 #define OPpFT_ACCESS            0x02
2283 #define OPpHINT_STRICT_REFS     0x02
2284 #define OPpITER_REVERSED        0x02
2285 #define OPpSORT_INTEGER         0x02
2286 #define OPpTRANS_USE_SVOP       0x02
2287 #define OPpARG2_MASK            0x03
2288 #define OPpAVHVSWITCH_MASK      0x03
2289 #define OPpARGELEM_HV           0x04
2290 #define OPpASSIGN_TRUEBOOL      0x04
2291 #define OPpCONST_SHORTCIRCUIT   0x04
2292 #define OPpDONT_INIT_GV         0x04
2293 #define OPpENTERSUB_HASTARG     0x04
2294 #define OPpEVAL_UNICODE         0x04
2295 #define OPpFT_STACKED           0x04
2296 #define OPpLVREF_ELEM           0x04
2297 #define OPpSLICEWARNING         0x04
2298 #define OPpSORT_REVERSE         0x04
2299 #define OPpSPLIT_IMPLIM         0x04
2300 #define OPpTRANS_IDENTICAL      0x04
2301 #define OPpUSEINT               0x04
2302 #define OPpARGELEM_MASK         0x06
2303 #define OPpARG3_MASK            0x07
2304 #define OPpPADRANGE_COUNTSHIFT  0x07
2305 #define OPpCONST_STRICT         0x08
2306 #define OPpENTERSUB_AMPER       0x08
2307 #define OPpEVAL_BYTES           0x08
2308 #define OPpFT_STACKING          0x08
2309 #define OPpITER_DEF             0x08
2310 #define OPpLVREF_ITER           0x08
2311 #define OPpMAYBE_LVSUB          0x08
2312 #define OPpMULTICONCAT_STRINGIFY 0x08
2313 #define OPpREVERSE_INPLACE      0x08
2314 #define OPpSORT_INPLACE         0x08
2315 #define OPpSPLIT_LEX            0x08
2316 #define OPpTRANS_SQUASH         0x08
2317 #define OPpARG4_MASK            0x0f
2318 #define OPpASSIGN_COMMON_AGG    0x10
2319 #define OPpCONST_ENTERED        0x10
2320 #define OPpDEREF_AV             0x10
2321 #define OPpEVAL_COPHH           0x10
2322 #define OPpFT_AFTER_t           0x10
2323 #define OPpLVREF_AV             0x10
2324 #define OPpMAYBE_TRUEBOOL       0x10
2325 #define OPpMULTIDEREF_EXISTS    0x10
2326 #define OPpOPEN_IN_RAW          0x10
2327 #define OPpSORT_DESCEND         0x10
2328 #define OPpSPLIT_ASSIGN         0x10
2329 #define OPpSUBSTR_REPL_FIRST    0x10
2330 #define OPpTARGET_MY            0x10
2331 #define OPpASSIGN_COMMON_RC1    0x20
2332 #define OPpDEREF_HV             0x20
2333 #define OPpEARLY_CV             0x20
2334 #define OPpEMPTYAVHV_IS_HV      0x20
2335 #define OPpEVAL_RE_REPARSING    0x20
2336 #define OPpHUSH_VMSISH          0x20
2337 #define OPpKVSLICE              0x20
2338 #define OPpLVREF_HV             0x20
2339 #define OPpMAY_RETURN_CONSTANT  0x20
2340 #define OPpMULTICONCAT_FAKE     0x20
2341 #define OPpMULTIDEREF_DELETE    0x20
2342 #define OPpOPEN_IN_CRLF         0x20
2343 #define OPpTRANS_COMPLEMENT     0x20
2344 #define OPpTRUEBOOL             0x20
2345 #define OPpUNDEF_KEEP_PV        0x20
2346 #define OPpDEREF                0x30
2347 #define OPpDEREF_SV             0x30
2348 #define OPpLVREF_CV             0x30
2349 #define OPpLVREF_TYPE           0x30
2350 #define OPpALLOW_FAKE           0x40
2351 #define OPpARG_IF_FALSE         0x40
2352 #define OPpASSIGN_BACKWARDS     0x40
2353 #define OPpASSIGN_COMMON_SCALAR 0x40
2354 #define OPpCONCAT_NESTED        0x40
2355 #define OPpCONST_BARE           0x40
2356 #define OPpCOREARGS_SCALARMOD   0x40
2357 #define OPpENTERSUB_DB          0x40
2358 #define OPpEXISTS_SUB           0x40
2359 #define OPpFLIP_LINENUM         0x40
2360 #define OPpINDEX_BOOLNEG        0x40
2361 #define OPpLIST_GUESSED         0x40
2362 #define OPpLVAL_DEFER           0x40
2363 #define OPpMULTICONCAT_APPEND   0x40
2364 #define OPpOPEN_OUT_RAW         0x40
2365 #define OPpOUR_INTRO            0x40
2366 #define OPpPAD_STATE            0x40
2367 #define OPpREFCOUNTED           0x40
2368 #define OPpREPEAT_DOLIST        0x40
2369 #define OPpSLICE                0x40
2370 #define OPpTRANS_GROWS          0x40
2371 #define OPpPADRANGE_COUNTMASK   0x7f
2372 #define OPpARG_IF_UNDEF         0x80
2373 #define OPpASSIGN_CV_TO_GV      0x80
2374 #define OPpCOREARGS_PUSHMARK    0x80
2375 #define OPpDEFER_FINALLY        0x80
2376 #define OPpENTERSUB_NOPAREN     0x80
2377 #define OPpHELEMEXISTSOR_DELETE 0x80
2378 #define OPpLVALUE               0x80
2379 #define OPpLVAL_INTRO           0x80
2380 #define OPpOFFBYONE             0x80
2381 #define OPpOPEN_OUT_CRLF        0x80
2382 #define OPpPV_IS_UTF8           0x80
2383 #define OPpTRANS_DELETE         0x80
2384 START_EXTERN_C
2385
2386 #ifndef DOINIT
2387
2388 /* data about the flags in op_private */
2389
2390 EXTCONST I16  PL_op_private_bitdef_ix[];
2391 EXTCONST U16  PL_op_private_bitdefs[];
2392 EXTCONST char PL_op_private_labels[];
2393 EXTCONST I16  PL_op_private_bitfields[];
2394 EXTCONST U8   PL_op_private_valid[];
2395
2396 #else
2397
2398
2399 /* PL_op_private_labels[]: the short descriptions of private flags.
2400  * All labels are concatenated into a single char array
2401  * (separated by \0's) for compactness.
2402  */
2403
2404 EXTCONST char PL_op_private_labels[] = {
2405     '$','M','O','D','\0',
2406     '+','1','\0',
2407     '-','\0',
2408     'A','M','P','E','R','\0',
2409     'A','N','O','N','H','A','S','H','\0',
2410     'A','P','P','E','N','D','\0',
2411     'A','S','S','I','G','N','\0',
2412     'A','V','\0',
2413     'B','A','R','E','\0',
2414     'B','K','W','A','R','D','\0',
2415     'B','O','O','L','\0',
2416     'B','O','O','L','?','\0',
2417     'B','Y','T','E','S','\0',
2418     'C','A','N','_','F','O','R','C','E','_','U','T','F','8','\0',
2419     'C','O','M','P','L','\0',
2420     'C','O','M','_','A','G','G','\0',
2421     'C','O','M','_','R','C','1','\0',
2422     'C','O','M','_','S','C','A','L','A','R','\0',
2423     'C','O','N','S','T','\0',
2424     'C','O','P','H','H','\0',
2425     'C','V','\0',
2426     'C','V','2','G','V','\0',
2427     'D','B','G','\0',
2428     'D','E','F','\0',
2429     'D','E','L','\0',
2430     'D','E','L','E','T','E','\0',
2431     'D','E','R','E','F','1','\0',
2432     'D','E','R','E','F','2','\0',
2433     'D','E','S','C','\0',
2434     'D','O','L','I','S','T','\0',
2435     'D','R','E','F','A','V','\0',
2436     'D','R','E','F','H','V','\0',
2437     'D','R','E','F','S','V','\0',
2438     'E','A','R','L','Y','C','V','\0',
2439     'E','L','E','M','\0',
2440     'E','N','T','E','R','E','D','\0',
2441     'E','X','I','S','T','S','\0',
2442     'F','A','K','E','\0',
2443     'F','I','N','A','L','L','Y','\0',
2444     'F','T','A','C','C','E','S','S','\0',
2445     'F','T','A','F','T','E','R','t','\0',
2446     'F','T','S','T','A','C','K','E','D','\0',
2447     'F','T','S','T','A','C','K','I','N','G','\0',
2448     'G','R','O','W','S','\0',
2449     'G','U','E','S','S','E','D','\0',
2450     'H','A','S','_','H','H','\0',
2451     'H','U','S','H','\0',
2452     'H','V','\0',
2453     'I','D','E','N','T','\0',
2454     'I','F','_','F','A','L','S','E','\0',
2455     'I','F','_','U','N','D','E','F','\0',
2456     'I','M','P','L','I','M','\0',
2457     'I','N','A','R','G','S','\0',
2458     'I','N','B','I','N','\0',
2459     'I','N','C','R','\0',
2460     'I','N','P','L','A','C','E','\0',
2461     'I','N','T','\0',
2462     'I','T','E','R','\0',
2463     'K','E','E','P','_','P','V','\0',
2464     'K','E','Y','S','\0',
2465     'K','V','S','L','I','C','E','\0',
2466     'L','E','X','\0',
2467     'L','I','N','E','N','U','M','\0',
2468     'L','V','\0',
2469     'L','V','D','E','F','E','R','\0',
2470     'L','V','I','N','T','R','O','\0',
2471     'L','V','S','U','B','\0',
2472     'M','A','R','K','\0',
2473     'N','E','G','\0',
2474     'N','E','S','T','E','D','\0',
2475     'N','O','(',')','\0',
2476     'N','O','I','N','I','T','\0',
2477     'N','O','V','E','R','\0',
2478     'N','U','M','\0',
2479     'O','U','R','I','N','T','R','\0',
2480     'O','U','T','B','I','N','\0',
2481     'O','U','T','C','R','\0',
2482     'R','E','F','C','\0',
2483     'R','E','P','A','R','S','E','\0',
2484     'R','E','P','L','1','S','T','\0',
2485     'R','E','V','\0',
2486     'R','E','V','E','R','S','E','D','\0',
2487     'S','H','O','R','T','\0',
2488     'S','L','I','C','E','\0',
2489     'S','L','I','C','E','W','A','R','N','\0',
2490     'S','Q','U','A','S','H','\0',
2491     'S','T','A','T','E','\0',
2492     'S','T','R','I','C','T','\0',
2493     'S','T','R','I','N','G','I','F','Y','\0',
2494     'S','U','B','\0',
2495     'S','V','\0',
2496     'T','A','R','G','\0',
2497     'T','A','R','G','M','Y','\0',
2498     'U','N','I','\0',
2499     'U','S','E','I','N','T','\0',
2500     'U','S','E','_','S','V','O','P','\0',
2501     'U','T','F','\0',
2502     'k','e','y','\0',
2503     'o','f','f','s','e','t','\0',
2504     'r','a','n','g','e','\0',
2505
2506 };
2507
2508
2509
2510 /* PL_op_private_bitfields[]: details about each bit field type.
2511  * Each definition consists of the following list of words:
2512  *    bitmin
2513  *    label (index into PL_op_private_labels[]; -1 if no label)
2514  *    repeat for each enum entry (if any):
2515  *       enum value
2516  *       enum label (index into PL_op_private_labels[])
2517  *    -1
2518  */
2519
2520 EXTCONST I16 PL_op_private_bitfields[] = {
2521     0, 8, -1,
2522     0, 8, -1,
2523     0, 631, -1,
2524     0, 8, -1,
2525     0, 8, -1,
2526     0, 638, -1,
2527     0, 627, -1,
2528     1, -1, 0, 588, 1, 39, 2, 312, -1,
2529     4, -1, 1, 185, 2, 192, 3, 199, -1,
2530     4, -1, 0, 588, 1, 39, 2, 312, 3, 131, -1,
2531
2532 };
2533
2534
2535 /* PL_op_private_bitdef_ix[]: map an op number to a starting position
2536  * in PL_op_private_bitdefs.  If -1, the op has no bits defined */
2537
2538 EXTCONST I16  PL_op_private_bitdef_ix[] = {
2539         [OP_NULL]               =   -1,
2540         [OP_STUB]               =   -1,
2541         [OP_SCALAR]             =    0,
2542         [OP_PUSHMARK]           =    1,
2543         [OP_WANTARRAY]          =    3,
2544         [OP_CONST]              =    4,
2545         [OP_GVSV]               =    9,
2546         [OP_GV]                 =   11,
2547         [OP_GELEM]              =   12,
2548         [OP_PADSV]              =   13,
2549         [OP_PADSV_STORE]        =   16,
2550         [OP_PADAV]              =   19,
2551         [OP_PADHV]              =   24,
2552         [OP_PADANY]             =   -1,
2553         [OP_RV2GV]              =   31,
2554         [OP_RV2SV]              =   38,
2555         [OP_AV2ARYLEN]          =   43,
2556         [OP_RV2CV]              =   45,
2557         [OP_ANONCODE]           =   -1,
2558         [OP_PROTOTYPE]          =    0,
2559         [OP_REFGEN]             =    0,
2560         [OP_SREFGEN]            =    0,
2561         [OP_REF]                =   52,
2562         [OP_BLESS]              =   55,
2563         [OP_BACKTICK]           =   56,
2564         [OP_GLOB]               =   55,
2565         [OP_READLINE]           =    0,
2566         [OP_RCATLINE]           =   -1,
2567         [OP_REGCMAYBE]          =    0,
2568         [OP_REGCRESET]          =    0,
2569         [OP_REGCOMP]            =    0,
2570         [OP_MATCH]              =   -1,
2571         [OP_QR]                 =   -1,
2572         [OP_SUBST]              =   61,
2573         [OP_SUBSTCONT]          =    0,
2574         [OP_TRANS]              =   62,
2575         [OP_TRANSR]             =   62,
2576         [OP_SASSIGN]            =   69,
2577         [OP_AASSIGN]            =   72,
2578         [OP_CHOP]               =    0,
2579         [OP_SCHOP]              =    0,
2580         [OP_CHOMP]              =   78,
2581         [OP_SCHOMP]             =   78,
2582         [OP_DEFINED]            =    0,
2583         [OP_UNDEF]              =   80,
2584         [OP_STUDY]              =    0,
2585         [OP_POS]                =   85,
2586         [OP_PREINC]             =    0,
2587         [OP_I_PREINC]           =    0,
2588         [OP_PREDEC]             =    0,
2589         [OP_I_PREDEC]           =    0,
2590         [OP_POSTINC]            =    0,
2591         [OP_I_POSTINC]          =    0,
2592         [OP_POSTDEC]            =    0,
2593         [OP_I_POSTDEC]          =    0,
2594         [OP_POW]                =   88,
2595         [OP_MULTIPLY]           =   88,
2596         [OP_I_MULTIPLY]         =   88,
2597         [OP_DIVIDE]             =   88,
2598         [OP_I_DIVIDE]           =   88,
2599         [OP_MODULO]             =   88,
2600         [OP_I_MODULO]           =   88,
2601         [OP_REPEAT]             =   90,
2602         [OP_ADD]                =   88,
2603         [OP_I_ADD]              =   88,
2604         [OP_SUBTRACT]           =   88,
2605         [OP_I_SUBTRACT]         =   88,
2606         [OP_CONCAT]             =   92,
2607         [OP_MULTICONCAT]        =   95,
2608         [OP_STRINGIFY]          =  101,
2609         [OP_LEFT_SHIFT]         =  103,
2610         [OP_RIGHT_SHIFT]        =  103,
2611         [OP_LT]                 =   12,
2612         [OP_I_LT]               =   12,
2613         [OP_GT]                 =   12,
2614         [OP_I_GT]               =   12,
2615         [OP_LE]                 =   12,
2616         [OP_I_LE]               =   12,
2617         [OP_GE]                 =   12,
2618         [OP_I_GE]               =   12,
2619         [OP_EQ]                 =   12,
2620         [OP_I_EQ]               =   12,
2621         [OP_NE]                 =   12,
2622         [OP_I_NE]               =   12,
2623         [OP_NCMP]               =   12,
2624         [OP_I_NCMP]             =   12,
2625         [OP_SLT]                =   12,
2626         [OP_SGT]                =   12,
2627         [OP_SLE]                =   12,
2628         [OP_SGE]                =   12,
2629         [OP_SEQ]                =   12,
2630         [OP_SNE]                =   12,
2631         [OP_SCMP]               =   12,
2632         [OP_BIT_AND]            =  105,
2633         [OP_BIT_XOR]            =  105,
2634         [OP_BIT_OR]             =  105,
2635         [OP_NBIT_AND]           =  103,
2636         [OP_NBIT_XOR]           =  103,
2637         [OP_NBIT_OR]            =  103,
2638         [OP_SBIT_AND]           =  105,
2639         [OP_SBIT_XOR]           =  105,
2640         [OP_SBIT_OR]            =  105,
2641         [OP_NEGATE]             =    0,
2642         [OP_I_NEGATE]           =    0,
2643         [OP_NOT]                =    0,
2644         [OP_COMPLEMENT]         =  105,
2645         [OP_NCOMPLEMENT]        =  103,
2646         [OP_SCOMPLEMENT]        =   78,
2647         [OP_SMARTMATCH]         =   12,
2648         [OP_ATAN2]              =  101,
2649         [OP_SIN]                =   78,
2650         [OP_COS]                =   78,
2651         [OP_RAND]               =  101,
2652         [OP_SRAND]              =  101,
2653         [OP_EXP]                =   78,
2654         [OP_LOG]                =   78,
2655         [OP_SQRT]               =   78,
2656         [OP_INT]                =   78,
2657         [OP_HEX]                =   78,
2658         [OP_OCT]                =   78,
2659         [OP_ABS]                =   78,
2660         [OP_LENGTH]             =  106,
2661         [OP_SUBSTR]             =  109,
2662         [OP_VEC]                =  112,
2663         [OP_INDEX]              =  114,
2664         [OP_RINDEX]             =  114,
2665         [OP_SPRINTF]            =   55,
2666         [OP_FORMLINE]           =   55,
2667         [OP_ORD]                =   78,
2668         [OP_CHR]                =   78,
2669         [OP_CRYPT]              =  101,
2670         [OP_UCFIRST]            =    0,
2671         [OP_LCFIRST]            =    0,
2672         [OP_UC]                 =    0,
2673         [OP_LC]                 =    0,
2674         [OP_QUOTEMETA]          =    0,
2675         [OP_RV2AV]              =  118,
2676         [OP_AELEMFAST]          =  125,
2677         [OP_AELEMFAST_LEX]      =  125,
2678         [OP_AELEMFASTLEX_STORE] =  125,
2679         [OP_AELEM]              =  126,
2680         [OP_ASLICE]             =  131,
2681         [OP_KVASLICE]           =  134,
2682         [OP_AEACH]              =    0,
2683         [OP_AVALUES]            =    0,
2684         [OP_AKEYS]              =   43,
2685         [OP_EACH]               =    0,
2686         [OP_VALUES]             =   43,
2687         [OP_KEYS]               =   43,
2688         [OP_DELETE]             =  135,
2689         [OP_EXISTS]             =  139,
2690         [OP_RV2HV]              =  141,
2691         [OP_HELEM]              =  126,
2692         [OP_HSLICE]             =  131,
2693         [OP_KVHSLICE]           =  134,
2694         [OP_MULTIDEREF]         =  149,
2695         [OP_UNPACK]             =   55,
2696         [OP_PACK]               =   55,
2697         [OP_SPLIT]              =  156,
2698         [OP_JOIN]               =   55,
2699         [OP_LIST]               =  161,
2700         [OP_LSLICE]             =   12,
2701         [OP_ANONLIST]           =   55,
2702         [OP_ANONHASH]           =   55,
2703         [OP_EMPTYAVHV]          =  163,
2704         [OP_SPLICE]             =   55,
2705         [OP_PUSH]               =  101,
2706         [OP_POP]                =    0,
2707         [OP_SHIFT]              =    0,
2708         [OP_UNSHIFT]            =  101,
2709         [OP_SORT]               =  168,
2710         [OP_REVERSE]            =  173,
2711         [OP_GREPSTART]          =    0,
2712         [OP_GREPWHILE]          =  175,
2713         [OP_MAPSTART]           =    0,
2714         [OP_MAPWHILE]           =    0,
2715         [OP_RANGE]              =    0,
2716         [OP_FLIP]               =  177,
2717         [OP_FLOP]               =  177,
2718         [OP_AND]                =    0,
2719         [OP_OR]                 =    0,
2720         [OP_XOR]                =   12,
2721         [OP_DOR]                =    0,
2722         [OP_COND_EXPR]          =  179,
2723         [OP_ANDASSIGN]          =    0,
2724         [OP_ORASSIGN]           =    0,
2725         [OP_DORASSIGN]          =    0,
2726         [OP_ENTERSUB]           =  181,
2727         [OP_LEAVESUB]           =  188,
2728         [OP_LEAVESUBLV]         =  188,
2729         [OP_ARGCHECK]           =    0,
2730         [OP_ARGELEM]            =  190,
2731         [OP_ARGDEFELEM]         =  192,
2732         [OP_CALLER]             =  195,
2733         [OP_WARN]               =   55,
2734         [OP_DIE]                =   55,
2735         [OP_RESET]              =   55,
2736         [OP_LINESEQ]            =   -1,
2737         [OP_NEXTSTATE]          =  197,
2738         [OP_DBSTATE]            =  197,
2739         [OP_UNSTACK]            =   -1,
2740         [OP_ENTER]              =   -1,
2741         [OP_LEAVE]              =  198,
2742         [OP_SCOPE]              =   -1,
2743         [OP_ENTERITER]          =  200,
2744         [OP_ITER]               =  204,
2745         [OP_ENTERLOOP]          =   -1,
2746         [OP_LEAVELOOP]          =  205,
2747         [OP_RETURN]             =   -1,
2748         [OP_LAST]               =  207,
2749         [OP_NEXT]               =  207,
2750         [OP_REDO]               =  207,
2751         [OP_DUMP]               =  207,
2752         [OP_GOTO]               =  207,
2753         [OP_EXIT]               =   55,
2754         [OP_METHOD]             =    0,
2755         [OP_METHOD_NAMED]       =    0,
2756         [OP_METHOD_SUPER]       =    0,
2757         [OP_METHOD_REDIR]       =    0,
2758         [OP_METHOD_REDIR_SUPER] =    0,
2759         [OP_ENTERGIVEN]         =    0,
2760         [OP_LEAVEGIVEN]         =    0,
2761         [OP_ENTERWHEN]          =    0,
2762         [OP_LEAVEWHEN]          =    0,
2763         [OP_BREAK]              =   -1,
2764         [OP_CONTINUE]           =   -1,
2765         [OP_OPEN]               =  209,
2766         [OP_CLOSE]              =   55,
2767         [OP_PIPE_OP]            =   55,
2768         [OP_FILENO]             =   55,
2769         [OP_UMASK]              =   55,
2770         [OP_BINMODE]            =   55,
2771         [OP_TIE]                =   55,
2772         [OP_UNTIE]              =    0,
2773         [OP_TIED]               =    0,
2774         [OP_DBMOPEN]            =   55,
2775         [OP_DBMCLOSE]           =    0,
2776         [OP_SSELECT]            =   55,
2777         [OP_SELECT]             =   55,
2778         [OP_GETC]               =   55,
2779         [OP_READ]               =   55,
2780         [OP_ENTERWRITE]         =   55,
2781         [OP_LEAVEWRITE]         =  188,
2782         [OP_PRTF]               =   -1,
2783         [OP_PRINT]              =   -1,
2784         [OP_SAY]                =   -1,
2785         [OP_SYSOPEN]            =   55,
2786         [OP_SYSSEEK]            =   55,
2787         [OP_SYSREAD]            =   55,
2788         [OP_SYSWRITE]           =   55,
2789         [OP_EOF]                =   55,
2790         [OP_TELL]               =   55,
2791         [OP_SEEK]               =   55,
2792         [OP_TRUNCATE]           =   55,
2793         [OP_FCNTL]              =   55,
2794         [OP_IOCTL]              =   55,
2795         [OP_FLOCK]              =  101,
2796         [OP_SEND]               =   55,
2797         [OP_RECV]               =   55,
2798         [OP_SOCKET]             =   55,
2799         [OP_SOCKPAIR]           =   55,
2800         [OP_BIND]               =   55,
2801         [OP_CONNECT]            =   55,
2802         [OP_LISTEN]             =   55,
2803         [OP_ACCEPT]             =   55,
2804         [OP_SHUTDOWN]           =   55,
2805         [OP_GSOCKOPT]           =   55,
2806         [OP_SSOCKOPT]           =   55,
2807         [OP_GETSOCKNAME]        =    0,
2808         [OP_GETPEERNAME]        =    0,
2809         [OP_LSTAT]              =    0,
2810         [OP_STAT]               =    0,
2811         [OP_FTRREAD]            =  214,
2812         [OP_FTRWRITE]           =  214,
2813         [OP_FTREXEC]            =  214,
2814         [OP_FTEREAD]            =  214,
2815         [OP_FTEWRITE]           =  214,
2816         [OP_FTEEXEC]            =  214,
2817         [OP_FTIS]               =  219,
2818         [OP_FTSIZE]             =  219,
2819         [OP_FTMTIME]            =  219,
2820         [OP_FTATIME]            =  219,
2821         [OP_FTCTIME]            =  219,
2822         [OP_FTROWNED]           =  219,
2823         [OP_FTEOWNED]           =  219,
2824         [OP_FTZERO]             =  219,
2825         [OP_FTSOCK]             =  219,
2826         [OP_FTCHR]              =  219,
2827         [OP_FTBLK]              =  219,
2828         [OP_FTFILE]             =  219,
2829         [OP_FTDIR]              =  219,
2830         [OP_FTPIPE]             =  219,
2831         [OP_FTSUID]             =  219,
2832         [OP_FTSGID]             =  219,
2833         [OP_FTSVTX]             =  219,
2834         [OP_FTLINK]             =  219,
2835         [OP_FTTTY]              =  219,
2836         [OP_FTTEXT]             =  219,
2837         [OP_FTBINARY]           =  219,
2838         [OP_CHDIR]              =  101,
2839         [OP_CHOWN]              =  101,
2840         [OP_CHROOT]             =   78,
2841         [OP_UNLINK]             =  101,
2842         [OP_CHMOD]              =  101,
2843         [OP_UTIME]              =  101,
2844         [OP_RENAME]             =  101,
2845         [OP_LINK]               =  101,
2846         [OP_SYMLINK]            =  101,
2847         [OP_READLINK]           =    0,
2848         [OP_MKDIR]              =  101,
2849         [OP_RMDIR]              =   78,
2850         [OP_OPEN_DIR]           =   55,
2851         [OP_READDIR]            =    0,
2852         [OP_TELLDIR]            =    0,
2853         [OP_SEEKDIR]            =   55,
2854         [OP_REWINDDIR]          =    0,
2855         [OP_CLOSEDIR]           =    0,
2856         [OP_FORK]               =   -1,
2857         [OP_WAIT]               =  223,
2858         [OP_WAITPID]            =  101,
2859         [OP_SYSTEM]             =  101,
2860         [OP_EXEC]               =  101,
2861         [OP_KILL]               =  101,
2862         [OP_GETPPID]            =  223,
2863         [OP_GETPGRP]            =  101,
2864         [OP_SETPGRP]            =  101,
2865         [OP_GETPRIORITY]        =  101,
2866         [OP_SETPRIORITY]        =  101,
2867         [OP_TIME]               =  223,
2868         [OP_TMS]                =   -1,
2869         [OP_LOCALTIME]          =    0,
2870         [OP_GMTIME]             =   55,
2871         [OP_ALARM]              =    0,
2872         [OP_SLEEP]              =  101,
2873         [OP_SHMGET]             =   55,
2874         [OP_SHMCTL]             =   55,
2875         [OP_SHMREAD]            =   55,
2876         [OP_SHMWRITE]           =   55,
2877         [OP_MSGGET]             =   55,
2878         [OP_MSGCTL]             =   55,
2879         [OP_MSGSND]             =   55,
2880         [OP_MSGRCV]             =   55,
2881         [OP_SEMOP]              =   55,
2882         [OP_SEMGET]             =   55,
2883         [OP_SEMCTL]             =   55,
2884         [OP_REQUIRE]            =    0,
2885         [OP_DOFILE]             =    0,
2886         [OP_HINTSEVAL]          =   -1,
2887         [OP_ENTEREVAL]          =  224,
2888         [OP_LEAVEEVAL]          =  188,
2889         [OP_ENTERTRY]           =    0,
2890         [OP_LEAVETRY]           =   -1,
2891         [OP_GHBYNAME]           =    0,
2892         [OP_GHBYADDR]           =   55,
2893         [OP_GHOSTENT]           =   -1,
2894         [OP_GNBYNAME]           =    0,
2895         [OP_GNBYADDR]           =   55,
2896         [OP_GNETENT]            =   -1,
2897         [OP_GPBYNAME]           =    0,
2898         [OP_GPBYNUMBER]         =   55,
2899         [OP_GPROTOENT]          =   -1,
2900         [OP_GSBYNAME]           =   55,
2901         [OP_GSBYPORT]           =   55,
2902         [OP_GSERVENT]           =   -1,
2903         [OP_SHOSTENT]           =    0,
2904         [OP_SNETENT]            =    0,
2905         [OP_SPROTOENT]          =    0,
2906         [OP_SSERVENT]           =    0,
2907         [OP_EHOSTENT]           =   -1,
2908         [OP_ENETENT]            =   -1,
2909         [OP_EPROTOENT]          =   -1,
2910         [OP_ESERVENT]           =   -1,
2911         [OP_GPWNAM]             =    0,
2912         [OP_GPWUID]             =    0,
2913         [OP_GPWENT]             =   -1,
2914         [OP_SPWENT]             =   -1,
2915         [OP_EPWENT]             =   -1,
2916         [OP_GGRNAM]             =    0,
2917         [OP_GGRGID]             =    0,
2918         [OP_GGRENT]             =   -1,
2919         [OP_SGRENT]             =   -1,
2920         [OP_EGRENT]             =   -1,
2921         [OP_GETLOGIN]           =   -1,
2922         [OP_SYSCALL]            =   55,
2923         [OP_LOCK]               =    0,
2924         [OP_ONCE]               =    0,
2925         [OP_CUSTOM]             =   -1,
2926         [OP_COREARGS]           =  230,
2927         [OP_AVHVSWITCH]         =  234,
2928         [OP_RUNCV]              =    3,
2929         [OP_FC]                 =    0,
2930         [OP_PADCV]              =   -1,
2931         [OP_INTROCV]            =   -1,
2932         [OP_CLONECV]            =   -1,
2933         [OP_PADRANGE]           =  236,
2934         [OP_REFASSIGN]          =  238,
2935         [OP_LVREF]              =  244,
2936         [OP_LVREFSLICE]         =  250,
2937         [OP_LVAVREF]            =   16,
2938         [OP_ANONCONST]          =    0,
2939         [OP_ISA]                =   12,
2940         [OP_CMPCHAIN_AND]       =    0,
2941         [OP_CMPCHAIN_DUP]       =    0,
2942         [OP_ENTERTRYCATCH]      =    0,
2943         [OP_LEAVETRYCATCH]      =   -1,
2944         [OP_POPTRY]             =   -1,
2945         [OP_CATCH]              =    0,
2946         [OP_PUSHDEFER]          =  251,
2947         [OP_IS_BOOL]            =    0,
2948         [OP_IS_WEAK]            =    0,
2949         [OP_WEAKEN]             =    0,
2950         [OP_UNWEAKEN]           =    0,
2951         [OP_BLESSED]            =   52,
2952         [OP_REFADDR]            =   78,
2953         [OP_REFTYPE]            =   78,
2954         [OP_CEIL]               =   78,
2955         [OP_FLOOR]              =   78,
2956         [OP_IS_TAINTED]         =    0,
2957         [OP_HELEMEXISTSOR]      =  253,
2958
2959 };
2960
2961
2962
2963 /* PL_op_private_bitdefs[]: given a starting position in this array (as
2964  * supplied by PL_op_private_bitdef_ix[]), each word (until a stop bit is
2965  * seen) defines the meaning of a particular op_private bit for a
2966  * particular op. Each word consists of:
2967  *  bit  0:     stop bit: this is the last bit def for the current op
2968  *  bit  1:     bitfield: if set, this defines a bit field rather than a flag
2969  *  bits 2..4:  unsigned number in the range 0..7 which is the bit number
2970  *  bits 5..15: unsigned number in the range 0..2047 which is an index
2971  *              into PL_op_private_labels[]    (for a flag), or
2972  *              into PL_op_private_bitfields[] (for a bit field)
2973  */
2974
2975 EXTCONST U16  PL_op_private_bitdefs[] = {
2976     0x0003, /* scalar, prototype, refgen, srefgen, readline, regcmaybe, regcreset, regcomp, substcont, chop, schop, defined, study, preinc, i_preinc, predec, i_predec, postinc, i_postinc, postdec, i_postdec, negate, i_negate, not, ucfirst, lcfirst, uc, lc, quotemeta, aeach, avalues, each, pop, shift, grepstart, mapstart, mapwhile, range, and, or, dor, andassign, orassign, dorassign, argcheck, method, method_named, method_super, method_redir, method_redir_super, entergiven, leavegiven, enterwhen, leavewhen, untie, tied, dbmclose, getsockname, getpeername, lstat, stat, readlink, readdir, telldir, rewinddir, closedir, localtime, alarm, require, dofile, entertry, ghbyname, gnbyname, gpbyname, shostent, snetent, sprotoent, sservent, gpwnam, gpwuid, ggrnam, ggrgid, lock, once, fc, anonconst, cmpchain_and, cmpchain_dup, entertrycatch, catch, is_bool, is_weak, weaken, unweaken, is_tainted */
2977     0x353c, 0x4639, /* pushmark */
2978     0x00bd, /* wantarray, runcv */
2979     0x0558, 0x1b70, 0x46ec, 0x4288, 0x3a65, /* const */
2980     0x353c, 0x3bb9, /* gvsv */
2981     0x19d5, /* gv */
2982     0x0067, /* gelem, lt, i_lt, gt, i_gt, le, i_le, ge, i_ge, eq, i_eq, ne, i_ne, ncmp, i_ncmp, slt, sgt, sle, sge, seq, sne, scmp, smartmatch, lslice, xor, isa */
2983     0x353c, 0x4638, 0x03d7, /* padsv */
2984     0x353c, 0x4638, 0x0003, /* padsv_store, lvavref */
2985     0x353c, 0x4638, 0x06d4, 0x362c, 0x4409, /* padav */
2986     0x353c, 0x4638, 0x06d4, 0x0770, 0x362c, 0x4408, 0x30a1, /* padhv */
2987     0x353c, 0x1d58, 0x03d6, 0x362c, 0x3988, 0x46e4, 0x0003, /* rv2gv */
2988     0x353c, 0x3bb8, 0x03d6, 0x46e4, 0x0003, /* rv2sv */
2989     0x362c, 0x0003, /* av2arylen, akeys, values, keys */
2990     0x38fc, 0x1198, 0x0ef4, 0x014c, 0x49e8, 0x46e4, 0x0003, /* rv2cv */
2991     0x06d4, 0x0770, 0x0003, /* ref, blessed */
2992     0x018f, /* bless, glob, sprintf, formline, unpack, pack, join, anonlist, anonhash, splice, warn, die, reset, exit, close, pipe_op, fileno, umask, binmode, tie, dbmopen, sselect, select, getc, read, enterwrite, sysopen, sysseek, sysread, syswrite, eof, tell, seek, truncate, fcntl, ioctl, send, recv, socket, sockpair, bind, connect, listen, accept, shutdown, gsockopt, ssockopt, open_dir, seekdir, gmtime, shmget, shmctl, shmread, shmwrite, msgget, msgctl, msgsnd, msgrcv, semop, semget, semctl, ghbyaddr, gnbyaddr, gpbynumber, gsbyname, gsbyport, syscall */
2993     0x3d9c, 0x3cb8, 0x2cf4, 0x2c30, 0x0003, /* backtick */
2994     0x06d5, /* subst */
2995     0x129c, 0x23d8, 0x0ad4, 0x454c, 0x2768, 0x4cc4, 0x08e1, /* trans, transr */
2996     0x10dc, 0x05f8, 0x0067, /* sassign */
2997     0x0d98, 0x0c94, 0x0b90, 0x362c, 0x06c8, 0x0067, /* aassign */
2998     0x4a90, 0x0003, /* chomp, schomp, scomplement, sin, cos, exp, log, sqrt, int, hex, oct, abs, ord, chr, chroot, rmdir, refaddr, reftype, ceil, floor */
2999     0x353c, 0x4638, 0x2fb4, 0x4a90, 0x0003, /* undef */
3000     0x06d4, 0x362c, 0x0003, /* pos */
3001     0x4a90, 0x0067, /* pow, multiply, i_multiply, divide, i_divide, modulo, i_modulo, add, i_add, subtract, i_subtract */
3002     0x1658, 0x0067, /* repeat */
3003     0x3818, 0x4a90, 0x0067, /* concat */
3004     0x353c, 0x0338, 0x1d54, 0x4a90, 0x47cc, 0x0003, /* multiconcat */
3005     0x4a90, 0x018f, /* stringify, atan2, rand, srand, crypt, push, unshift, flock, chdir, chown, unlink, chmod, utime, rename, link, symlink, mkdir, waitpid, system, exec, kill, getpgrp, setpgrp, getpriority, setpriority, sleep */
3006     0x4a90, 0x4be9, /* left_shift, right_shift, nbit_and, nbit_xor, nbit_or, ncomplement */
3007     0x4be9, /* bit_and, bit_xor, bit_or, sbit_and, sbit_xor, sbit_or, complement */
3008     0x06d4, 0x4a90, 0x0003, /* length */
3009     0x3ff0, 0x362c, 0x012b, /* substr */
3010     0x362c, 0x0067, /* vec */
3011     0x3798, 0x06d4, 0x4a90, 0x018f, /* index, rindex */
3012     0x353c, 0x3bb8, 0x06d4, 0x362c, 0x4408, 0x46e4, 0x0003, /* rv2av */
3013     0x025f, /* aelemfast, aelemfast_lex, aelemfastlex_store */
3014     0x353c, 0x3438, 0x03d6, 0x362c, 0x0067, /* aelem, helem */
3015     0x353c, 0x362c, 0x4409, /* aslice, hslice */
3016     0x362d, /* kvaslice, kvhslice */
3017     0x353c, 0x4358, 0x3154, 0x0003, /* delete */
3018     0x4918, 0x0003, /* exists */
3019     0x353c, 0x3bb8, 0x06d4, 0x0770, 0x362c, 0x4408, 0x46e4, 0x30a1, /* rv2hv */
3020     0x353c, 0x3438, 0x1314, 0x1c70, 0x362c, 0x46e4, 0x0003, /* multideref */
3021     0x353c, 0x3bb8, 0x0410, 0x324c, 0x2a69, /* split */
3022     0x353c, 0x2499, /* list */
3023     0x353c, 0x4638, 0x0214, 0x4a90, 0x018f, /* emptyavhv */
3024     0x15b0, 0x2d8c, 0x40e8, 0x2e84, 0x3b21, /* sort */
3025     0x2d8c, 0x0003, /* reverse */
3026     0x06d4, 0x0003, /* grepwhile */
3027     0x32d8, 0x0003, /* flip, flop */
3028     0x353c, 0x0003, /* cond_expr */
3029     0x353c, 0x1198, 0x03d6, 0x014c, 0x49e8, 0x46e4, 0x2b41, /* entersub */
3030     0x3e58, 0x0003, /* leavesub, leavesublv, leavewrite, leaveeval */
3031     0x02aa, 0x0003, /* argelem */
3032     0x295c, 0x2838, 0x0003, /* argdefelem */
3033     0x00bc, 0x018f, /* caller */
3034     0x2675, /* nextstate, dbstate */
3035     0x33dc, 0x3e59, /* leave */
3036     0x353c, 0x3bb8, 0x120c, 0x4165, /* enteriter */
3037     0x4165, /* iter */
3038     0x33dc, 0x0067, /* leaveloop */
3039     0x4dfc, 0x0003, /* last, next, redo, dump, goto */
3040     0x3d9c, 0x3cb8, 0x2cf4, 0x2c30, 0x018f, /* open */
3041     0x2010, 0x226c, 0x2128, 0x1ee4, 0x0003, /* ftrread, ftrwrite, ftrexec, fteread, ftewrite, fteexec */
3042     0x2010, 0x226c, 0x2128, 0x0003, /* ftis, ftsize, ftmtime, ftatime, ftctime, ftrowned, fteowned, ftzero, ftsock, ftchr, ftblk, ftfile, ftdir, ftpipe, ftsuid, ftsgid, ftsvtx, ftlink, fttty, fttext, ftbinary */
3043     0x4a91, /* wait, getppid, time */
3044     0x3ef4, 0x0fb0, 0x082c, 0x4b68, 0x2584, 0x0003, /* entereval */
3045     0x36fc, 0x0018, 0x14c4, 0x13e1, /* coreargs */
3046     0x362c, 0x00c7, /* avhvswitch */
3047     0x353c, 0x01fb, /* padrange */
3048     0x353c, 0x4638, 0x04f6, 0x2f0c, 0x1ac8, 0x0067, /* refassign */
3049     0x353c, 0x4638, 0x04f6, 0x2f0c, 0x1ac8, 0x0003, /* lvref */
3050     0x353d, /* lvrefslice */
3051     0x1dfc, 0x0003, /* pushdefer */
3052     0x131c, 0x0003, /* helemexistsor */
3053
3054 };
3055
3056
3057 /* PL_op_private_valid: for each op, indexed by op_type, indicate which
3058  * flags bits in op_private are legal */
3059
3060 EXTCONST U8 PL_op_private_valid[] = {
3061         [OP_NULL]               = (0xff),
3062         [OP_STUB]               = (0),
3063         [OP_SCALAR]             = (OPpARG1_MASK),
3064         [OP_PUSHMARK]           = (OPpPAD_STATE|OPpLVAL_INTRO),
3065         [OP_WANTARRAY]          = (OPpOFFBYONE),
3066         [OP_CONST]              = (OPpCONST_NOVER|OPpCONST_SHORTCIRCUIT|OPpCONST_STRICT|OPpCONST_ENTERED|OPpCONST_BARE),
3067         [OP_GVSV]               = (OPpOUR_INTRO|OPpLVAL_INTRO),
3068         [OP_GV]                 = (OPpEARLY_CV),
3069         [OP_GELEM]              = (OPpARG2_MASK),
3070         [OP_PADSV]              = (OPpDEREF|OPpPAD_STATE|OPpLVAL_INTRO),
3071         [OP_PADSV_STORE]        = (OPpARG1_MASK|OPpPAD_STATE|OPpLVAL_INTRO),
3072         [OP_PADAV]              = (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpTRUEBOOL|OPpPAD_STATE|OPpLVAL_INTRO),
3073         [OP_PADHV]              = (OPpPADHV_ISKEYS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL|OPpPAD_STATE|OPpLVAL_INTRO),
3074         [OP_PADANY]             = (0),
3075         [OP_RV2GV]              = (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpDONT_INIT_GV|OPpMAYBE_LVSUB|OPpDEREF|OPpALLOW_FAKE|OPpLVAL_INTRO),
3076         [OP_RV2SV]              = (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpDEREF|OPpOUR_INTRO|OPpLVAL_INTRO),
3077         [OP_AV2ARYLEN]          = (OPpARG1_MASK|OPpMAYBE_LVSUB),
3078         [OP_RV2CV]              = (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpMAY_RETURN_CONSTANT|OPpENTERSUB_DB|OPpENTERSUB_NOPAREN),
3079         [OP_ANONCODE]           = (0),
3080         [OP_PROTOTYPE]          = (OPpARG1_MASK),
3081         [OP_REFGEN]             = (OPpARG1_MASK),
3082         [OP_SREFGEN]            = (OPpARG1_MASK),
3083         [OP_REF]                = (OPpARG1_MASK|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL),
3084         [OP_BLESS]              = (OPpARG4_MASK),
3085         [OP_BACKTICK]           = (OPpARG1_MASK|OPpOPEN_IN_RAW|OPpOPEN_IN_CRLF|OPpOPEN_OUT_RAW|OPpOPEN_OUT_CRLF),
3086         [OP_GLOB]               = (OPpARG4_MASK),
3087         [OP_READLINE]           = (OPpARG1_MASK),
3088         [OP_RCATLINE]           = (0),
3089         [OP_REGCMAYBE]          = (OPpARG1_MASK),
3090         [OP_REGCRESET]          = (OPpARG1_MASK),
3091         [OP_REGCOMP]            = (OPpARG1_MASK),
3092         [OP_MATCH]              = (0),
3093         [OP_QR]                 = (0),
3094         [OP_SUBST]              = (OPpTRUEBOOL),
3095         [OP_SUBSTCONT]          = (OPpARG1_MASK),
3096         [OP_TRANS]              = (OPpTRANS_CAN_FORCE_UTF8|OPpTRANS_USE_SVOP|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
3097         [OP_TRANSR]             = (OPpTRANS_CAN_FORCE_UTF8|OPpTRANS_USE_SVOP|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
3098         [OP_SASSIGN]            = (OPpARG2_MASK|OPpASSIGN_BACKWARDS|OPpASSIGN_CV_TO_GV),
3099         [OP_AASSIGN]            = (OPpARG2_MASK|OPpASSIGN_TRUEBOOL|OPpMAYBE_LVSUB|OPpASSIGN_COMMON_AGG|OPpASSIGN_COMMON_RC1|OPpASSIGN_COMMON_SCALAR),
3100         [OP_CHOP]               = (OPpARG1_MASK),
3101         [OP_SCHOP]              = (OPpARG1_MASK),
3102         [OP_CHOMP]              = (OPpARG1_MASK|OPpTARGET_MY),
3103         [OP_SCHOMP]             = (OPpARG1_MASK|OPpTARGET_MY),
3104         [OP_DEFINED]            = (OPpARG1_MASK),
3105         [OP_UNDEF]              = (OPpARG1_MASK|OPpTARGET_MY|OPpUNDEF_KEEP_PV|OPpPAD_STATE|OPpLVAL_INTRO),
3106         [OP_STUDY]              = (OPpARG1_MASK),
3107         [OP_POS]                = (OPpARG1_MASK|OPpMAYBE_LVSUB|OPpTRUEBOOL),
3108         [OP_PREINC]             = (OPpARG1_MASK),
3109         [OP_I_PREINC]           = (OPpARG1_MASK),
3110         [OP_PREDEC]             = (OPpARG1_MASK),
3111         [OP_I_PREDEC]           = (OPpARG1_MASK),
3112         [OP_POSTINC]            = (OPpARG1_MASK),
3113         [OP_I_POSTINC]          = (OPpARG1_MASK),
3114         [OP_POSTDEC]            = (OPpARG1_MASK),
3115         [OP_I_POSTDEC]          = (OPpARG1_MASK),
3116         [OP_POW]                = (OPpARG2_MASK|OPpTARGET_MY),
3117         [OP_MULTIPLY]           = (OPpARG2_MASK|OPpTARGET_MY),
3118         [OP_I_MULTIPLY]         = (OPpARG2_MASK|OPpTARGET_MY),
3119         [OP_DIVIDE]             = (OPpARG2_MASK|OPpTARGET_MY),
3120         [OP_I_DIVIDE]           = (OPpARG2_MASK|OPpTARGET_MY),
3121         [OP_MODULO]             = (OPpARG2_MASK|OPpTARGET_MY),
3122         [OP_I_MODULO]           = (OPpARG2_MASK|OPpTARGET_MY),
3123         [OP_REPEAT]             = (OPpARG2_MASK|OPpREPEAT_DOLIST),
3124         [OP_ADD]                = (OPpARG2_MASK|OPpTARGET_MY),
3125         [OP_I_ADD]              = (OPpARG2_MASK|OPpTARGET_MY),
3126         [OP_SUBTRACT]           = (OPpARG2_MASK|OPpTARGET_MY),
3127         [OP_I_SUBTRACT]         = (OPpARG2_MASK|OPpTARGET_MY),
3128         [OP_CONCAT]             = (OPpARG2_MASK|OPpTARGET_MY|OPpCONCAT_NESTED),
3129         [OP_MULTICONCAT]        = (OPpARG1_MASK|OPpMULTICONCAT_STRINGIFY|OPpTARGET_MY|OPpMULTICONCAT_FAKE|OPpMULTICONCAT_APPEND|OPpLVAL_INTRO),
3130         [OP_STRINGIFY]          = (OPpARG4_MASK|OPpTARGET_MY),
3131         [OP_LEFT_SHIFT]         = (OPpUSEINT|OPpTARGET_MY),
3132         [OP_RIGHT_SHIFT]        = (OPpUSEINT|OPpTARGET_MY),
3133         [OP_LT]                 = (OPpARG2_MASK),
3134         [OP_I_LT]               = (OPpARG2_MASK),
3135         [OP_GT]                 = (OPpARG2_MASK),
3136         [OP_I_GT]               = (OPpARG2_MASK),
3137         [OP_LE]                 = (OPpARG2_MASK),
3138         [OP_I_LE]               = (OPpARG2_MASK),
3139         [OP_GE]                 = (OPpARG2_MASK),
3140         [OP_I_GE]               = (OPpARG2_MASK),
3141         [OP_EQ]                 = (OPpARG2_MASK),
3142         [OP_I_EQ]               = (OPpARG2_MASK),
3143         [OP_NE]                 = (OPpARG2_MASK),
3144         [OP_I_NE]               = (OPpARG2_MASK),
3145         [OP_NCMP]               = (OPpARG2_MASK),
3146         [OP_I_NCMP]             = (OPpARG2_MASK),
3147         [OP_SLT]                = (OPpARG2_MASK),
3148         [OP_SGT]                = (OPpARG2_MASK),
3149         [OP_SLE]                = (OPpARG2_MASK),
3150         [OP_SGE]                = (OPpARG2_MASK),
3151         [OP_SEQ]                = (OPpARG2_MASK),
3152         [OP_SNE]                = (OPpARG2_MASK),
3153         [OP_SCMP]               = (OPpARG2_MASK),
3154         [OP_BIT_AND]            = (OPpUSEINT),
3155         [OP_BIT_XOR]            = (OPpUSEINT),
3156         [OP_BIT_OR]             = (OPpUSEINT),
3157         [OP_NBIT_AND]           = (OPpUSEINT|OPpTARGET_MY),
3158         [OP_NBIT_XOR]           = (OPpUSEINT|OPpTARGET_MY),
3159         [OP_NBIT_OR]            = (OPpUSEINT|OPpTARGET_MY),
3160         [OP_SBIT_AND]           = (OPpUSEINT),
3161         [OP_SBIT_XOR]           = (OPpUSEINT),
3162         [OP_SBIT_OR]            = (OPpUSEINT),
3163         [OP_NEGATE]             = (OPpARG1_MASK),
3164         [OP_I_NEGATE]           = (OPpARG1_MASK),
3165         [OP_NOT]                = (OPpARG1_MASK),
3166         [OP_COMPLEMENT]         = (OPpUSEINT),
3167         [OP_NCOMPLEMENT]        = (OPpUSEINT|OPpTARGET_MY),
3168         [OP_SCOMPLEMENT]        = (OPpARG1_MASK|OPpTARGET_MY),
3169         [OP_SMARTMATCH]         = (OPpARG2_MASK),
3170         [OP_ATAN2]              = (OPpARG4_MASK|OPpTARGET_MY),
3171         [OP_SIN]                = (OPpARG1_MASK|OPpTARGET_MY),
3172         [OP_COS]                = (OPpARG1_MASK|OPpTARGET_MY),
3173         [OP_RAND]               = (OPpARG4_MASK|OPpTARGET_MY),
3174         [OP_SRAND]              = (OPpARG4_MASK|OPpTARGET_MY),
3175         [OP_EXP]                = (OPpARG1_MASK|OPpTARGET_MY),
3176         [OP_LOG]                = (OPpARG1_MASK|OPpTARGET_MY),
3177         [OP_SQRT]               = (OPpARG1_MASK|OPpTARGET_MY),
3178         [OP_INT]                = (OPpARG1_MASK|OPpTARGET_MY),
3179         [OP_HEX]                = (OPpARG1_MASK|OPpTARGET_MY),
3180         [OP_OCT]                = (OPpARG1_MASK|OPpTARGET_MY),
3181         [OP_ABS]                = (OPpARG1_MASK|OPpTARGET_MY),
3182         [OP_LENGTH]             = (OPpARG1_MASK|OPpTARGET_MY|OPpTRUEBOOL),
3183         [OP_SUBSTR]             = (OPpARG3_MASK|OPpMAYBE_LVSUB|OPpSUBSTR_REPL_FIRST),
3184         [OP_VEC]                = (OPpARG2_MASK|OPpMAYBE_LVSUB),
3185         [OP_INDEX]              = (OPpARG4_MASK|OPpTARGET_MY|OPpTRUEBOOL|OPpINDEX_BOOLNEG),
3186         [OP_RINDEX]             = (OPpARG4_MASK|OPpTARGET_MY|OPpTRUEBOOL|OPpINDEX_BOOLNEG),
3187         [OP_SPRINTF]            = (OPpARG4_MASK),
3188         [OP_FORMLINE]           = (OPpARG4_MASK),
3189         [OP_ORD]                = (OPpARG1_MASK|OPpTARGET_MY),
3190         [OP_CHR]                = (OPpARG1_MASK|OPpTARGET_MY),
3191         [OP_CRYPT]              = (OPpARG4_MASK|OPpTARGET_MY),
3192         [OP_UCFIRST]            = (OPpARG1_MASK),
3193         [OP_LCFIRST]            = (OPpARG1_MASK),
3194         [OP_UC]                 = (OPpARG1_MASK),
3195         [OP_LC]                 = (OPpARG1_MASK),
3196         [OP_QUOTEMETA]          = (OPpARG1_MASK),
3197         [OP_RV2AV]              = (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpTRUEBOOL|OPpOUR_INTRO|OPpLVAL_INTRO),
3198         [OP_AELEMFAST]          = (255),
3199         [OP_AELEMFAST_LEX]      = (255),
3200         [OP_AELEMFASTLEX_STORE] = (255),
3201         [OP_AELEM]              = (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpDEREF|OPpLVAL_DEFER|OPpLVAL_INTRO),
3202         [OP_ASLICE]             = (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpLVAL_INTRO),
3203         [OP_KVASLICE]           = (OPpMAYBE_LVSUB),
3204         [OP_AEACH]              = (OPpARG1_MASK),
3205         [OP_AVALUES]            = (OPpARG1_MASK),
3206         [OP_AKEYS]              = (OPpARG1_MASK|OPpMAYBE_LVSUB),
3207         [OP_EACH]               = (OPpARG1_MASK),
3208         [OP_VALUES]             = (OPpARG1_MASK|OPpMAYBE_LVSUB),
3209         [OP_KEYS]               = (OPpARG1_MASK|OPpMAYBE_LVSUB),
3210         [OP_DELETE]             = (OPpARG1_MASK|OPpKVSLICE|OPpSLICE|OPpLVAL_INTRO),
3211         [OP_EXISTS]             = (OPpARG1_MASK|OPpEXISTS_SUB),
3212         [OP_RV2HV]              = (OPpRV2HV_ISKEYS|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL|OPpOUR_INTRO|OPpLVAL_INTRO),
3213         [OP_HELEM]              = (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpDEREF|OPpLVAL_DEFER|OPpLVAL_INTRO),
3214         [OP_HSLICE]             = (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpLVAL_INTRO),
3215         [OP_KVHSLICE]           = (OPpMAYBE_LVSUB),
3216         [OP_MULTIDEREF]         = (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpMAYBE_LVSUB|OPpMULTIDEREF_EXISTS|OPpMULTIDEREF_DELETE|OPpLVAL_DEFER|OPpLVAL_INTRO),
3217         [OP_UNPACK]             = (OPpARG4_MASK),
3218         [OP_PACK]               = (OPpARG4_MASK),
3219         [OP_SPLIT]              = (OPpSPLIT_IMPLIM|OPpSPLIT_LEX|OPpSPLIT_ASSIGN|OPpOUR_INTRO|OPpLVAL_INTRO),
3220         [OP_JOIN]               = (OPpARG4_MASK),
3221         [OP_LIST]               = (OPpLIST_GUESSED|OPpLVAL_INTRO),
3222         [OP_LSLICE]             = (OPpARG2_MASK),
3223         [OP_ANONLIST]           = (OPpARG4_MASK),
3224         [OP_ANONHASH]           = (OPpARG4_MASK),
3225         [OP_EMPTYAVHV]          = (OPpARG4_MASK|OPpTARGET_MY|OPpEMPTYAVHV_IS_HV|OPpPAD_STATE|OPpLVAL_INTRO),
3226         [OP_SPLICE]             = (OPpARG4_MASK),
3227         [OP_PUSH]               = (OPpARG4_MASK|OPpTARGET_MY),
3228         [OP_POP]                = (OPpARG1_MASK),
3229         [OP_SHIFT]              = (OPpARG1_MASK),
3230         [OP_UNSHIFT]            = (OPpARG4_MASK|OPpTARGET_MY),
3231         [OP_SORT]               = (OPpSORT_NUMERIC|OPpSORT_INTEGER|OPpSORT_REVERSE|OPpSORT_INPLACE|OPpSORT_DESCEND),
3232         [OP_REVERSE]            = (OPpARG1_MASK|OPpREVERSE_INPLACE),
3233         [OP_GREPSTART]          = (OPpARG1_MASK),
3234         [OP_GREPWHILE]          = (OPpARG1_MASK|OPpTRUEBOOL),
3235         [OP_MAPSTART]           = (OPpARG1_MASK),
3236         [OP_MAPWHILE]           = (OPpARG1_MASK),
3237         [OP_RANGE]              = (OPpARG1_MASK),
3238         [OP_FLIP]               = (OPpARG1_MASK|OPpFLIP_LINENUM),
3239         [OP_FLOP]               = (OPpARG1_MASK|OPpFLIP_LINENUM),
3240         [OP_AND]                = (OPpARG1_MASK),
3241         [OP_OR]                 = (OPpARG1_MASK),
3242         [OP_XOR]                = (OPpARG2_MASK),
3243         [OP_DOR]                = (OPpARG1_MASK),
3244         [OP_COND_EXPR]          = (OPpARG1_MASK|OPpLVAL_INTRO),
3245         [OP_ANDASSIGN]          = (OPpARG1_MASK),
3246         [OP_ORASSIGN]           = (OPpARG1_MASK),
3247         [OP_DORASSIGN]          = (OPpARG1_MASK),
3248         [OP_ENTERSUB]           = (OPpENTERSUB_INARGS|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpDEREF|OPpENTERSUB_DB|OPpLVAL_INTRO),
3249         [OP_LEAVESUB]           = (OPpARG1_MASK|OPpREFCOUNTED),
3250         [OP_LEAVESUBLV]         = (OPpARG1_MASK|OPpREFCOUNTED),
3251         [OP_ARGCHECK]           = (OPpARG1_MASK),
3252         [OP_ARGELEM]            = (OPpARG1_MASK|OPpARGELEM_MASK),
3253         [OP_ARGDEFELEM]         = (OPpARG1_MASK|OPpARG_IF_FALSE|OPpARG_IF_UNDEF),
3254         [OP_CALLER]             = (OPpARG4_MASK|OPpOFFBYONE),
3255         [OP_WARN]               = (OPpARG4_MASK),
3256         [OP_DIE]                = (OPpARG4_MASK),
3257         [OP_RESET]              = (OPpARG4_MASK),
3258         [OP_LINESEQ]            = (0),
3259         [OP_NEXTSTATE]          = (OPpHUSH_VMSISH),
3260         [OP_DBSTATE]            = (OPpHUSH_VMSISH),
3261         [OP_UNSTACK]            = (0),
3262         [OP_ENTER]              = (0),
3263         [OP_LEAVE]              = (OPpREFCOUNTED|OPpLVALUE),
3264         [OP_SCOPE]              = (0),
3265         [OP_ENTERITER]          = (OPpITER_REVERSED|OPpITER_DEF|OPpOUR_INTRO|OPpLVAL_INTRO),
3266         [OP_ITER]               = (OPpITER_REVERSED),
3267         [OP_ENTERLOOP]          = (0),
3268         [OP_LEAVELOOP]          = (OPpARG2_MASK|OPpLVALUE),
3269         [OP_RETURN]             = (0),
3270         [OP_LAST]               = (OPpARG1_MASK|OPpPV_IS_UTF8),
3271         [OP_NEXT]               = (OPpARG1_MASK|OPpPV_IS_UTF8),
3272         [OP_REDO]               = (OPpARG1_MASK|OPpPV_IS_UTF8),
3273         [OP_DUMP]               = (OPpARG1_MASK|OPpPV_IS_UTF8),
3274         [OP_GOTO]               = (OPpARG1_MASK|OPpPV_IS_UTF8),
3275         [OP_EXIT]               = (OPpARG4_MASK),
3276         [OP_METHOD]             = (OPpARG1_MASK),
3277         [OP_METHOD_NAMED]       = (OPpARG1_MASK),
3278         [OP_METHOD_SUPER]       = (OPpARG1_MASK),
3279         [OP_METHOD_REDIR]       = (OPpARG1_MASK),
3280         [OP_METHOD_REDIR_SUPER] = (OPpARG1_MASK),
3281         [OP_ENTERGIVEN]         = (OPpARG1_MASK),
3282         [OP_LEAVEGIVEN]         = (OPpARG1_MASK),
3283         [OP_ENTERWHEN]          = (OPpARG1_MASK),
3284         [OP_LEAVEWHEN]          = (OPpARG1_MASK),
3285         [OP_BREAK]              = (0),
3286         [OP_CONTINUE]           = (0),
3287         [OP_OPEN]               = (OPpARG4_MASK|OPpOPEN_IN_RAW|OPpOPEN_IN_CRLF|OPpOPEN_OUT_RAW|OPpOPEN_OUT_CRLF),
3288         [OP_CLOSE]              = (OPpARG4_MASK),
3289         [OP_PIPE_OP]            = (OPpARG4_MASK),
3290         [OP_FILENO]             = (OPpARG4_MASK),
3291         [OP_UMASK]              = (OPpARG4_MASK),
3292         [OP_BINMODE]            = (OPpARG4_MASK),
3293         [OP_TIE]                = (OPpARG4_MASK),
3294         [OP_UNTIE]              = (OPpARG1_MASK),
3295         [OP_TIED]               = (OPpARG1_MASK),
3296         [OP_DBMOPEN]            = (OPpARG4_MASK),
3297         [OP_DBMCLOSE]           = (OPpARG1_MASK),
3298         [OP_SSELECT]            = (OPpARG4_MASK),
3299         [OP_SELECT]             = (OPpARG4_MASK),
3300         [OP_GETC]               = (OPpARG4_MASK),
3301         [OP_READ]               = (OPpARG4_MASK),
3302         [OP_ENTERWRITE]         = (OPpARG4_MASK),
3303         [OP_LEAVEWRITE]         = (OPpARG1_MASK|OPpREFCOUNTED),
3304         [OP_PRTF]               = (0),
3305         [OP_PRINT]              = (0),
3306         [OP_SAY]                = (0),
3307         [OP_SYSOPEN]            = (OPpARG4_MASK),
3308         [OP_SYSSEEK]            = (OPpARG4_MASK),
3309         [OP_SYSREAD]            = (OPpARG4_MASK),
3310         [OP_SYSWRITE]           = (OPpARG4_MASK),
3311         [OP_EOF]                = (OPpARG4_MASK),
3312         [OP_TELL]               = (OPpARG4_MASK),
3313         [OP_SEEK]               = (OPpARG4_MASK),
3314         [OP_TRUNCATE]           = (OPpARG4_MASK),
3315         [OP_FCNTL]              = (OPpARG4_MASK),
3316         [OP_IOCTL]              = (OPpARG4_MASK),
3317         [OP_FLOCK]              = (OPpARG4_MASK|OPpTARGET_MY),
3318         [OP_SEND]               = (OPpARG4_MASK),
3319         [OP_RECV]               = (OPpARG4_MASK),
3320         [OP_SOCKET]             = (OPpARG4_MASK),
3321         [OP_SOCKPAIR]           = (OPpARG4_MASK),
3322         [OP_BIND]               = (OPpARG4_MASK),
3323         [OP_CONNECT]            = (OPpARG4_MASK),
3324         [OP_LISTEN]             = (OPpARG4_MASK),
3325         [OP_ACCEPT]             = (OPpARG4_MASK),
3326         [OP_SHUTDOWN]           = (OPpARG4_MASK),
3327         [OP_GSOCKOPT]           = (OPpARG4_MASK),
3328         [OP_SSOCKOPT]           = (OPpARG4_MASK),
3329         [OP_GETSOCKNAME]        = (OPpARG1_MASK),
3330         [OP_GETPEERNAME]        = (OPpARG1_MASK),
3331         [OP_LSTAT]              = (OPpARG1_MASK),
3332         [OP_STAT]               = (OPpARG1_MASK),
3333         [OP_FTRREAD]            = (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3334         [OP_FTRWRITE]           = (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3335         [OP_FTREXEC]            = (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3336         [OP_FTEREAD]            = (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3337         [OP_FTEWRITE]           = (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3338         [OP_FTEEXEC]            = (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3339         [OP_FTIS]               = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3340         [OP_FTSIZE]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3341         [OP_FTMTIME]            = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3342         [OP_FTATIME]            = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3343         [OP_FTCTIME]            = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3344         [OP_FTROWNED]           = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3345         [OP_FTEOWNED]           = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3346         [OP_FTZERO]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3347         [OP_FTSOCK]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3348         [OP_FTCHR]              = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3349         [OP_FTBLK]              = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3350         [OP_FTFILE]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3351         [OP_FTDIR]              = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3352         [OP_FTPIPE]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3353         [OP_FTSUID]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3354         [OP_FTSGID]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3355         [OP_FTSVTX]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3356         [OP_FTLINK]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3357         [OP_FTTTY]              = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3358         [OP_FTTEXT]             = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3359         [OP_FTBINARY]           = (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3360         [OP_CHDIR]              = (OPpARG4_MASK|OPpTARGET_MY),
3361         [OP_CHOWN]              = (OPpARG4_MASK|OPpTARGET_MY),
3362         [OP_CHROOT]             = (OPpARG1_MASK|OPpTARGET_MY),
3363         [OP_UNLINK]             = (OPpARG4_MASK|OPpTARGET_MY),
3364         [OP_CHMOD]              = (OPpARG4_MASK|OPpTARGET_MY),
3365         [OP_UTIME]              = (OPpARG4_MASK|OPpTARGET_MY),
3366         [OP_RENAME]             = (OPpARG4_MASK|OPpTARGET_MY),
3367         [OP_LINK]               = (OPpARG4_MASK|OPpTARGET_MY),
3368         [OP_SYMLINK]            = (OPpARG4_MASK|OPpTARGET_MY),
3369         [OP_READLINK]           = (OPpARG1_MASK),
3370         [OP_MKDIR]              = (OPpARG4_MASK|OPpTARGET_MY),
3371         [OP_RMDIR]              = (OPpARG1_MASK|OPpTARGET_MY),
3372         [OP_OPEN_DIR]           = (OPpARG4_MASK),
3373         [OP_READDIR]            = (OPpARG1_MASK),
3374         [OP_TELLDIR]            = (OPpARG1_MASK),
3375         [OP_SEEKDIR]            = (OPpARG4_MASK),
3376         [OP_REWINDDIR]          = (OPpARG1_MASK),
3377         [OP_CLOSEDIR]           = (OPpARG1_MASK),
3378         [OP_FORK]               = (0),
3379         [OP_WAIT]               = (OPpTARGET_MY),
3380         [OP_WAITPID]            = (OPpARG4_MASK|OPpTARGET_MY),
3381         [OP_SYSTEM]             = (OPpARG4_MASK|OPpTARGET_MY),
3382         [OP_EXEC]               = (OPpARG4_MASK|OPpTARGET_MY),
3383         [OP_KILL]               = (OPpARG4_MASK|OPpTARGET_MY),
3384         [OP_GETPPID]            = (OPpTARGET_MY),
3385         [OP_GETPGRP]            = (OPpARG4_MASK|OPpTARGET_MY),
3386         [OP_SETPGRP]            = (OPpARG4_MASK|OPpTARGET_MY),
3387         [OP_GETPRIORITY]        = (OPpARG4_MASK|OPpTARGET_MY),
3388         [OP_SETPRIORITY]        = (OPpARG4_MASK|OPpTARGET_MY),
3389         [OP_TIME]               = (OPpTARGET_MY),
3390         [OP_TMS]                = (0),
3391         [OP_LOCALTIME]          = (OPpARG1_MASK),
3392         [OP_GMTIME]             = (OPpARG4_MASK),
3393         [OP_ALARM]              = (OPpARG1_MASK),
3394         [OP_SLEEP]              = (OPpARG4_MASK|OPpTARGET_MY),
3395         [OP_SHMGET]             = (OPpARG4_MASK),
3396         [OP_SHMCTL]             = (OPpARG4_MASK),
3397         [OP_SHMREAD]            = (OPpARG4_MASK),
3398         [OP_SHMWRITE]           = (OPpARG4_MASK),
3399         [OP_MSGGET]             = (OPpARG4_MASK),
3400         [OP_MSGCTL]             = (OPpARG4_MASK),
3401         [OP_MSGSND]             = (OPpARG4_MASK),
3402         [OP_MSGRCV]             = (OPpARG4_MASK),
3403         [OP_SEMOP]              = (OPpARG4_MASK),
3404         [OP_SEMGET]             = (OPpARG4_MASK),
3405         [OP_SEMCTL]             = (OPpARG4_MASK),
3406         [OP_REQUIRE]            = (OPpARG1_MASK),
3407         [OP_DOFILE]             = (OPpARG1_MASK),
3408         [OP_HINTSEVAL]          = (0),
3409         [OP_ENTEREVAL]          = (OPpARG1_MASK|OPpEVAL_HAS_HH|OPpEVAL_UNICODE|OPpEVAL_BYTES|OPpEVAL_COPHH|OPpEVAL_RE_REPARSING),
3410         [OP_LEAVEEVAL]          = (OPpARG1_MASK|OPpREFCOUNTED),
3411         [OP_ENTERTRY]           = (OPpARG1_MASK),
3412         [OP_LEAVETRY]           = (0),
3413         [OP_GHBYNAME]           = (OPpARG1_MASK),
3414         [OP_GHBYADDR]           = (OPpARG4_MASK),
3415         [OP_GHOSTENT]           = (0),
3416         [OP_GNBYNAME]           = (OPpARG1_MASK),
3417         [OP_GNBYADDR]           = (OPpARG4_MASK),
3418         [OP_GNETENT]            = (0),
3419         [OP_GPBYNAME]           = (OPpARG1_MASK),
3420         [OP_GPBYNUMBER]         = (OPpARG4_MASK),
3421         [OP_GPROTOENT]          = (0),
3422         [OP_GSBYNAME]           = (OPpARG4_MASK),
3423         [OP_GSBYPORT]           = (OPpARG4_MASK),
3424         [OP_GSERVENT]           = (0),
3425         [OP_SHOSTENT]           = (OPpARG1_MASK),
3426         [OP_SNETENT]            = (OPpARG1_MASK),
3427         [OP_SPROTOENT]          = (OPpARG1_MASK),
3428         [OP_SSERVENT]           = (OPpARG1_MASK),
3429         [OP_EHOSTENT]           = (0),
3430         [OP_ENETENT]            = (0),
3431         [OP_EPROTOENT]          = (0),
3432         [OP_ESERVENT]           = (0),
3433         [OP_GPWNAM]             = (OPpARG1_MASK),
3434         [OP_GPWUID]             = (OPpARG1_MASK),
3435         [OP_GPWENT]             = (0),
3436         [OP_SPWENT]             = (0),
3437         [OP_EPWENT]             = (0),
3438         [OP_GGRNAM]             = (OPpARG1_MASK),
3439         [OP_GGRGID]             = (OPpARG1_MASK),
3440         [OP_GGRENT]             = (0),
3441         [OP_SGRENT]             = (0),
3442         [OP_EGRENT]             = (0),
3443         [OP_GETLOGIN]           = (0),
3444         [OP_SYSCALL]            = (OPpARG4_MASK),
3445         [OP_LOCK]               = (OPpARG1_MASK),
3446         [OP_ONCE]               = (OPpARG1_MASK),
3447         [OP_CUSTOM]             = (0xff),
3448         [OP_COREARGS]           = (OPpCOREARGS_DEREF1|OPpCOREARGS_DEREF2|OPpCOREARGS_SCALARMOD|OPpCOREARGS_PUSHMARK),
3449         [OP_AVHVSWITCH]         = (OPpAVHVSWITCH_MASK|OPpMAYBE_LVSUB),
3450         [OP_RUNCV]              = (OPpOFFBYONE),
3451         [OP_FC]                 = (OPpARG1_MASK),
3452         [OP_PADCV]              = (0),
3453         [OP_INTROCV]            = (0),
3454         [OP_CLONECV]            = (0),
3455         [OP_PADRANGE]           = (OPpPADRANGE_COUNTMASK|OPpLVAL_INTRO),
3456         [OP_REFASSIGN]          = (OPpARG2_MASK|OPpLVREF_ELEM|OPpLVREF_ITER|OPpLVREF_TYPE|OPpPAD_STATE|OPpLVAL_INTRO),
3457         [OP_LVREF]              = (OPpARG1_MASK|OPpLVREF_ELEM|OPpLVREF_ITER|OPpLVREF_TYPE|OPpPAD_STATE|OPpLVAL_INTRO),
3458         [OP_LVREFSLICE]         = (OPpLVAL_INTRO),
3459         [OP_LVAVREF]            = (OPpARG1_MASK|OPpPAD_STATE|OPpLVAL_INTRO),
3460         [OP_ANONCONST]          = (OPpARG1_MASK),
3461         [OP_ISA]                = (OPpARG2_MASK),
3462         [OP_CMPCHAIN_AND]       = (OPpARG1_MASK),
3463         [OP_CMPCHAIN_DUP]       = (OPpARG1_MASK),
3464         [OP_ENTERTRYCATCH]      = (OPpARG1_MASK),
3465         [OP_LEAVETRYCATCH]      = (0),
3466         [OP_POPTRY]             = (0),
3467         [OP_CATCH]              = (OPpARG1_MASK),
3468         [OP_PUSHDEFER]          = (OPpARG1_MASK|OPpDEFER_FINALLY),
3469         [OP_IS_BOOL]            = (OPpARG1_MASK),
3470         [OP_IS_WEAK]            = (OPpARG1_MASK),
3471         [OP_WEAKEN]             = (OPpARG1_MASK),
3472         [OP_UNWEAKEN]           = (OPpARG1_MASK),
3473         [OP_BLESSED]            = (OPpARG1_MASK|OPpMAYBE_TRUEBOOL|OPpTRUEBOOL),
3474         [OP_REFADDR]            = (OPpARG1_MASK|OPpTARGET_MY),
3475         [OP_REFTYPE]            = (OPpARG1_MASK|OPpTARGET_MY),
3476         [OP_CEIL]               = (OPpARG1_MASK|OPpTARGET_MY),
3477         [OP_FLOOR]              = (OPpARG1_MASK|OPpTARGET_MY),
3478         [OP_IS_TAINTED]         = (OPpARG1_MASK),
3479         [OP_HELEMEXISTSOR]      = (OPpARG1_MASK|OPpHELEMEXISTSOR_DELETE),
3480
3481 };
3482
3483 #endif /* !DOINIT */
3484
3485 END_EXTERN_C
3486
3487
3488
3489 /* ex: set ro: */