*
* opcode.h
*
- * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
- * 2001, 2002, 2003, 2004, 2005, 2006, 2007 by Larry Wall and others
+ * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001,
+ * 2002, 2003, 2004, 2005, 2006, 2007 by Larry Wall and others
*
* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.
*
* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
- * This file is built by regen/opcode.pl from its data. Any changes made
- * here will be lost!
+ * This file is built by regen/opcode.pl from its data.
+ * Any changes made here will be lost!
*/
#ifndef PERL_GLOBAL_STRUCT_INIT
+#define Perl_pp_scalar Perl_pp_null
+#define Perl_pp_padany Perl_unimplemented_op
+#define Perl_pp_regcmaybe Perl_pp_null
+#define Perl_pp_transr Perl_pp_trans
+#define Perl_pp_chomp Perl_pp_chop
+#define Perl_pp_schomp Perl_pp_schop
#define Perl_pp_i_preinc Perl_pp_preinc
-#define Perl_pp_i_predec Perl_pp_predec
+#define Perl_pp_predec Perl_pp_preinc
+#define Perl_pp_i_predec Perl_pp_preinc
#define Perl_pp_i_postinc Perl_pp_postinc
-#define Perl_pp_i_postdec Perl_pp_postdec
-
-PERL_PPDEF(Perl_unimplemented_op)
-
+#define Perl_pp_postdec Perl_pp_postinc
+#define Perl_pp_i_postdec Perl_pp_postinc
+#define Perl_pp_slt Perl_pp_sle
+#define Perl_pp_sgt Perl_pp_sle
+#define Perl_pp_sge Perl_pp_sle
+#define Perl_pp_bit_xor Perl_pp_bit_or
+#define Perl_pp_cos Perl_pp_sin
+#define Perl_pp_exp Perl_pp_sin
+#define Perl_pp_log Perl_pp_sin
+#define Perl_pp_sqrt Perl_pp_sin
+#define Perl_pp_hex Perl_pp_oct
+#define Perl_pp_rindex Perl_pp_index
+#define Perl_pp_lcfirst Perl_pp_ucfirst
+#define Perl_pp_aelemfast_lex Perl_pp_aelemfast
+#define Perl_pp_avalues Perl_pp_akeys
+#define Perl_pp_values Perl_do_kv
+#define Perl_pp_keys Perl_do_kv
+#define Perl_pp_rv2hv Perl_pp_rv2av
+#define Perl_pp_pop Perl_pp_shift
+#define Perl_pp_mapstart Perl_unimplemented_op
+#define Perl_pp_dor Perl_pp_defined
+#define Perl_pp_andassign Perl_pp_and
+#define Perl_pp_orassign Perl_pp_or
+#define Perl_pp_dorassign Perl_pp_defined
+#define Perl_pp_lineseq Perl_pp_null
+#define Perl_pp_scope Perl_pp_null
+#define Perl_pp_dump Perl_pp_goto
+#define Perl_pp_dbmclose Perl_pp_untie
+#define Perl_pp_read Perl_pp_sysread
+#define Perl_pp_say Perl_pp_print
+#define Perl_pp_seek Perl_pp_sysseek
+#define Perl_pp_fcntl Perl_pp_ioctl
+#ifdef HAS_SOCKET
+#define Perl_pp_send Perl_pp_syswrite
+#define Perl_pp_recv Perl_pp_sysread
+#else
+#define Perl_pp_send Perl_unimplemented_op
+#define Perl_pp_recv Perl_unimplemented_op
+#define Perl_pp_socket Perl_unimplemented_op
+#endif
+#ifdef HAS_SOCKET
+#define Perl_pp_connect Perl_pp_bind
+#define Perl_pp_gsockopt Perl_pp_ssockopt
+#define Perl_pp_getsockname Perl_pp_getpeername
+#else
+#define Perl_pp_bind Perl_unimplemented_op
+#define Perl_pp_connect Perl_unimplemented_op
+#define Perl_pp_listen Perl_unimplemented_op
+#define Perl_pp_accept Perl_unimplemented_op
+#define Perl_pp_shutdown Perl_unimplemented_op
+#define Perl_pp_gsockopt Perl_unimplemented_op
+#define Perl_pp_ssockopt Perl_unimplemented_op
+#define Perl_pp_getsockname Perl_unimplemented_op
+#define Perl_pp_getpeername Perl_unimplemented_op
+#endif
+#define Perl_pp_lstat Perl_pp_stat
+#define Perl_pp_ftrwrite Perl_pp_ftrread
+#define Perl_pp_ftrexec Perl_pp_ftrread
+#define Perl_pp_fteread Perl_pp_ftrread
+#define Perl_pp_ftewrite Perl_pp_ftrread
+#define Perl_pp_fteexec Perl_pp_ftrread
+#define Perl_pp_ftsize Perl_pp_ftis
+#define Perl_pp_ftmtime Perl_pp_ftis
+#define Perl_pp_ftatime Perl_pp_ftis
+#define Perl_pp_ftctime Perl_pp_ftis
+#define Perl_pp_fteowned Perl_pp_ftrowned
+#define Perl_pp_ftzero Perl_pp_ftrowned
+#define Perl_pp_ftsock Perl_pp_ftrowned
+#define Perl_pp_ftchr Perl_pp_ftrowned
+#define Perl_pp_ftblk Perl_pp_ftrowned
+#define Perl_pp_ftfile Perl_pp_ftrowned
+#define Perl_pp_ftdir Perl_pp_ftrowned
+#define Perl_pp_ftpipe Perl_pp_ftrowned
+#define Perl_pp_ftsuid Perl_pp_ftrowned
+#define Perl_pp_ftsgid Perl_pp_ftrowned
+#define Perl_pp_ftsvtx Perl_pp_ftrowned
+#define Perl_pp_ftbinary Perl_pp_fttext
+#define Perl_pp_unlink Perl_pp_chown
+#define Perl_pp_chmod Perl_pp_chown
+#define Perl_pp_utime Perl_pp_chown
+#define Perl_pp_symlink Perl_pp_link
+#define Perl_pp_kill Perl_pp_chown
+#define Perl_pp_localtime Perl_pp_gmtime
+#define Perl_pp_shmget Perl_pp_semget
+#define Perl_pp_shmctl Perl_pp_semctl
+#define Perl_pp_shmread Perl_pp_shmwrite
+#define Perl_pp_msgget Perl_pp_semget
+#define Perl_pp_msgctl Perl_pp_semctl
+#define Perl_pp_msgsnd Perl_pp_shmwrite
+#define Perl_pp_msgrcv Perl_pp_shmwrite
+#define Perl_pp_semop Perl_pp_shmwrite
+#define Perl_pp_dofile Perl_pp_require
+#define Perl_pp_ghbyname Perl_pp_ghostent
+#define Perl_pp_ghbyaddr Perl_pp_ghostent
+#define Perl_pp_gnbyname Perl_pp_gnetent
+#define Perl_pp_gnbyaddr Perl_pp_gnetent
+#define Perl_pp_gpbyname Perl_pp_gprotoent
+#define Perl_pp_gpbynumber Perl_pp_gprotoent
+#define Perl_pp_gsbyname Perl_pp_gservent
+#define Perl_pp_gsbyport Perl_pp_gservent
+#define Perl_pp_snetent Perl_pp_shostent
+#define Perl_pp_sprotoent Perl_pp_shostent
+#define Perl_pp_sservent Perl_pp_shostent
+#define Perl_pp_enetent Perl_pp_ehostent
+#define Perl_pp_eprotoent Perl_pp_ehostent
+#define Perl_pp_eservent Perl_pp_ehostent
+#define Perl_pp_gpwnam Perl_pp_gpwent
+#define Perl_pp_gpwuid Perl_pp_gpwent
+#define Perl_pp_spwent Perl_pp_ehostent
+#define Perl_pp_epwent Perl_pp_ehostent
+#define Perl_pp_ggrnam Perl_pp_ggrent
+#define Perl_pp_ggrgid Perl_pp_ggrent
+#define Perl_pp_sgrent Perl_pp_ehostent
+#define Perl_pp_egrent Perl_pp_ehostent
+#define Perl_pp_custom Perl_unimplemented_op
+#define Perl_pp_reach Perl_pp_rkeys
+#define Perl_pp_rvalues Perl_pp_rkeys
START_EXTERN_C
-#define OP_NAME(o) ((o)->op_type == OP_CUSTOM ? custom_op_name(o) : \
- PL_op_name[(o)->op_type])
-#define OP_DESC(o) ((o)->op_type == OP_CUSTOM ? custom_op_desc(o) : \
- PL_op_desc[(o)->op_type])
-
#ifndef DOINIT
EXTCONST char* const PL_op_name[];
#else
"subst",
"substcont",
"trans",
+ "transr",
"sassign",
"aassign",
"chop",
"quotemeta",
"rv2av",
"aelemfast",
+ "aelemfast_lex",
"aelem",
"aslice",
"aeach",
"rv2hv",
"helem",
"hslice",
- "boolkeys",
"unpack",
"pack",
"split",
"reach",
"rkeys",
"rvalues",
- "transr",
+ "coreargs",
+ "runcv",
+ "fc",
+ "padcv",
+ "introcv",
+ "clonecv",
+ "padrange",
+ "freed",
};
#endif
"substitution (s///)",
"substitution iterator",
"transliteration (tr///)",
+ "transliteration (tr///)",
"scalar assignment",
"list assignment",
"chop",
"quotemeta",
"array dereference",
"constant array element",
+ "constant lexical array element",
"array element",
"array slice",
"each on array",
"hash dereference",
"hash element",
"hash slice",
- "boolkeys",
"unpack",
"pack",
"split",
"each on reference",
"keys on reference",
"values on reference",
- "transliteration (tr///)",
+ "CORE:: subroutine",
+ "__SUB__",
+ "fc",
+ "private subroutine",
+ "private subroutine",
+ "private subroutine",
+ "list of private variables",
+ "freed op",
};
#endif
= {
Perl_pp_null,
Perl_pp_stub,
- Perl_pp_null, /* Perl_pp_scalar */
+ Perl_pp_scalar, /* implemented by Perl_pp_null */
Perl_pp_pushmark,
Perl_pp_wantarray,
Perl_pp_const,
Perl_pp_padsv,
Perl_pp_padav,
Perl_pp_padhv,
- Perl_unimplemented_op, /* Perl_pp_padany */
+ Perl_pp_padany, /* implemented by Perl_unimplemented_op */
Perl_pp_pushre,
Perl_pp_rv2gv,
Perl_pp_rv2sv,
Perl_pp_glob,
Perl_pp_readline,
Perl_pp_rcatline,
- Perl_pp_null, /* Perl_pp_regcmaybe */
+ Perl_pp_regcmaybe, /* implemented by Perl_pp_null */
Perl_pp_regcreset,
Perl_pp_regcomp,
Perl_pp_match,
Perl_pp_qr,
Perl_pp_subst,
Perl_pp_substcont,
- Perl_pp_trans, /* Perl_pp_trans */
+ Perl_pp_trans,
+ Perl_pp_transr, /* implemented by Perl_pp_trans */
Perl_pp_sassign,
Perl_pp_aassign,
Perl_pp_chop,
Perl_pp_schop,
- Perl_pp_chomp,
- Perl_pp_schomp,
+ Perl_pp_chomp, /* implemented by Perl_pp_chop */
+ Perl_pp_schomp, /* implemented by Perl_pp_schop */
Perl_pp_defined,
Perl_pp_undef,
Perl_pp_study,
Perl_pp_pos,
Perl_pp_preinc,
- Perl_pp_i_preinc,
- Perl_pp_predec,
- Perl_pp_i_predec,
+ Perl_pp_i_preinc, /* implemented by Perl_pp_preinc */
+ Perl_pp_predec, /* implemented by Perl_pp_preinc */
+ Perl_pp_i_predec, /* implemented by Perl_pp_preinc */
Perl_pp_postinc,
- Perl_pp_i_postinc,
- Perl_pp_postdec,
- Perl_pp_i_postdec,
+ Perl_pp_i_postinc, /* implemented by Perl_pp_postinc */
+ Perl_pp_postdec, /* implemented by Perl_pp_postinc */
+ Perl_pp_i_postdec, /* implemented by Perl_pp_postinc */
Perl_pp_pow,
Perl_pp_multiply,
Perl_pp_i_multiply,
Perl_pp_i_ne,
Perl_pp_ncmp,
Perl_pp_i_ncmp,
- Perl_pp_sle, /* Perl_pp_slt */
- Perl_pp_sle, /* Perl_pp_sgt */
+ Perl_pp_slt, /* implemented by Perl_pp_sle */
+ Perl_pp_sgt, /* implemented by Perl_pp_sle */
Perl_pp_sle,
- Perl_pp_sle, /* Perl_pp_sge */
+ Perl_pp_sge, /* implemented by Perl_pp_sle */
Perl_pp_seq,
Perl_pp_sne,
Perl_pp_scmp,
Perl_pp_bit_and,
- Perl_pp_bit_or, /* Perl_pp_bit_xor */
+ Perl_pp_bit_xor, /* implemented by Perl_pp_bit_or */
Perl_pp_bit_or,
Perl_pp_negate,
Perl_pp_i_negate,
Perl_pp_smartmatch,
Perl_pp_atan2,
Perl_pp_sin,
- Perl_pp_sin, /* Perl_pp_cos */
+ Perl_pp_cos, /* implemented by Perl_pp_sin */
Perl_pp_rand,
Perl_pp_srand,
- Perl_pp_sin, /* Perl_pp_exp */
- Perl_pp_sin, /* Perl_pp_log */
- Perl_pp_sin, /* Perl_pp_sqrt */
+ Perl_pp_exp, /* implemented by Perl_pp_sin */
+ Perl_pp_log, /* implemented by Perl_pp_sin */
+ Perl_pp_sqrt, /* implemented by Perl_pp_sin */
Perl_pp_int,
- Perl_pp_oct, /* Perl_pp_hex */
+ Perl_pp_hex, /* implemented by Perl_pp_oct */
Perl_pp_oct,
Perl_pp_abs,
Perl_pp_length,
Perl_pp_substr,
Perl_pp_vec,
Perl_pp_index,
- Perl_pp_index, /* Perl_pp_rindex */
+ Perl_pp_rindex, /* implemented by Perl_pp_index */
Perl_pp_sprintf,
Perl_pp_formline,
Perl_pp_ord,
Perl_pp_chr,
Perl_pp_crypt,
Perl_pp_ucfirst,
- Perl_pp_ucfirst, /* Perl_pp_lcfirst */
+ Perl_pp_lcfirst, /* implemented by Perl_pp_ucfirst */
Perl_pp_uc,
Perl_pp_lc,
Perl_pp_quotemeta,
Perl_pp_rv2av,
Perl_pp_aelemfast,
+ Perl_pp_aelemfast_lex, /* implemented by Perl_pp_aelemfast */
Perl_pp_aelem,
Perl_pp_aslice,
Perl_pp_aeach,
Perl_pp_akeys,
- Perl_pp_akeys, /* Perl_pp_avalues */
+ Perl_pp_avalues, /* implemented by Perl_pp_akeys */
Perl_pp_each,
- Perl_do_kv, /* Perl_pp_values */
- Perl_do_kv, /* Perl_pp_keys */
+ Perl_pp_values, /* implemented by Perl_do_kv */
+ Perl_pp_keys, /* implemented by Perl_do_kv */
Perl_pp_delete,
Perl_pp_exists,
- Perl_pp_rv2av, /* Perl_pp_rv2hv */
+ Perl_pp_rv2hv, /* implemented by Perl_pp_rv2av */
Perl_pp_helem,
Perl_pp_hslice,
- Perl_pp_boolkeys,
Perl_pp_unpack,
Perl_pp_pack,
Perl_pp_split,
Perl_pp_anonhash,
Perl_pp_splice,
Perl_pp_push,
- Perl_pp_shift, /* Perl_pp_pop */
+ Perl_pp_pop, /* implemented by Perl_pp_shift */
Perl_pp_shift,
Perl_pp_unshift,
Perl_pp_sort,
Perl_pp_reverse,
Perl_pp_grepstart,
Perl_pp_grepwhile,
- Perl_unimplemented_op, /* Perl_pp_mapstart */
+ Perl_pp_mapstart, /* implemented by Perl_unimplemented_op */
Perl_pp_mapwhile,
Perl_pp_range,
Perl_pp_flip,
Perl_pp_and,
Perl_pp_or,
Perl_pp_xor,
- Perl_pp_defined, /* Perl_pp_dor */
+ Perl_pp_dor, /* implemented by Perl_pp_defined */
Perl_pp_cond_expr,
- Perl_pp_and, /* Perl_pp_andassign */
- Perl_pp_or, /* Perl_pp_orassign */
- Perl_pp_defined, /* Perl_pp_dorassign */
+ Perl_pp_andassign, /* implemented by Perl_pp_and */
+ Perl_pp_orassign, /* implemented by Perl_pp_or */
+ Perl_pp_dorassign, /* implemented by Perl_pp_defined */
Perl_pp_method,
Perl_pp_entersub,
Perl_pp_leavesub,
Perl_pp_warn,
Perl_pp_die,
Perl_pp_reset,
- Perl_pp_null, /* Perl_pp_lineseq */
+ Perl_pp_lineseq, /* implemented by Perl_pp_null */
Perl_pp_nextstate,
Perl_pp_dbstate,
Perl_pp_unstack,
Perl_pp_enter,
Perl_pp_leave,
- Perl_pp_null, /* Perl_pp_scope */
+ Perl_pp_scope, /* implemented by Perl_pp_null */
Perl_pp_enteriter,
Perl_pp_iter,
Perl_pp_enterloop,
Perl_pp_last,
Perl_pp_next,
Perl_pp_redo,
- Perl_pp_goto, /* Perl_pp_dump */
+ Perl_pp_dump, /* implemented by Perl_pp_goto */
Perl_pp_goto,
Perl_pp_exit,
Perl_pp_method_named,
Perl_pp_untie,
Perl_pp_tied,
Perl_pp_dbmopen,
- Perl_pp_untie, /* Perl_pp_dbmclose */
+ Perl_pp_dbmclose, /* implemented by Perl_pp_untie */
Perl_pp_sselect,
Perl_pp_select,
Perl_pp_getc,
- Perl_pp_sysread, /* Perl_pp_read */
+ Perl_pp_read, /* implemented by Perl_pp_sysread */
Perl_pp_enterwrite,
Perl_pp_leavewrite,
Perl_pp_prtf,
Perl_pp_print,
- Perl_pp_print, /* Perl_pp_say */
+ Perl_pp_say, /* implemented by Perl_pp_print */
Perl_pp_sysopen,
Perl_pp_sysseek,
Perl_pp_sysread,
- Perl_pp_send, /* Perl_pp_syswrite */
+ Perl_pp_syswrite,
Perl_pp_eof,
Perl_pp_tell,
- Perl_pp_sysseek, /* Perl_pp_seek */
+ Perl_pp_seek, /* implemented by Perl_pp_sysseek */
Perl_pp_truncate,
- Perl_pp_ioctl, /* Perl_pp_fcntl */
+ Perl_pp_fcntl, /* implemented by Perl_pp_ioctl */
Perl_pp_ioctl,
Perl_pp_flock,
- Perl_pp_send,
- Perl_pp_sysread, /* Perl_pp_recv */
+ Perl_pp_send, /* implemented by Perl_pp_syswrite */
+ Perl_pp_recv, /* implemented by Perl_pp_sysread */
Perl_pp_socket,
Perl_pp_sockpair,
Perl_pp_bind,
- Perl_pp_connect,
+ Perl_pp_connect, /* implemented by Perl_pp_bind */
Perl_pp_listen,
Perl_pp_accept,
Perl_pp_shutdown,
- Perl_pp_ssockopt, /* Perl_pp_gsockopt */
+ Perl_pp_gsockopt, /* implemented by Perl_pp_ssockopt */
Perl_pp_ssockopt,
- Perl_pp_getpeername, /* Perl_pp_getsockname */
+ Perl_pp_getsockname, /* implemented by Perl_pp_getpeername */
Perl_pp_getpeername,
- Perl_pp_stat, /* Perl_pp_lstat */
+ Perl_pp_lstat, /* implemented by Perl_pp_stat */
Perl_pp_stat,
Perl_pp_ftrread,
- Perl_pp_ftrread, /* Perl_pp_ftrwrite */
- Perl_pp_ftrread, /* Perl_pp_ftrexec */
- Perl_pp_ftrread, /* Perl_pp_fteread */
- Perl_pp_ftrread, /* Perl_pp_ftewrite */
- Perl_pp_ftrread, /* Perl_pp_fteexec */
+ Perl_pp_ftrwrite, /* implemented by Perl_pp_ftrread */
+ Perl_pp_ftrexec, /* implemented by Perl_pp_ftrread */
+ Perl_pp_fteread, /* implemented by Perl_pp_ftrread */
+ Perl_pp_ftewrite, /* implemented by Perl_pp_ftrread */
+ Perl_pp_fteexec, /* implemented by Perl_pp_ftrread */
Perl_pp_ftis,
- Perl_pp_ftis, /* Perl_pp_ftsize */
- Perl_pp_ftis, /* Perl_pp_ftmtime */
- Perl_pp_ftis, /* Perl_pp_ftatime */
- Perl_pp_ftis, /* Perl_pp_ftctime */
+ Perl_pp_ftsize, /* implemented by Perl_pp_ftis */
+ Perl_pp_ftmtime, /* implemented by Perl_pp_ftis */
+ Perl_pp_ftatime, /* implemented by Perl_pp_ftis */
+ Perl_pp_ftctime, /* implemented by Perl_pp_ftis */
Perl_pp_ftrowned,
- Perl_pp_ftrowned, /* Perl_pp_fteowned */
- Perl_pp_ftrowned, /* Perl_pp_ftzero */
- Perl_pp_ftrowned, /* Perl_pp_ftsock */
- Perl_pp_ftrowned, /* Perl_pp_ftchr */
- Perl_pp_ftrowned, /* Perl_pp_ftblk */
- Perl_pp_ftrowned, /* Perl_pp_ftfile */
- Perl_pp_ftrowned, /* Perl_pp_ftdir */
- Perl_pp_ftrowned, /* Perl_pp_ftpipe */
- Perl_pp_ftrowned, /* Perl_pp_ftsuid */
- Perl_pp_ftrowned, /* Perl_pp_ftsgid */
- Perl_pp_ftrowned, /* Perl_pp_ftsvtx */
+ Perl_pp_fteowned, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftzero, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftsock, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftchr, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftblk, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftfile, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftdir, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftpipe, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftsuid, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftsgid, /* implemented by Perl_pp_ftrowned */
+ Perl_pp_ftsvtx, /* implemented by Perl_pp_ftrowned */
Perl_pp_ftlink,
Perl_pp_fttty,
Perl_pp_fttext,
- Perl_pp_fttext, /* Perl_pp_ftbinary */
+ Perl_pp_ftbinary, /* implemented by Perl_pp_fttext */
Perl_pp_chdir,
Perl_pp_chown,
Perl_pp_chroot,
- Perl_pp_chown, /* Perl_pp_unlink */
- Perl_pp_chown, /* Perl_pp_chmod */
- Perl_pp_chown, /* Perl_pp_utime */
+ Perl_pp_unlink, /* implemented by Perl_pp_chown */
+ Perl_pp_chmod, /* implemented by Perl_pp_chown */
+ Perl_pp_utime, /* implemented by Perl_pp_chown */
Perl_pp_rename,
Perl_pp_link,
- Perl_pp_link, /* Perl_pp_symlink */
+ Perl_pp_symlink, /* implemented by Perl_pp_link */
Perl_pp_readlink,
Perl_pp_mkdir,
Perl_pp_rmdir,
Perl_pp_waitpid,
Perl_pp_system,
Perl_pp_exec,
- Perl_pp_chown, /* Perl_pp_kill */
+ Perl_pp_kill, /* implemented by Perl_pp_chown */
Perl_pp_getppid,
Perl_pp_getpgrp,
Perl_pp_setpgrp,
Perl_pp_setpriority,
Perl_pp_time,
Perl_pp_tms,
- Perl_pp_gmtime, /* Perl_pp_localtime */
+ Perl_pp_localtime, /* implemented by Perl_pp_gmtime */
Perl_pp_gmtime,
Perl_pp_alarm,
Perl_pp_sleep,
- Perl_pp_semget, /* Perl_pp_shmget */
- Perl_pp_semctl, /* Perl_pp_shmctl */
- Perl_pp_shmwrite, /* Perl_pp_shmread */
+ Perl_pp_shmget, /* implemented by Perl_pp_semget */
+ Perl_pp_shmctl, /* implemented by Perl_pp_semctl */
+ Perl_pp_shmread, /* implemented by Perl_pp_shmwrite */
Perl_pp_shmwrite,
- Perl_pp_semget, /* Perl_pp_msgget */
- Perl_pp_semctl, /* Perl_pp_msgctl */
- Perl_pp_shmwrite, /* Perl_pp_msgsnd */
- Perl_pp_shmwrite, /* Perl_pp_msgrcv */
- Perl_pp_shmwrite, /* Perl_pp_semop */
+ Perl_pp_msgget, /* implemented by Perl_pp_semget */
+ Perl_pp_msgctl, /* implemented by Perl_pp_semctl */
+ Perl_pp_msgsnd, /* implemented by Perl_pp_shmwrite */
+ Perl_pp_msgrcv, /* implemented by Perl_pp_shmwrite */
+ Perl_pp_semop, /* implemented by Perl_pp_shmwrite */
Perl_pp_semget,
Perl_pp_semctl,
Perl_pp_require,
- Perl_pp_require, /* Perl_pp_dofile */
+ Perl_pp_dofile, /* implemented by Perl_pp_require */
Perl_pp_hintseval,
Perl_pp_entereval,
Perl_pp_leaveeval,
Perl_pp_entertry,
Perl_pp_leavetry,
- Perl_pp_ghostent, /* Perl_pp_ghbyname */
- Perl_pp_ghostent, /* Perl_pp_ghbyaddr */
+ Perl_pp_ghbyname, /* implemented by Perl_pp_ghostent */
+ Perl_pp_ghbyaddr, /* implemented by Perl_pp_ghostent */
Perl_pp_ghostent,
- Perl_pp_gnetent, /* Perl_pp_gnbyname */
- Perl_pp_gnetent, /* Perl_pp_gnbyaddr */
+ Perl_pp_gnbyname, /* implemented by Perl_pp_gnetent */
+ Perl_pp_gnbyaddr, /* implemented by Perl_pp_gnetent */
Perl_pp_gnetent,
- Perl_pp_gprotoent, /* Perl_pp_gpbyname */
- Perl_pp_gprotoent, /* Perl_pp_gpbynumber */
+ Perl_pp_gpbyname, /* implemented by Perl_pp_gprotoent */
+ Perl_pp_gpbynumber, /* implemented by Perl_pp_gprotoent */
Perl_pp_gprotoent,
- Perl_pp_gservent, /* Perl_pp_gsbyname */
- Perl_pp_gservent, /* Perl_pp_gsbyport */
+ Perl_pp_gsbyname, /* implemented by Perl_pp_gservent */
+ Perl_pp_gsbyport, /* implemented by Perl_pp_gservent */
Perl_pp_gservent,
Perl_pp_shostent,
- Perl_pp_snetent,
- Perl_pp_sprotoent,
- Perl_pp_sservent,
+ Perl_pp_snetent, /* implemented by Perl_pp_shostent */
+ Perl_pp_sprotoent, /* implemented by Perl_pp_shostent */
+ Perl_pp_sservent, /* implemented by Perl_pp_shostent */
Perl_pp_ehostent,
- Perl_pp_enetent,
- Perl_pp_eprotoent,
- Perl_pp_eservent,
- Perl_pp_gpwent, /* Perl_pp_gpwnam */
- Perl_pp_gpwent, /* Perl_pp_gpwuid */
+ Perl_pp_enetent, /* implemented by Perl_pp_ehostent */
+ Perl_pp_eprotoent, /* implemented by Perl_pp_ehostent */
+ Perl_pp_eservent, /* implemented by Perl_pp_ehostent */
+ Perl_pp_gpwnam, /* implemented by Perl_pp_gpwent */
+ Perl_pp_gpwuid, /* implemented by Perl_pp_gpwent */
Perl_pp_gpwent,
- Perl_pp_spwent,
- Perl_pp_epwent,
- Perl_pp_ggrent, /* Perl_pp_ggrnam */
- Perl_pp_ggrent, /* Perl_pp_ggrgid */
+ Perl_pp_spwent, /* implemented by Perl_pp_ehostent */
+ Perl_pp_epwent, /* implemented by Perl_pp_ehostent */
+ Perl_pp_ggrnam, /* implemented by Perl_pp_ggrent */
+ Perl_pp_ggrgid, /* implemented by Perl_pp_ggrent */
Perl_pp_ggrent,
- Perl_pp_sgrent,
- Perl_pp_egrent,
+ Perl_pp_sgrent, /* implemented by Perl_pp_ehostent */
+ Perl_pp_egrent, /* implemented by Perl_pp_ehostent */
Perl_pp_getlogin,
Perl_pp_syscall,
Perl_pp_lock,
Perl_pp_once,
- Perl_unimplemented_op, /* Perl_pp_custom */
- Perl_pp_rkeys, /* Perl_pp_reach */
+ Perl_pp_custom, /* implemented by Perl_unimplemented_op */
+ Perl_pp_reach, /* implemented by Perl_pp_rkeys */
Perl_pp_rkeys,
- Perl_pp_rkeys, /* Perl_pp_rvalues */
- Perl_pp_trans, /* Perl_pp_transr */
+ Perl_pp_rvalues, /* implemented by Perl_pp_rkeys */
+ Perl_pp_coreargs,
+ Perl_pp_runcv,
+ Perl_pp_fc,
+ Perl_pp_padcv,
+ Perl_pp_introcv,
+ Perl_pp_clonecv,
+ Perl_pp_padrange,
}
#endif
#ifdef PERL_PPADDR_INITED
Perl_ck_match, /* subst */
Perl_ck_null, /* substcont */
Perl_ck_match, /* trans */
+ Perl_ck_match, /* transr */
Perl_ck_sassign, /* sassign */
Perl_ck_null, /* aassign */
Perl_ck_spair, /* chop */
Perl_ck_spair, /* chomp */
Perl_ck_null, /* schomp */
Perl_ck_defined, /* defined */
- Perl_ck_lfun, /* undef */
+ Perl_ck_fun, /* undef */
Perl_ck_fun, /* study */
- Perl_ck_lfun, /* pos */
+ Perl_ck_fun, /* pos */
Perl_ck_lfun, /* preinc */
Perl_ck_lfun, /* i_preinc */
Perl_ck_lfun, /* predec */
Perl_ck_fun, /* stringify */
Perl_ck_bitop, /* left_shift */
Perl_ck_bitop, /* right_shift */
- Perl_ck_null, /* lt */
- Perl_ck_null, /* i_lt */
- Perl_ck_null, /* gt */
- Perl_ck_null, /* i_gt */
- Perl_ck_null, /* le */
- Perl_ck_null, /* i_le */
- Perl_ck_null, /* ge */
- Perl_ck_null, /* i_ge */
+ Perl_ck_cmp, /* lt */
+ Perl_ck_cmp, /* i_lt */
+ Perl_ck_cmp, /* gt */
+ Perl_ck_cmp, /* i_gt */
+ Perl_ck_cmp, /* le */
+ Perl_ck_cmp, /* i_le */
+ Perl_ck_cmp, /* ge */
+ Perl_ck_cmp, /* i_ge */
Perl_ck_null, /* eq */
Perl_ck_null, /* i_eq */
Perl_ck_null, /* ne */
Perl_ck_fun, /* hex */
Perl_ck_fun, /* oct */
Perl_ck_fun, /* abs */
- Perl_ck_fun, /* length */
+ Perl_ck_length, /* length */
Perl_ck_substr, /* substr */
Perl_ck_fun, /* vec */
Perl_ck_index, /* index */
Perl_ck_index, /* rindex */
- Perl_ck_fun, /* sprintf */
+ Perl_ck_lfun, /* sprintf */
Perl_ck_fun, /* formline */
Perl_ck_fun, /* ord */
Perl_ck_fun, /* chr */
Perl_ck_fun, /* quotemeta */
Perl_ck_rvconst, /* rv2av */
Perl_ck_null, /* aelemfast */
+ Perl_ck_null, /* aelemfast_lex */
Perl_ck_null, /* aelem */
Perl_ck_null, /* aslice */
Perl_ck_each, /* aeach */
Perl_ck_rvconst, /* rv2hv */
Perl_ck_null, /* helem */
Perl_ck_null, /* hslice */
- Perl_ck_fun, /* boolkeys */
- Perl_ck_unpack, /* unpack */
+ Perl_ck_fun, /* unpack */
Perl_ck_fun, /* pack */
Perl_ck_split, /* split */
Perl_ck_join, /* join */
Perl_ck_null, /* lslice */
Perl_ck_fun, /* anonlist */
Perl_ck_fun, /* anonhash */
- Perl_ck_push, /* splice */
- Perl_ck_push, /* push */
+ Perl_ck_fun, /* splice */
+ Perl_ck_fun, /* push */
Perl_ck_shift, /* pop */
Perl_ck_shift, /* shift */
- Perl_ck_push, /* unshift */
+ Perl_ck_fun, /* unshift */
Perl_ck_sort, /* sort */
Perl_ck_fun, /* reverse */
Perl_ck_grep, /* grepstart */
Perl_ck_fun, /* sysread */
Perl_ck_fun, /* syswrite */
Perl_ck_eof, /* eof */
- Perl_ck_fun, /* tell */
- Perl_ck_fun, /* seek */
+ Perl_ck_tell, /* tell */
+ Perl_ck_tell, /* seek */
Perl_ck_trunc, /* truncate */
Perl_ck_fun, /* fcntl */
Perl_ck_fun, /* ioctl */
Perl_ck_ftst, /* fttty */
Perl_ck_ftst, /* fttext */
Perl_ck_ftst, /* ftbinary */
- Perl_ck_chdir, /* chdir */
+ Perl_ck_trunc, /* chdir */
Perl_ck_fun, /* chown */
Perl_ck_fun, /* chroot */
Perl_ck_fun, /* unlink */
Perl_ck_each, /* reach */
Perl_ck_each, /* rkeys */
Perl_ck_each, /* rvalues */
- Perl_ck_match, /* transr */
+ Perl_ck_null, /* coreargs */
+ Perl_ck_null, /* runcv */
+ Perl_ck_fun, /* fc */
+ Perl_ck_null, /* padcv */
+ Perl_ck_null, /* introcv */
+ Perl_ck_null, /* clonecv */
+ Perl_ck_null, /* padrange */
}
#endif
#ifdef PERL_CHECK_INITED
0x00001544, /* subst */
0x00000344, /* substcont */
0x00001804, /* trans */
+ 0x00001804, /* transr */
0x00000004, /* sassign */
0x00022208, /* aassign */
0x00002b0d, /* chop */
0x00002b1d, /* chomp */
0x00009b9c, /* schomp */
0x00009b84, /* defined */
- 0x00009b04, /* undef */
+ 0x0000fb04, /* undef */
0x00009b84, /* study */
- 0x00009b8c, /* pos */
+ 0x0000fb8c, /* pos */
0x00001164, /* preinc */
0x00001144, /* i_preinc */
0x00001164, /* predec */
0x0001121e, /* i_divide */
0x0001123e, /* modulo */
0x0001121e, /* i_modulo */
- 0x00012209, /* repeat */
+ 0x0001220b, /* repeat */
0x0001123e, /* add */
0x0001121e, /* i_add */
0x0001123e, /* subtract */
0x00009b8e, /* quotemeta */
0x00000148, /* rv2av */
0x00013604, /* aelemfast */
+ 0x00013040, /* aelemfast_lex */
0x00013204, /* aelem */
0x00023401, /* aslice */
0x00003b00, /* aeach */
0x00000148, /* rv2hv */
0x00014204, /* helem */
0x00024401, /* hslice */
- 0x00004b00, /* boolkeys */
- 0x00091400, /* unpack */
- 0x0002140d, /* pack */
+ 0x00091480, /* unpack */
+ 0x0002140f, /* pack */
0x00111408, /* split */
0x0002140d, /* join */
0x00002401, /* list */
0x01116404, /* ssockopt */
0x00006b04, /* getsockname */
0x00006b04, /* getpeername */
- 0x00006c80, /* lstat */
- 0x00006c80, /* stat */
+ 0x0000ec80, /* lstat */
+ 0x0000ec80, /* stat */
0x00006c84, /* ftrread */
0x00006c84, /* ftrwrite */
0x00006c84, /* ftrexec */
0x00009bc0, /* require */
0x00001140, /* dofile */
0x00000604, /* hintseval */
- 0x00001b40, /* entereval */
+ 0x00009bc0, /* entereval */
0x00001100, /* leaveeval */
- 0x00000b40, /* entertry */
+ 0x00000340, /* entertry */
0x00000400, /* leavetry */
0x00001b00, /* ghbyname */
0x00011400, /* ghbyaddr */
0x00001b00, /* reach */
0x00001b08, /* rkeys */
0x00001b08, /* rvalues */
- 0x00001804, /* transr */
+ 0x00000600, /* coreargs */
+ 0x00000004, /* runcv */
+ 0x00009b8e, /* fc */
+ 0x00000040, /* padcv */
+ 0x00000040, /* introcv */
+ 0x00000040, /* clonecv */
+ 0x00000040, /* padrange */
};
#endif