This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Adjust test count for 5.8.x
[perl5.git] / opcode.h
CommitLineData
37442d52
RGS
1/* -*- buffer-read-only: t -*-
2 *
d6376244
JH
3 * opcode.h
4 *
5b9081af
NC
5 * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
6 * 2001, 2002, 2003, 2004, 2005, 2006, 2007 by Larry Wall and others
d6376244
JH
7 *
8 * You may distribute under the terms of either the GNU General Public
9 * License or the Artistic License, as specified in the README file.
10 *
11 * !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
12 * This file is built by opcode.pl from its data. Any changes made here
13 * will be lost!
14 */
a27f85b3 15
27da23d5
JH
16#ifndef PERL_GLOBAL_STRUCT_INIT
17
864dbfa3
GS
18#define Perl_pp_i_preinc Perl_pp_preinc
19#define Perl_pp_i_predec Perl_pp_predec
20#define Perl_pp_i_postinc Perl_pp_postinc
21#define Perl_pp_i_postdec Perl_pp_postdec
748a9306 22
65bca31a
NC
23PERL_PPDEF(Perl_unimplemented_op)
24
73c4f7a1
GS
25START_EXTERN_C
26
4a36906c
RGS
27#define OP_NAME(o) ((o)->op_type == OP_CUSTOM ? custom_op_name(o) : \
28 PL_op_name[(o)->op_type])
29#define OP_DESC(o) ((o)->op_type == OP_CUSTOM ? custom_op_desc(o) : \
30 PL_op_desc[(o)->op_type])
438c221d 31
79072805 32#ifndef DOINIT
27da23d5 33EXTCONST char* const PL_op_name[];
79072805 34#else
27da23d5 35EXTCONST char* const PL_op_name[] = {
c07a80fd 36 "null",
37 "stub",
38 "scalar",
39 "pushmark",
40 "wantarray",
41 "const",
42 "gvsv",
43 "gv",
44 "gelem",
45 "padsv",
46 "padav",
47 "padhv",
48 "padany",
49 "pushre",
50 "rv2gv",
51 "rv2sv",
52 "av2arylen",
53 "rv2cv",
54 "anoncode",
55 "prototype",
56 "refgen",
57 "srefgen",
58 "ref",
59 "bless",
60 "backtick",
61 "glob",
62 "readline",
63 "rcatline",
64 "regcmaybe",
2cd61cdb 65 "regcreset",
c07a80fd 66 "regcomp",
67 "match",
8782bef2 68 "qr",
c07a80fd 69 "subst",
70 "substcont",
71 "trans",
72 "sassign",
73 "aassign",
74 "chop",
75 "schop",
76 "chomp",
77 "schomp",
78 "defined",
79 "undef",
80 "study",
81 "pos",
82 "preinc",
83 "i_preinc",
84 "predec",
85 "i_predec",
86 "postinc",
87 "i_postinc",
88 "postdec",
89 "i_postdec",
90 "pow",
91 "multiply",
92 "i_multiply",
93 "divide",
94 "i_divide",
95 "modulo",
96 "i_modulo",
97 "repeat",
98 "add",
99 "i_add",
100 "subtract",
101 "i_subtract",
102 "concat",
103 "stringify",
104 "left_shift",
105 "right_shift",
106 "lt",
107 "i_lt",
108 "gt",
109 "i_gt",
110 "le",
111 "i_le",
112 "ge",
113 "i_ge",
114 "eq",
115 "i_eq",
116 "ne",
117 "i_ne",
118 "ncmp",
119 "i_ncmp",
120 "slt",
121 "sgt",
122 "sle",
123 "sge",
124 "seq",
125 "sne",
126 "scmp",
127 "bit_and",
128 "bit_xor",
129 "bit_or",
130 "negate",
131 "i_negate",
132 "not",
133 "complement",
134 "atan2",
135 "sin",
136 "cos",
137 "rand",
138 "srand",
139 "exp",
140 "log",
141 "sqrt",
142 "int",
143 "hex",
144 "oct",
145 "abs",
146 "length",
147 "substr",
148 "vec",
149 "index",
150 "rindex",
151 "sprintf",
152 "formline",
153 "ord",
154 "chr",
155 "crypt",
156 "ucfirst",
157 "lcfirst",
158 "uc",
159 "lc",
160 "quotemeta",
161 "rv2av",
162 "aelemfast",
163 "aelem",
164 "aslice",
165 "each",
166 "values",
167 "keys",
168 "delete",
169 "exists",
170 "rv2hv",
171 "helem",
172 "hslice",
173 "unpack",
174 "pack",
175 "split",
176 "join",
177 "list",
178 "lslice",
179 "anonlist",
180 "anonhash",
181 "splice",
182 "push",
183 "pop",
184 "shift",
185 "unshift",
186 "sort",
187 "reverse",
188 "grepstart",
189 "grepwhile",
190 "mapstart",
191 "mapwhile",
192 "range",
193 "flip",
194 "flop",
195 "and",
196 "or",
197 "xor",
198 "cond_expr",
199 "andassign",
200 "orassign",
201 "method",
202 "entersub",
203 "leavesub",
cd06dffe 204 "leavesublv",
c07a80fd 205 "caller",
206 "warn",
207 "die",
208 "reset",
209 "lineseq",
210 "nextstate",
211 "dbstate",
212 "unstack",
213 "enter",
214 "leave",
215 "scope",
216 "enteriter",
217 "iter",
218 "enterloop",
219 "leaveloop",
220 "return",
221 "last",
222 "next",
223 "redo",
224 "dump",
225 "goto",
226 "exit",
227 "open",
228 "close",
229 "pipe_op",
230 "fileno",
231 "umask",
232 "binmode",
233 "tie",
234 "untie",
235 "tied",
236 "dbmopen",
237 "dbmclose",
238 "sselect",
239 "select",
240 "getc",
241 "read",
242 "enterwrite",
243 "leavewrite",
244 "prtf",
245 "print",
246 "sysopen",
137443ea 247 "sysseek",
c07a80fd 248 "sysread",
249 "syswrite",
250 "send",
251 "recv",
252 "eof",
253 "tell",
254 "seek",
255 "truncate",
256 "fcntl",
257 "ioctl",
258 "flock",
259 "socket",
260 "sockpair",
261 "bind",
262 "connect",
263 "listen",
264 "accept",
265 "shutdown",
266 "gsockopt",
267 "ssockopt",
268 "getsockname",
269 "getpeername",
270 "lstat",
271 "stat",
272 "ftrread",
273 "ftrwrite",
274 "ftrexec",
275 "fteread",
276 "ftewrite",
277 "fteexec",
278 "ftis",
c07a80fd 279 "ftsize",
280 "ftmtime",
281 "ftatime",
282 "ftctime",
7834bb7e
NC
283 "ftrowned",
284 "fteowned",
285 "ftzero",
c07a80fd 286 "ftsock",
287 "ftchr",
288 "ftblk",
289 "ftfile",
290 "ftdir",
291 "ftpipe",
c07a80fd 292 "ftsuid",
293 "ftsgid",
294 "ftsvtx",
7834bb7e 295 "ftlink",
c07a80fd 296 "fttty",
297 "fttext",
298 "ftbinary",
299 "chdir",
300 "chown",
301 "chroot",
302 "unlink",
303 "chmod",
304 "utime",
305 "rename",
306 "link",
307 "symlink",
308 "readlink",
309 "mkdir",
310 "rmdir",
311 "open_dir",
312 "readdir",
313 "telldir",
314 "seekdir",
315 "rewinddir",
316 "closedir",
317 "fork",
318 "wait",
319 "waitpid",
320 "system",
321 "exec",
322 "kill",
323 "getppid",
324 "getpgrp",
325 "setpgrp",
326 "getpriority",
327 "setpriority",
328 "time",
329 "tms",
330 "localtime",
331 "gmtime",
332 "alarm",
333 "sleep",
334 "shmget",
335 "shmctl",
336 "shmread",
337 "shmwrite",
338 "msgget",
339 "msgctl",
340 "msgsnd",
341 "msgrcv",
7834bb7e 342 "semop",
c07a80fd 343 "semget",
344 "semctl",
c07a80fd 345 "require",
346 "dofile",
347 "entereval",
348 "leaveeval",
349 "entertry",
350 "leavetry",
351 "ghbyname",
352 "ghbyaddr",
353 "ghostent",
354 "gnbyname",
355 "gnbyaddr",
356 "gnetent",
357 "gpbyname",
358 "gpbynumber",
359 "gprotoent",
360 "gsbyname",
361 "gsbyport",
362 "gservent",
363 "shostent",
364 "snetent",
365 "sprotoent",
366 "sservent",
367 "ehostent",
368 "enetent",
369 "eprotoent",
370 "eservent",
371 "gpwnam",
372 "gpwuid",
373 "gpwent",
374 "spwent",
375 "epwent",
376 "ggrnam",
377 "ggrgid",
378 "ggrent",
379 "sgrent",
380 "egrent",
381 "getlogin",
382 "syscall",
c0329465 383 "lock",
7399586d 384 "setstate",
f5d5a27c 385 "method_named",
c963b151
BD
386 "dor",
387 "dorassign",
0d863452
RH
388 "entergiven",
389 "leavegiven",
390 "enterwhen",
391 "leavewhen",
392 "break",
393 "continue",
394 "smartmatch",
395 "say",
438c221d 396 "custom",
c07a80fd 397};
398#endif
399
400#ifndef DOINIT
27da23d5 401EXTCONST char* const PL_op_desc[];
c07a80fd 402#else
27da23d5 403EXTCONST char* const PL_op_desc[] = {
79072805 404 "null operation",
93a17b20
LW
405 "stub",
406 "scalar",
79072805
LW
407 "pushmark",
408 "wantarray",
79072805 409 "constant item",
79072805
LW
410 "scalar variable",
411 "glob value",
c07a80fd 412 "glob elem",
93a17b20
LW
413 "private variable",
414 "private array",
415 "private hash",
f1612b5c 416 "private value",
79072805
LW
417 "push regexp",
418 "ref-to-glob cast",
b89fed5f 419 "scalar dereference",
79072805 420 "array length",
b89fed5f 421 "subroutine dereference",
a0d0e21e 422 "anonymous subroutine",
c07a80fd 423 "subroutine prototype",
8990e307 424 "reference constructor",
dfa0f641 425 "single ref constructor",
79072805
LW
426 "reference-type operator",
427 "bless",
b3f4d674 428 "quoted execution (``, qx)",
79072805
LW
429 "glob",
430 "<HANDLE>",
431 "append I/O operator",
f1612b5c
GS
432 "regexp internal guard",
433 "regexp internal reset",
79072805 434 "regexp compilation",
42d38218
MS
435 "pattern match (m//)",
436 "pattern quote (qr//)",
437 "substitution (s///)",
f1612b5c
GS
438 "substitution iterator",
439 "transliteration (tr///)",
79072805
LW
440 "scalar assignment",
441 "list assignment",
79072805 442 "chop",
a0d0e21e 443 "scalar chop",
f1612b5c
GS
444 "chomp",
445 "scalar chomp",
79072805
LW
446 "defined operator",
447 "undef operator",
448 "study",
a0d0e21e 449 "match position",
42d38218
MS
450 "preincrement (++)",
451 "integer preincrement (++)",
452 "predecrement (--)",
453 "integer predecrement (--)",
454 "postincrement (++)",
455 "integer postincrement (++)",
456 "postdecrement (--)",
457 "integer postdecrement (--)",
458 "exponentiation (**)",
459 "multiplication (*)",
460 "integer multiplication (*)",
461 "division (/)",
462 "integer division (/)",
463 "modulus (%)",
464 "integer modulus (%)",
465 "repeat (x)",
466 "addition (+)",
467 "integer addition (+)",
468 "subtraction (-)",
469 "integer subtraction (-)",
297b36dc 470 "concatenation (.) or string",
a0d0e21e 471 "string",
42d38218
MS
472 "left bitshift (<<)",
473 "right bitshift (>>)",
474 "numeric lt (<)",
475 "integer lt (<)",
476 "numeric gt (>)",
477 "integer gt (>)",
478 "numeric le (<=)",
479 "integer le (<=)",
480 "numeric ge (>=)",
481 "integer ge (>=)",
482 "numeric eq (==)",
483 "integer eq (==)",
484 "numeric ne (!=)",
485 "integer ne (!=)",
486 "numeric comparison (<=>)",
487 "integer comparison (<=>)",
79072805
LW
488 "string lt",
489 "string gt",
490 "string le",
491 "string ge",
492 "string eq",
493 "string ne",
42d38218
MS
494 "string comparison (cmp)",
495 "bitwise and (&)",
496 "bitwise xor (^)",
497 "bitwise or (|)",
f1612b5c
GS
498 "negation (-)",
499 "integer negation (-)",
79072805 500 "not",
42d38218 501 "1's complement (~)",
79072805
LW
502 "atan2",
503 "sin",
504 "cos",
505 "rand",
506 "srand",
507 "exp",
508 "log",
509 "sqrt",
510 "int",
511 "hex",
512 "oct",
463ee0b2 513 "abs",
79072805
LW
514 "length",
515 "substr",
516 "vec",
517 "index",
518 "rindex",
519 "sprintf",
520 "formline",
521 "ord",
463ee0b2 522 "chr",
79072805 523 "crypt",
42d38218
MS
524 "ucfirst",
525 "lcfirst",
526 "uc",
527 "lc",
528 "quotemeta",
f1612b5c
GS
529 "array dereference",
530 "constant array element",
79072805
LW
531 "array element",
532 "array slice",
533 "each",
534 "values",
535 "keys",
536 "delete",
42d38218 537 "exists",
f1612b5c
GS
538 "hash dereference",
539 "hash element",
aa689395 540 "hash slice",
79072805
LW
541 "unpack",
542 "pack",
543 "split",
297b36dc 544 "join or string",
79072805
LW
545 "list",
546 "list slice",
42d38218
MS
547 "anonymous list ([])",
548 "anonymous hash ({})",
79072805
LW
549 "splice",
550 "push",
551 "pop",
552 "shift",
553 "unshift",
554 "sort",
555 "reverse",
556 "grep",
557 "grep iterator",
a0d0e21e
LW
558 "map",
559 "map iterator",
79072805
LW
560 "flipflop",
561 "range (or flip)",
562 "range (or flop)",
42d38218
MS
563 "logical and (&&)",
564 "logical or (||)",
a0d0e21e 565 "logical xor",
f1612b5c 566 "conditional expression",
42d38218
MS
567 "logical and assignment (&&=)",
568 "logical or assignment (||=)",
79072805
LW
569 "method lookup",
570 "subroutine entry",
571 "subroutine exit",
78f9721b 572 "lvalue subroutine return",
79072805
LW
573 "caller",
574 "warn",
575 "die",
f1612b5c 576 "symbol reset",
79072805
LW
577 "line sequence",
578 "next statement",
93a17b20 579 "debug next statement",
e9c54c90 580 "iteration finalizer",
79072805
LW
581 "block entry",
582 "block exit",
463ee0b2 583 "block",
79072805
LW
584 "foreach loop entry",
585 "foreach loop iterator",
586 "loop entry",
587 "loop exit",
588 "return",
589 "last",
590 "next",
591 "redo",
592 "dump",
593 "goto",
594 "exit",
79072805
LW
595 "open",
596 "close",
597 "pipe",
598 "fileno",
599 "umask",
600 "binmode",
463ee0b2
LW
601 "tie",
602 "untie",
c07a80fd 603 "tied",
79072805
LW
604 "dbmopen",
605 "dbmclose",
606 "select system call",
607 "select",
608 "getc",
609 "read",
610 "write",
611 "write exit",
463ee0b2 612 "printf",
79072805 613 "print",
c07a80fd 614 "sysopen",
137443ea 615 "sysseek",
79072805
LW
616 "sysread",
617 "syswrite",
618 "send",
619 "recv",
620 "eof",
621 "tell",
622 "seek",
623 "truncate",
624 "fcntl",
625 "ioctl",
626 "flock",
627 "socket",
628 "socketpair",
629 "bind",
630 "connect",
631 "listen",
632 "accept",
633 "shutdown",
634 "getsockopt",
635 "setsockopt",
636 "getsockname",
637 "getpeername",
638 "lstat",
639 "stat",
640 "-R",
641 "-W",
642 "-X",
643 "-r",
644 "-w",
645 "-x",
646 "-e",
79072805
LW
647 "-s",
648 "-M",
649 "-A",
650 "-C",
7834bb7e
NC
651 "-O",
652 "-o",
653 "-z",
79072805
LW
654 "-S",
655 "-c",
656 "-b",
657 "-f",
658 "-d",
659 "-p",
79072805
LW
660 "-u",
661 "-g",
662 "-k",
7834bb7e 663 "-l",
79072805
LW
664 "-t",
665 "-T",
666 "-B",
667 "chdir",
668 "chown",
669 "chroot",
670 "unlink",
671 "chmod",
672 "utime",
673 "rename",
674 "link",
675 "symlink",
676 "readlink",
677 "mkdir",
678 "rmdir",
679 "opendir",
680 "readdir",
681 "telldir",
682 "seekdir",
683 "rewinddir",
684 "closedir",
685 "fork",
686 "wait",
687 "waitpid",
688 "system",
689 "exec",
690 "kill",
691 "getppid",
692 "getpgrp",
693 "setpgrp",
694 "getpriority",
695 "setpriority",
696 "time",
697 "times",
698 "localtime",
699 "gmtime",
700 "alarm",
701 "sleep",
702 "shmget",
703 "shmctl",
704 "shmread",
705 "shmwrite",
706 "msgget",
707 "msgctl",
708 "msgsnd",
709 "msgrcv",
7834bb7e 710 "semop",
79072805
LW
711 "semget",
712 "semctl",
79072805 713 "require",
b3f4d674
GS
714 "do \"file\"",
715 "eval \"string\"",
716 "eval \"string\" exit",
42d38218 717 "eval {block}",
f1612b5c 718 "eval {block} exit",
79072805
LW
719 "gethostbyname",
720 "gethostbyaddr",
721 "gethostent",
722 "getnetbyname",
723 "getnetbyaddr",
724 "getnetent",
725 "getprotobyname",
726 "getprotobynumber",
727 "getprotoent",
728 "getservbyname",
729 "getservbyport",
730 "getservent",
731 "sethostent",
732 "setnetent",
733 "setprotoent",
734 "setservent",
735 "endhostent",
736 "endnetent",
737 "endprotoent",
738 "endservent",
739 "getpwnam",
740 "getpwuid",
741 "getpwent",
742 "setpwent",
743 "endpwent",
744 "getgrnam",
745 "getgrgid",
746 "getgrent",
747 "setgrent",
748 "endgrent",
749 "getlogin",
750 "syscall",
c0329465 751 "lock",
7399586d 752 "set statement info",
f5d5a27c 753 "method with known name",
c963b151
BD
754 "defined or (//)",
755 "defined or assignment (//=)",
0d863452
RH
756 "given()",
757 "leave given block",
758 "when()",
759 "leave when block",
760 "break",
761 "continue",
762 "smart match",
763 "say",
438c221d 764 "unknown custom operator",
79072805
LW
765};
766#endif
767
73c4f7a1
GS
768END_EXTERN_C
769
27da23d5
JH
770#endif /* !PERL_GLOBAL_STRUCT_INIT */
771
73c4f7a1
GS
772START_EXTERN_C
773
27da23d5 774#ifdef PERL_GLOBAL_STRUCT_INIT
97aff369 775# define PERL_PPADDR_INITED
27da23d5 776static const Perl_ppaddr_t Gppaddr[]
79072805 777#else
27da23d5 778# ifndef PERL_GLOBAL_STRUCT
97aff369 779# define PERL_PPADDR_INITED
27da23d5
JH
780EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
781# endif
782#endif /* PERL_GLOBAL_STRUCT */
783#if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
97aff369 784# define PERL_PPADDR_INITED
27da23d5 785= {
2b260de0
GS
786 MEMBER_TO_FPTR(Perl_pp_null),
787 MEMBER_TO_FPTR(Perl_pp_stub),
0b612f93 788 MEMBER_TO_FPTR(Perl_pp_null), /* Perl_pp_scalar */
2b260de0
GS
789 MEMBER_TO_FPTR(Perl_pp_pushmark),
790 MEMBER_TO_FPTR(Perl_pp_wantarray),
791 MEMBER_TO_FPTR(Perl_pp_const),
792 MEMBER_TO_FPTR(Perl_pp_gvsv),
793 MEMBER_TO_FPTR(Perl_pp_gv),
794 MEMBER_TO_FPTR(Perl_pp_gelem),
795 MEMBER_TO_FPTR(Perl_pp_padsv),
796 MEMBER_TO_FPTR(Perl_pp_padav),
797 MEMBER_TO_FPTR(Perl_pp_padhv),
65bca31a 798 MEMBER_TO_FPTR(Perl_unimplemented_op), /* Perl_pp_padany */
2b260de0
GS
799 MEMBER_TO_FPTR(Perl_pp_pushre),
800 MEMBER_TO_FPTR(Perl_pp_rv2gv),
801 MEMBER_TO_FPTR(Perl_pp_rv2sv),
802 MEMBER_TO_FPTR(Perl_pp_av2arylen),
803 MEMBER_TO_FPTR(Perl_pp_rv2cv),
804 MEMBER_TO_FPTR(Perl_pp_anoncode),
805 MEMBER_TO_FPTR(Perl_pp_prototype),
806 MEMBER_TO_FPTR(Perl_pp_refgen),
807 MEMBER_TO_FPTR(Perl_pp_srefgen),
808 MEMBER_TO_FPTR(Perl_pp_ref),
809 MEMBER_TO_FPTR(Perl_pp_bless),
810 MEMBER_TO_FPTR(Perl_pp_backtick),
811 MEMBER_TO_FPTR(Perl_pp_glob),
812 MEMBER_TO_FPTR(Perl_pp_readline),
813 MEMBER_TO_FPTR(Perl_pp_rcatline),
0b612f93 814 MEMBER_TO_FPTR(Perl_pp_null), /* Perl_pp_regcmaybe */
2b260de0
GS
815 MEMBER_TO_FPTR(Perl_pp_regcreset),
816 MEMBER_TO_FPTR(Perl_pp_regcomp),
817 MEMBER_TO_FPTR(Perl_pp_match),
818 MEMBER_TO_FPTR(Perl_pp_qr),
819 MEMBER_TO_FPTR(Perl_pp_subst),
820 MEMBER_TO_FPTR(Perl_pp_substcont),
821 MEMBER_TO_FPTR(Perl_pp_trans),
822 MEMBER_TO_FPTR(Perl_pp_sassign),
823 MEMBER_TO_FPTR(Perl_pp_aassign),
824 MEMBER_TO_FPTR(Perl_pp_chop),
825 MEMBER_TO_FPTR(Perl_pp_schop),
826 MEMBER_TO_FPTR(Perl_pp_chomp),
827 MEMBER_TO_FPTR(Perl_pp_schomp),
828 MEMBER_TO_FPTR(Perl_pp_defined),
829 MEMBER_TO_FPTR(Perl_pp_undef),
830 MEMBER_TO_FPTR(Perl_pp_study),
831 MEMBER_TO_FPTR(Perl_pp_pos),
832 MEMBER_TO_FPTR(Perl_pp_preinc),
833 MEMBER_TO_FPTR(Perl_pp_i_preinc),
834 MEMBER_TO_FPTR(Perl_pp_predec),
835 MEMBER_TO_FPTR(Perl_pp_i_predec),
836 MEMBER_TO_FPTR(Perl_pp_postinc),
837 MEMBER_TO_FPTR(Perl_pp_i_postinc),
838 MEMBER_TO_FPTR(Perl_pp_postdec),
839 MEMBER_TO_FPTR(Perl_pp_i_postdec),
840 MEMBER_TO_FPTR(Perl_pp_pow),
841 MEMBER_TO_FPTR(Perl_pp_multiply),
842 MEMBER_TO_FPTR(Perl_pp_i_multiply),
843 MEMBER_TO_FPTR(Perl_pp_divide),
844 MEMBER_TO_FPTR(Perl_pp_i_divide),
845 MEMBER_TO_FPTR(Perl_pp_modulo),
846 MEMBER_TO_FPTR(Perl_pp_i_modulo),
847 MEMBER_TO_FPTR(Perl_pp_repeat),
848 MEMBER_TO_FPTR(Perl_pp_add),
849 MEMBER_TO_FPTR(Perl_pp_i_add),
850 MEMBER_TO_FPTR(Perl_pp_subtract),
851 MEMBER_TO_FPTR(Perl_pp_i_subtract),
852 MEMBER_TO_FPTR(Perl_pp_concat),
853 MEMBER_TO_FPTR(Perl_pp_stringify),
854 MEMBER_TO_FPTR(Perl_pp_left_shift),
855 MEMBER_TO_FPTR(Perl_pp_right_shift),
856 MEMBER_TO_FPTR(Perl_pp_lt),
857 MEMBER_TO_FPTR(Perl_pp_i_lt),
858 MEMBER_TO_FPTR(Perl_pp_gt),
859 MEMBER_TO_FPTR(Perl_pp_i_gt),
860 MEMBER_TO_FPTR(Perl_pp_le),
861 MEMBER_TO_FPTR(Perl_pp_i_le),
862 MEMBER_TO_FPTR(Perl_pp_ge),
863 MEMBER_TO_FPTR(Perl_pp_i_ge),
864 MEMBER_TO_FPTR(Perl_pp_eq),
865 MEMBER_TO_FPTR(Perl_pp_i_eq),
866 MEMBER_TO_FPTR(Perl_pp_ne),
867 MEMBER_TO_FPTR(Perl_pp_i_ne),
868 MEMBER_TO_FPTR(Perl_pp_ncmp),
869 MEMBER_TO_FPTR(Perl_pp_i_ncmp),
afd9910b
NC
870 MEMBER_TO_FPTR(Perl_pp_sle), /* Perl_pp_slt */
871 MEMBER_TO_FPTR(Perl_pp_sle), /* Perl_pp_sgt */
2b260de0 872 MEMBER_TO_FPTR(Perl_pp_sle),
afd9910b 873 MEMBER_TO_FPTR(Perl_pp_sle), /* Perl_pp_sge */
2b260de0
GS
874 MEMBER_TO_FPTR(Perl_pp_seq),
875 MEMBER_TO_FPTR(Perl_pp_sne),
876 MEMBER_TO_FPTR(Perl_pp_scmp),
877 MEMBER_TO_FPTR(Perl_pp_bit_and),
3658c1f1 878 MEMBER_TO_FPTR(Perl_pp_bit_or), /* Perl_pp_bit_xor */
2b260de0
GS
879 MEMBER_TO_FPTR(Perl_pp_bit_or),
880 MEMBER_TO_FPTR(Perl_pp_negate),
881 MEMBER_TO_FPTR(Perl_pp_i_negate),
882 MEMBER_TO_FPTR(Perl_pp_not),
883 MEMBER_TO_FPTR(Perl_pp_complement),
884 MEMBER_TO_FPTR(Perl_pp_atan2),
885 MEMBER_TO_FPTR(Perl_pp_sin),
71302fe3 886 MEMBER_TO_FPTR(Perl_pp_sin), /* Perl_pp_cos */
2b260de0
GS
887 MEMBER_TO_FPTR(Perl_pp_rand),
888 MEMBER_TO_FPTR(Perl_pp_srand),
71302fe3
NC
889 MEMBER_TO_FPTR(Perl_pp_sin), /* Perl_pp_exp */
890 MEMBER_TO_FPTR(Perl_pp_sin), /* Perl_pp_log */
891 MEMBER_TO_FPTR(Perl_pp_sin), /* Perl_pp_sqrt */
2b260de0 892 MEMBER_TO_FPTR(Perl_pp_int),
daa2adfd 893 MEMBER_TO_FPTR(Perl_pp_oct), /* Perl_pp_hex */
2b260de0
GS
894 MEMBER_TO_FPTR(Perl_pp_oct),
895 MEMBER_TO_FPTR(Perl_pp_abs),
896 MEMBER_TO_FPTR(Perl_pp_length),
897 MEMBER_TO_FPTR(Perl_pp_substr),
898 MEMBER_TO_FPTR(Perl_pp_vec),
899 MEMBER_TO_FPTR(Perl_pp_index),
2723d216 900 MEMBER_TO_FPTR(Perl_pp_index), /* Perl_pp_rindex */
2b260de0
GS
901 MEMBER_TO_FPTR(Perl_pp_sprintf),
902 MEMBER_TO_FPTR(Perl_pp_formline),
903 MEMBER_TO_FPTR(Perl_pp_ord),
904 MEMBER_TO_FPTR(Perl_pp_chr),
905 MEMBER_TO_FPTR(Perl_pp_crypt),
906 MEMBER_TO_FPTR(Perl_pp_ucfirst),
12e9c124 907 MEMBER_TO_FPTR(Perl_pp_ucfirst), /* Perl_pp_lcfirst */
2b260de0
GS
908 MEMBER_TO_FPTR(Perl_pp_uc),
909 MEMBER_TO_FPTR(Perl_pp_lc),
910 MEMBER_TO_FPTR(Perl_pp_quotemeta),
911 MEMBER_TO_FPTR(Perl_pp_rv2av),
912 MEMBER_TO_FPTR(Perl_pp_aelemfast),
913 MEMBER_TO_FPTR(Perl_pp_aelem),
914 MEMBER_TO_FPTR(Perl_pp_aslice),
915 MEMBER_TO_FPTR(Perl_pp_each),
6faeeb49
MB
916 MEMBER_TO_FPTR(Perl_do_kv), /* Perl_pp_values */
917 MEMBER_TO_FPTR(Perl_do_kv), /* Perl_pp_keys */
2b260de0
GS
918 MEMBER_TO_FPTR(Perl_pp_delete),
919 MEMBER_TO_FPTR(Perl_pp_exists),
17ab7946 920 MEMBER_TO_FPTR(Perl_pp_rv2av), /* Perl_pp_rv2hv */
2b260de0
GS
921 MEMBER_TO_FPTR(Perl_pp_helem),
922 MEMBER_TO_FPTR(Perl_pp_hslice),
923 MEMBER_TO_FPTR(Perl_pp_unpack),
924 MEMBER_TO_FPTR(Perl_pp_pack),
925 MEMBER_TO_FPTR(Perl_pp_split),
926 MEMBER_TO_FPTR(Perl_pp_join),
927 MEMBER_TO_FPTR(Perl_pp_list),
928 MEMBER_TO_FPTR(Perl_pp_lslice),
929 MEMBER_TO_FPTR(Perl_pp_anonlist),
930 MEMBER_TO_FPTR(Perl_pp_anonhash),
931 MEMBER_TO_FPTR(Perl_pp_splice),
932 MEMBER_TO_FPTR(Perl_pp_push),
789b4bc9 933 MEMBER_TO_FPTR(Perl_pp_shift), /* Perl_pp_pop */
2b260de0
GS
934 MEMBER_TO_FPTR(Perl_pp_shift),
935 MEMBER_TO_FPTR(Perl_pp_unshift),
936 MEMBER_TO_FPTR(Perl_pp_sort),
937 MEMBER_TO_FPTR(Perl_pp_reverse),
938 MEMBER_TO_FPTR(Perl_pp_grepstart),
939 MEMBER_TO_FPTR(Perl_pp_grepwhile),
65bca31a 940 MEMBER_TO_FPTR(Perl_unimplemented_op), /* Perl_pp_mapstart */
2b260de0
GS
941 MEMBER_TO_FPTR(Perl_pp_mapwhile),
942 MEMBER_TO_FPTR(Perl_pp_range),
943 MEMBER_TO_FPTR(Perl_pp_flip),
944 MEMBER_TO_FPTR(Perl_pp_flop),
62726f23
SP
945 MEMBER_TO_FPTR(Perl_pp_and),
946 MEMBER_TO_FPTR(Perl_pp_or),
2b260de0
GS
947 MEMBER_TO_FPTR(Perl_pp_xor),
948 MEMBER_TO_FPTR(Perl_pp_cond_expr),
62726f23
SP
949 MEMBER_TO_FPTR(Perl_pp_and), /* Perl_pp_andassign */
950 MEMBER_TO_FPTR(Perl_pp_or), /* Perl_pp_orassign */
2b260de0
GS
951 MEMBER_TO_FPTR(Perl_pp_method),
952 MEMBER_TO_FPTR(Perl_pp_entersub),
953 MEMBER_TO_FPTR(Perl_pp_leavesub),
954 MEMBER_TO_FPTR(Perl_pp_leavesublv),
955 MEMBER_TO_FPTR(Perl_pp_caller),
956 MEMBER_TO_FPTR(Perl_pp_warn),
957 MEMBER_TO_FPTR(Perl_pp_die),
958 MEMBER_TO_FPTR(Perl_pp_reset),
0b612f93 959 MEMBER_TO_FPTR(Perl_pp_null), /* Perl_pp_lineseq */
2b260de0
GS
960 MEMBER_TO_FPTR(Perl_pp_nextstate),
961 MEMBER_TO_FPTR(Perl_pp_dbstate),
962 MEMBER_TO_FPTR(Perl_pp_unstack),
963 MEMBER_TO_FPTR(Perl_pp_enter),
964 MEMBER_TO_FPTR(Perl_pp_leave),
0b612f93 965 MEMBER_TO_FPTR(Perl_pp_null), /* Perl_pp_scope */
2b260de0
GS
966 MEMBER_TO_FPTR(Perl_pp_enteriter),
967 MEMBER_TO_FPTR(Perl_pp_iter),
968 MEMBER_TO_FPTR(Perl_pp_enterloop),
969 MEMBER_TO_FPTR(Perl_pp_leaveloop),
970 MEMBER_TO_FPTR(Perl_pp_return),
971 MEMBER_TO_FPTR(Perl_pp_last),
972 MEMBER_TO_FPTR(Perl_pp_next),
973 MEMBER_TO_FPTR(Perl_pp_redo),
0b612f93 974 MEMBER_TO_FPTR(Perl_pp_goto), /* Perl_pp_dump */
2b260de0
GS
975 MEMBER_TO_FPTR(Perl_pp_goto),
976 MEMBER_TO_FPTR(Perl_pp_exit),
977 MEMBER_TO_FPTR(Perl_pp_open),
978 MEMBER_TO_FPTR(Perl_pp_close),
979 MEMBER_TO_FPTR(Perl_pp_pipe_op),
980 MEMBER_TO_FPTR(Perl_pp_fileno),
981 MEMBER_TO_FPTR(Perl_pp_umask),
982 MEMBER_TO_FPTR(Perl_pp_binmode),
983 MEMBER_TO_FPTR(Perl_pp_tie),
984 MEMBER_TO_FPTR(Perl_pp_untie),
985 MEMBER_TO_FPTR(Perl_pp_tied),
986 MEMBER_TO_FPTR(Perl_pp_dbmopen),
0b612f93 987 MEMBER_TO_FPTR(Perl_pp_untie), /* Perl_pp_dbmclose */
2b260de0
GS
988 MEMBER_TO_FPTR(Perl_pp_sselect),
989 MEMBER_TO_FPTR(Perl_pp_select),
990 MEMBER_TO_FPTR(Perl_pp_getc),
0b612f93 991 MEMBER_TO_FPTR(Perl_pp_sysread), /* Perl_pp_read */
2b260de0
GS
992 MEMBER_TO_FPTR(Perl_pp_enterwrite),
993 MEMBER_TO_FPTR(Perl_pp_leavewrite),
994 MEMBER_TO_FPTR(Perl_pp_prtf),
995 MEMBER_TO_FPTR(Perl_pp_print),
996 MEMBER_TO_FPTR(Perl_pp_sysopen),
997 MEMBER_TO_FPTR(Perl_pp_sysseek),
998 MEMBER_TO_FPTR(Perl_pp_sysread),
64a1bc8e 999 MEMBER_TO_FPTR(Perl_pp_send), /* Perl_pp_syswrite */
2b260de0 1000 MEMBER_TO_FPTR(Perl_pp_send),
0b612f93 1001 MEMBER_TO_FPTR(Perl_pp_sysread), /* Perl_pp_recv */
2b260de0
GS
1002 MEMBER_TO_FPTR(Perl_pp_eof),
1003 MEMBER_TO_FPTR(Perl_pp_tell),
0b612f93 1004 MEMBER_TO_FPTR(Perl_pp_sysseek), /* Perl_pp_seek */
2b260de0 1005 MEMBER_TO_FPTR(Perl_pp_truncate),
0b612f93 1006 MEMBER_TO_FPTR(Perl_pp_ioctl), /* Perl_pp_fcntl */
2b260de0
GS
1007 MEMBER_TO_FPTR(Perl_pp_ioctl),
1008 MEMBER_TO_FPTR(Perl_pp_flock),
1009 MEMBER_TO_FPTR(Perl_pp_socket),
1010 MEMBER_TO_FPTR(Perl_pp_sockpair),
1011 MEMBER_TO_FPTR(Perl_pp_bind),
1012 MEMBER_TO_FPTR(Perl_pp_connect),
1013 MEMBER_TO_FPTR(Perl_pp_listen),
1014 MEMBER_TO_FPTR(Perl_pp_accept),
1015 MEMBER_TO_FPTR(Perl_pp_shutdown),
0b612f93 1016 MEMBER_TO_FPTR(Perl_pp_ssockopt), /* Perl_pp_gsockopt */
2b260de0 1017 MEMBER_TO_FPTR(Perl_pp_ssockopt),
0b612f93 1018 MEMBER_TO_FPTR(Perl_pp_getpeername), /* Perl_pp_getsockname */
2b260de0 1019 MEMBER_TO_FPTR(Perl_pp_getpeername),
0b612f93 1020 MEMBER_TO_FPTR(Perl_pp_stat), /* Perl_pp_lstat */
2b260de0
GS
1021 MEMBER_TO_FPTR(Perl_pp_stat),
1022 MEMBER_TO_FPTR(Perl_pp_ftrread),
af9e49b4
NC
1023 MEMBER_TO_FPTR(Perl_pp_ftrread), /* Perl_pp_ftrwrite */
1024 MEMBER_TO_FPTR(Perl_pp_ftrread), /* Perl_pp_ftrexec */
1025 MEMBER_TO_FPTR(Perl_pp_ftrread), /* Perl_pp_fteread */
1026 MEMBER_TO_FPTR(Perl_pp_ftrread), /* Perl_pp_ftewrite */
1027 MEMBER_TO_FPTR(Perl_pp_ftrread), /* Perl_pp_fteexec */
2b260de0 1028 MEMBER_TO_FPTR(Perl_pp_ftis),
957b0e1d
NC
1029 MEMBER_TO_FPTR(Perl_pp_ftis), /* Perl_pp_ftsize */
1030 MEMBER_TO_FPTR(Perl_pp_ftis), /* Perl_pp_ftmtime */
1031 MEMBER_TO_FPTR(Perl_pp_ftis), /* Perl_pp_ftatime */
1032 MEMBER_TO_FPTR(Perl_pp_ftis), /* Perl_pp_ftctime */
7834bb7e
NC
1033 MEMBER_TO_FPTR(Perl_pp_ftrowned),
1034 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_fteowned */
1035 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftzero */
f1cb2d48
NC
1036 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftsock */
1037 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftchr */
1038 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftblk */
1039 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftfile */
1040 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftdir */
1041 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftpipe */
17ad201a
NC
1042 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftsuid */
1043 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftsgid */
1044 MEMBER_TO_FPTR(Perl_pp_ftrowned), /* Perl_pp_ftsvtx */
7834bb7e 1045 MEMBER_TO_FPTR(Perl_pp_ftlink),
2b260de0
GS
1046 MEMBER_TO_FPTR(Perl_pp_fttty),
1047 MEMBER_TO_FPTR(Perl_pp_fttext),
0b612f93 1048 MEMBER_TO_FPTR(Perl_pp_fttext), /* Perl_pp_ftbinary */
2b260de0
GS
1049 MEMBER_TO_FPTR(Perl_pp_chdir),
1050 MEMBER_TO_FPTR(Perl_pp_chown),
1051 MEMBER_TO_FPTR(Perl_pp_chroot),
605b9385
NC
1052 MEMBER_TO_FPTR(Perl_pp_chown), /* Perl_pp_unlink */
1053 MEMBER_TO_FPTR(Perl_pp_chown), /* Perl_pp_chmod */
1054 MEMBER_TO_FPTR(Perl_pp_chown), /* Perl_pp_utime */
2b260de0
GS
1055 MEMBER_TO_FPTR(Perl_pp_rename),
1056 MEMBER_TO_FPTR(Perl_pp_link),
ce6987d0 1057 MEMBER_TO_FPTR(Perl_pp_link), /* Perl_pp_symlink */
2b260de0
GS
1058 MEMBER_TO_FPTR(Perl_pp_readlink),
1059 MEMBER_TO_FPTR(Perl_pp_mkdir),
1060 MEMBER_TO_FPTR(Perl_pp_rmdir),
1061 MEMBER_TO_FPTR(Perl_pp_open_dir),
1062 MEMBER_TO_FPTR(Perl_pp_readdir),
1063 MEMBER_TO_FPTR(Perl_pp_telldir),
1064 MEMBER_TO_FPTR(Perl_pp_seekdir),
1065 MEMBER_TO_FPTR(Perl_pp_rewinddir),
1066 MEMBER_TO_FPTR(Perl_pp_closedir),
1067 MEMBER_TO_FPTR(Perl_pp_fork),
1068 MEMBER_TO_FPTR(Perl_pp_wait),
1069 MEMBER_TO_FPTR(Perl_pp_waitpid),
1070 MEMBER_TO_FPTR(Perl_pp_system),
1071 MEMBER_TO_FPTR(Perl_pp_exec),
605b9385 1072 MEMBER_TO_FPTR(Perl_pp_chown), /* Perl_pp_kill */
2b260de0
GS
1073 MEMBER_TO_FPTR(Perl_pp_getppid),
1074 MEMBER_TO_FPTR(Perl_pp_getpgrp),
1075 MEMBER_TO_FPTR(Perl_pp_setpgrp),
1076 MEMBER_TO_FPTR(Perl_pp_getpriority),
1077 MEMBER_TO_FPTR(Perl_pp_setpriority),
1078 MEMBER_TO_FPTR(Perl_pp_time),
1079 MEMBER_TO_FPTR(Perl_pp_tms),
0b612f93 1080 MEMBER_TO_FPTR(Perl_pp_gmtime), /* Perl_pp_localtime */
2b260de0
GS
1081 MEMBER_TO_FPTR(Perl_pp_gmtime),
1082 MEMBER_TO_FPTR(Perl_pp_alarm),
1083 MEMBER_TO_FPTR(Perl_pp_sleep),
0b612f93
NC
1084 MEMBER_TO_FPTR(Perl_pp_semget), /* Perl_pp_shmget */
1085 MEMBER_TO_FPTR(Perl_pp_semctl), /* Perl_pp_shmctl */
1086 MEMBER_TO_FPTR(Perl_pp_shmwrite), /* Perl_pp_shmread */
2b260de0 1087 MEMBER_TO_FPTR(Perl_pp_shmwrite),
0b612f93
NC
1088 MEMBER_TO_FPTR(Perl_pp_semget), /* Perl_pp_msgget */
1089 MEMBER_TO_FPTR(Perl_pp_semctl), /* Perl_pp_msgctl */
c9f7ac20
NC
1090 MEMBER_TO_FPTR(Perl_pp_shmwrite), /* Perl_pp_msgsnd */
1091 MEMBER_TO_FPTR(Perl_pp_shmwrite), /* Perl_pp_msgrcv */
7834bb7e 1092 MEMBER_TO_FPTR(Perl_pp_shmwrite), /* Perl_pp_semop */
2b260de0
GS
1093 MEMBER_TO_FPTR(Perl_pp_semget),
1094 MEMBER_TO_FPTR(Perl_pp_semctl),
2b260de0 1095 MEMBER_TO_FPTR(Perl_pp_require),
0b612f93 1096 MEMBER_TO_FPTR(Perl_pp_require), /* Perl_pp_dofile */
2b260de0
GS
1097 MEMBER_TO_FPTR(Perl_pp_entereval),
1098 MEMBER_TO_FPTR(Perl_pp_leaveeval),
1099 MEMBER_TO_FPTR(Perl_pp_entertry),
1100 MEMBER_TO_FPTR(Perl_pp_leavetry),
0b612f93
NC
1101 MEMBER_TO_FPTR(Perl_pp_ghostent), /* Perl_pp_ghbyname */
1102 MEMBER_TO_FPTR(Perl_pp_ghostent), /* Perl_pp_ghbyaddr */
2b260de0 1103 MEMBER_TO_FPTR(Perl_pp_ghostent),
0b612f93
NC
1104 MEMBER_TO_FPTR(Perl_pp_gnetent), /* Perl_pp_gnbyname */
1105 MEMBER_TO_FPTR(Perl_pp_gnetent), /* Perl_pp_gnbyaddr */
2b260de0 1106 MEMBER_TO_FPTR(Perl_pp_gnetent),
0b612f93
NC
1107 MEMBER_TO_FPTR(Perl_pp_gprotoent), /* Perl_pp_gpbyname */
1108 MEMBER_TO_FPTR(Perl_pp_gprotoent), /* Perl_pp_gpbynumber */
2b260de0 1109 MEMBER_TO_FPTR(Perl_pp_gprotoent),
0b612f93
NC
1110 MEMBER_TO_FPTR(Perl_pp_gservent), /* Perl_pp_gsbyname */
1111 MEMBER_TO_FPTR(Perl_pp_gservent), /* Perl_pp_gsbyport */
2b260de0
GS
1112 MEMBER_TO_FPTR(Perl_pp_gservent),
1113 MEMBER_TO_FPTR(Perl_pp_shostent),
1114 MEMBER_TO_FPTR(Perl_pp_snetent),
1115 MEMBER_TO_FPTR(Perl_pp_sprotoent),
1116 MEMBER_TO_FPTR(Perl_pp_sservent),
1117 MEMBER_TO_FPTR(Perl_pp_ehostent),
1118 MEMBER_TO_FPTR(Perl_pp_enetent),
1119 MEMBER_TO_FPTR(Perl_pp_eprotoent),
1120 MEMBER_TO_FPTR(Perl_pp_eservent),
0b612f93
NC
1121 MEMBER_TO_FPTR(Perl_pp_gpwent), /* Perl_pp_gpwnam */
1122 MEMBER_TO_FPTR(Perl_pp_gpwent), /* Perl_pp_gpwuid */
2b260de0
GS
1123 MEMBER_TO_FPTR(Perl_pp_gpwent),
1124 MEMBER_TO_FPTR(Perl_pp_spwent),
1125 MEMBER_TO_FPTR(Perl_pp_epwent),
0b612f93
NC
1126 MEMBER_TO_FPTR(Perl_pp_ggrent), /* Perl_pp_ggrnam */
1127 MEMBER_TO_FPTR(Perl_pp_ggrent), /* Perl_pp_ggrgid */
2b260de0
GS
1128 MEMBER_TO_FPTR(Perl_pp_ggrent),
1129 MEMBER_TO_FPTR(Perl_pp_sgrent),
1130 MEMBER_TO_FPTR(Perl_pp_egrent),
1131 MEMBER_TO_FPTR(Perl_pp_getlogin),
1132 MEMBER_TO_FPTR(Perl_pp_syscall),
1133 MEMBER_TO_FPTR(Perl_pp_lock),
2b260de0
GS
1134 MEMBER_TO_FPTR(Perl_pp_setstate),
1135 MEMBER_TO_FPTR(Perl_pp_method_named),
25a55bd7 1136 MEMBER_TO_FPTR(Perl_pp_defined), /* Perl_pp_dor */
c960fc3b 1137 MEMBER_TO_FPTR(Perl_pp_defined), /* Perl_pp_dorassign */
0d863452
RH
1138 MEMBER_TO_FPTR(Perl_pp_entergiven),
1139 MEMBER_TO_FPTR(Perl_pp_leavegiven),
1140 MEMBER_TO_FPTR(Perl_pp_enterwhen),
1141 MEMBER_TO_FPTR(Perl_pp_leavewhen),
1142 MEMBER_TO_FPTR(Perl_pp_break),
1143 MEMBER_TO_FPTR(Perl_pp_continue),
1144 MEMBER_TO_FPTR(Perl_pp_smartmatch),
1145 MEMBER_TO_FPTR(Perl_pp_print), /* Perl_pp_say */
27da23d5 1146}
79072805 1147#endif
97aff369 1148#ifdef PERL_PPADDR_INITED
27da23d5 1149;
97aff369 1150#endif
79072805 1151
27da23d5 1152#ifdef PERL_GLOBAL_STRUCT_INIT
97aff369 1153# define PERL_CHECK_INITED
27da23d5 1154static const Perl_check_t Gcheck[]
79072805 1155#else
27da23d5 1156# ifndef PERL_GLOBAL_STRUCT
97aff369 1157# define PERL_CHECK_INITED
27da23d5
JH
1158EXT Perl_check_t PL_check[] /* or perlvars.h */
1159# endif
1160#endif
1161#if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
97aff369 1162# define PERL_CHECK_INITED
27da23d5 1163= {
2b260de0
GS
1164 MEMBER_TO_FPTR(Perl_ck_null), /* null */
1165 MEMBER_TO_FPTR(Perl_ck_null), /* stub */
1166 MEMBER_TO_FPTR(Perl_ck_fun), /* scalar */
1167 MEMBER_TO_FPTR(Perl_ck_null), /* pushmark */
1168 MEMBER_TO_FPTR(Perl_ck_null), /* wantarray */
1169 MEMBER_TO_FPTR(Perl_ck_svconst), /* const */
1170 MEMBER_TO_FPTR(Perl_ck_null), /* gvsv */
1171 MEMBER_TO_FPTR(Perl_ck_null), /* gv */
1172 MEMBER_TO_FPTR(Perl_ck_null), /* gelem */
1173 MEMBER_TO_FPTR(Perl_ck_null), /* padsv */
1174 MEMBER_TO_FPTR(Perl_ck_null), /* padav */
1175 MEMBER_TO_FPTR(Perl_ck_null), /* padhv */
1176 MEMBER_TO_FPTR(Perl_ck_null), /* padany */
1177 MEMBER_TO_FPTR(Perl_ck_null), /* pushre */
1178 MEMBER_TO_FPTR(Perl_ck_rvconst), /* rv2gv */
1179 MEMBER_TO_FPTR(Perl_ck_rvconst), /* rv2sv */
1180 MEMBER_TO_FPTR(Perl_ck_null), /* av2arylen */
1181 MEMBER_TO_FPTR(Perl_ck_rvconst), /* rv2cv */
1182 MEMBER_TO_FPTR(Perl_ck_anoncode), /* anoncode */
1183 MEMBER_TO_FPTR(Perl_ck_null), /* prototype */
1184 MEMBER_TO_FPTR(Perl_ck_spair), /* refgen */
1185 MEMBER_TO_FPTR(Perl_ck_null), /* srefgen */
1186 MEMBER_TO_FPTR(Perl_ck_fun), /* ref */
1187 MEMBER_TO_FPTR(Perl_ck_fun), /* bless */
16fe6d59 1188 MEMBER_TO_FPTR(Perl_ck_open), /* backtick */
2b260de0
GS
1189 MEMBER_TO_FPTR(Perl_ck_glob), /* glob */
1190 MEMBER_TO_FPTR(Perl_ck_null), /* readline */
1191 MEMBER_TO_FPTR(Perl_ck_null), /* rcatline */
1192 MEMBER_TO_FPTR(Perl_ck_fun), /* regcmaybe */
1193 MEMBER_TO_FPTR(Perl_ck_fun), /* regcreset */
1194 MEMBER_TO_FPTR(Perl_ck_null), /* regcomp */
1195 MEMBER_TO_FPTR(Perl_ck_match), /* match */
1196 MEMBER_TO_FPTR(Perl_ck_match), /* qr */
59f00321 1197 MEMBER_TO_FPTR(Perl_ck_match), /* subst */
2b260de0 1198 MEMBER_TO_FPTR(Perl_ck_null), /* substcont */
59f00321 1199 MEMBER_TO_FPTR(Perl_ck_match), /* trans */
2b260de0
GS
1200 MEMBER_TO_FPTR(Perl_ck_sassign), /* sassign */
1201 MEMBER_TO_FPTR(Perl_ck_null), /* aassign */
1202 MEMBER_TO_FPTR(Perl_ck_spair), /* chop */
1203 MEMBER_TO_FPTR(Perl_ck_null), /* schop */
1204 MEMBER_TO_FPTR(Perl_ck_spair), /* chomp */
1205 MEMBER_TO_FPTR(Perl_ck_null), /* schomp */
1206 MEMBER_TO_FPTR(Perl_ck_defined), /* defined */
1207 MEMBER_TO_FPTR(Perl_ck_lfun), /* undef */
1208 MEMBER_TO_FPTR(Perl_ck_fun), /* study */
1209 MEMBER_TO_FPTR(Perl_ck_lfun), /* pos */
1210 MEMBER_TO_FPTR(Perl_ck_lfun), /* preinc */
1211 MEMBER_TO_FPTR(Perl_ck_lfun), /* i_preinc */
1212 MEMBER_TO_FPTR(Perl_ck_lfun), /* predec */
1213 MEMBER_TO_FPTR(Perl_ck_lfun), /* i_predec */
1214 MEMBER_TO_FPTR(Perl_ck_lfun), /* postinc */
1215 MEMBER_TO_FPTR(Perl_ck_lfun), /* i_postinc */
1216 MEMBER_TO_FPTR(Perl_ck_lfun), /* postdec */
1217 MEMBER_TO_FPTR(Perl_ck_lfun), /* i_postdec */
1218 MEMBER_TO_FPTR(Perl_ck_null), /* pow */
1219 MEMBER_TO_FPTR(Perl_ck_null), /* multiply */
1220 MEMBER_TO_FPTR(Perl_ck_null), /* i_multiply */
1221 MEMBER_TO_FPTR(Perl_ck_null), /* divide */
1222 MEMBER_TO_FPTR(Perl_ck_null), /* i_divide */
1223 MEMBER_TO_FPTR(Perl_ck_null), /* modulo */
1224 MEMBER_TO_FPTR(Perl_ck_null), /* i_modulo */
1225 MEMBER_TO_FPTR(Perl_ck_repeat), /* repeat */
1226 MEMBER_TO_FPTR(Perl_ck_null), /* add */
1227 MEMBER_TO_FPTR(Perl_ck_null), /* i_add */
1228 MEMBER_TO_FPTR(Perl_ck_null), /* subtract */
1229 MEMBER_TO_FPTR(Perl_ck_null), /* i_subtract */
1230 MEMBER_TO_FPTR(Perl_ck_concat), /* concat */
1231 MEMBER_TO_FPTR(Perl_ck_fun), /* stringify */
1232 MEMBER_TO_FPTR(Perl_ck_bitop), /* left_shift */
1233 MEMBER_TO_FPTR(Perl_ck_bitop), /* right_shift */
1234 MEMBER_TO_FPTR(Perl_ck_null), /* lt */
1235 MEMBER_TO_FPTR(Perl_ck_null), /* i_lt */
1236 MEMBER_TO_FPTR(Perl_ck_null), /* gt */
1237 MEMBER_TO_FPTR(Perl_ck_null), /* i_gt */
1238 MEMBER_TO_FPTR(Perl_ck_null), /* le */
1239 MEMBER_TO_FPTR(Perl_ck_null), /* i_le */
1240 MEMBER_TO_FPTR(Perl_ck_null), /* ge */
1241 MEMBER_TO_FPTR(Perl_ck_null), /* i_ge */
1242 MEMBER_TO_FPTR(Perl_ck_null), /* eq */
1243 MEMBER_TO_FPTR(Perl_ck_null), /* i_eq */
1244 MEMBER_TO_FPTR(Perl_ck_null), /* ne */
1245 MEMBER_TO_FPTR(Perl_ck_null), /* i_ne */
1246 MEMBER_TO_FPTR(Perl_ck_null), /* ncmp */
1247 MEMBER_TO_FPTR(Perl_ck_null), /* i_ncmp */
2de3dbcc
JH
1248 MEMBER_TO_FPTR(Perl_ck_null), /* slt */
1249 MEMBER_TO_FPTR(Perl_ck_null), /* sgt */
1250 MEMBER_TO_FPTR(Perl_ck_null), /* sle */
1251 MEMBER_TO_FPTR(Perl_ck_null), /* sge */
2b260de0
GS
1252 MEMBER_TO_FPTR(Perl_ck_null), /* seq */
1253 MEMBER_TO_FPTR(Perl_ck_null), /* sne */
2de3dbcc 1254 MEMBER_TO_FPTR(Perl_ck_null), /* scmp */
2b260de0
GS
1255 MEMBER_TO_FPTR(Perl_ck_bitop), /* bit_and */
1256 MEMBER_TO_FPTR(Perl_ck_bitop), /* bit_xor */
1257 MEMBER_TO_FPTR(Perl_ck_bitop), /* bit_or */
1258 MEMBER_TO_FPTR(Perl_ck_null), /* negate */
1259 MEMBER_TO_FPTR(Perl_ck_null), /* i_negate */
1260 MEMBER_TO_FPTR(Perl_ck_null), /* not */
1261 MEMBER_TO_FPTR(Perl_ck_bitop), /* complement */
1262 MEMBER_TO_FPTR(Perl_ck_fun), /* atan2 */
1263 MEMBER_TO_FPTR(Perl_ck_fun), /* sin */
1264 MEMBER_TO_FPTR(Perl_ck_fun), /* cos */
1265 MEMBER_TO_FPTR(Perl_ck_fun), /* rand */
1266 MEMBER_TO_FPTR(Perl_ck_fun), /* srand */
1267 MEMBER_TO_FPTR(Perl_ck_fun), /* exp */
1268 MEMBER_TO_FPTR(Perl_ck_fun), /* log */
1269 MEMBER_TO_FPTR(Perl_ck_fun), /* sqrt */
1270 MEMBER_TO_FPTR(Perl_ck_fun), /* int */
1271 MEMBER_TO_FPTR(Perl_ck_fun), /* hex */
1272 MEMBER_TO_FPTR(Perl_ck_fun), /* oct */
1273 MEMBER_TO_FPTR(Perl_ck_fun), /* abs */
1274 MEMBER_TO_FPTR(Perl_ck_lengthconst), /* length */
444155da 1275 MEMBER_TO_FPTR(Perl_ck_substr), /* substr */
2b260de0
GS
1276 MEMBER_TO_FPTR(Perl_ck_fun), /* vec */
1277 MEMBER_TO_FPTR(Perl_ck_index), /* index */
1278 MEMBER_TO_FPTR(Perl_ck_index), /* rindex */
2de3dbcc 1279 MEMBER_TO_FPTR(Perl_ck_fun), /* sprintf */
2b260de0
GS
1280 MEMBER_TO_FPTR(Perl_ck_fun), /* formline */
1281 MEMBER_TO_FPTR(Perl_ck_fun), /* ord */
1282 MEMBER_TO_FPTR(Perl_ck_fun), /* chr */
1283 MEMBER_TO_FPTR(Perl_ck_fun), /* crypt */
2de3dbcc
JH
1284 MEMBER_TO_FPTR(Perl_ck_fun), /* ucfirst */
1285 MEMBER_TO_FPTR(Perl_ck_fun), /* lcfirst */
1286 MEMBER_TO_FPTR(Perl_ck_fun), /* uc */
1287 MEMBER_TO_FPTR(Perl_ck_fun), /* lc */
2b260de0
GS
1288 MEMBER_TO_FPTR(Perl_ck_fun), /* quotemeta */
1289 MEMBER_TO_FPTR(Perl_ck_rvconst), /* rv2av */
1290 MEMBER_TO_FPTR(Perl_ck_null), /* aelemfast */
1291 MEMBER_TO_FPTR(Perl_ck_null), /* aelem */
1292 MEMBER_TO_FPTR(Perl_ck_null), /* aslice */
1293 MEMBER_TO_FPTR(Perl_ck_fun), /* each */
1294 MEMBER_TO_FPTR(Perl_ck_fun), /* values */
1295 MEMBER_TO_FPTR(Perl_ck_fun), /* keys */
1296 MEMBER_TO_FPTR(Perl_ck_delete), /* delete */
1297 MEMBER_TO_FPTR(Perl_ck_exists), /* exists */
1298 MEMBER_TO_FPTR(Perl_ck_rvconst), /* rv2hv */
1299 MEMBER_TO_FPTR(Perl_ck_null), /* helem */
1300 MEMBER_TO_FPTR(Perl_ck_null), /* hslice */
bab9c0ac 1301 MEMBER_TO_FPTR(Perl_ck_unpack), /* unpack */
2b260de0
GS
1302 MEMBER_TO_FPTR(Perl_ck_fun), /* pack */
1303 MEMBER_TO_FPTR(Perl_ck_split), /* split */
1304 MEMBER_TO_FPTR(Perl_ck_join), /* join */
1305 MEMBER_TO_FPTR(Perl_ck_null), /* list */
1306 MEMBER_TO_FPTR(Perl_ck_null), /* lslice */
1307 MEMBER_TO_FPTR(Perl_ck_fun), /* anonlist */
1308 MEMBER_TO_FPTR(Perl_ck_fun), /* anonhash */
1309 MEMBER_TO_FPTR(Perl_ck_fun), /* splice */
1310 MEMBER_TO_FPTR(Perl_ck_fun), /* push */
1311 MEMBER_TO_FPTR(Perl_ck_shift), /* pop */
1312 MEMBER_TO_FPTR(Perl_ck_shift), /* shift */
1313 MEMBER_TO_FPTR(Perl_ck_fun), /* unshift */
1314 MEMBER_TO_FPTR(Perl_ck_sort), /* sort */
1315 MEMBER_TO_FPTR(Perl_ck_fun), /* reverse */
1316 MEMBER_TO_FPTR(Perl_ck_grep), /* grepstart */
1317 MEMBER_TO_FPTR(Perl_ck_null), /* grepwhile */
1318 MEMBER_TO_FPTR(Perl_ck_grep), /* mapstart */
1319 MEMBER_TO_FPTR(Perl_ck_null), /* mapwhile */
1320 MEMBER_TO_FPTR(Perl_ck_null), /* range */
1321 MEMBER_TO_FPTR(Perl_ck_null), /* flip */
1322 MEMBER_TO_FPTR(Perl_ck_null), /* flop */
1323 MEMBER_TO_FPTR(Perl_ck_null), /* and */
1324 MEMBER_TO_FPTR(Perl_ck_null), /* or */
1325 MEMBER_TO_FPTR(Perl_ck_null), /* xor */
1326 MEMBER_TO_FPTR(Perl_ck_null), /* cond_expr */
1327 MEMBER_TO_FPTR(Perl_ck_null), /* andassign */
1328 MEMBER_TO_FPTR(Perl_ck_null), /* orassign */
1329 MEMBER_TO_FPTR(Perl_ck_method), /* method */
1330 MEMBER_TO_FPTR(Perl_ck_subr), /* entersub */
1331 MEMBER_TO_FPTR(Perl_ck_null), /* leavesub */
1332 MEMBER_TO_FPTR(Perl_ck_null), /* leavesublv */
1333 MEMBER_TO_FPTR(Perl_ck_fun), /* caller */
1334 MEMBER_TO_FPTR(Perl_ck_fun), /* warn */
96e176bf 1335 MEMBER_TO_FPTR(Perl_ck_die), /* die */
2b260de0
GS
1336 MEMBER_TO_FPTR(Perl_ck_fun), /* reset */
1337 MEMBER_TO_FPTR(Perl_ck_null), /* lineseq */
722969e2
DM
1338 MEMBER_TO_FPTR(Perl_ck_null), /* nextstate */
1339 MEMBER_TO_FPTR(Perl_ck_null), /* dbstate */
2b260de0
GS
1340 MEMBER_TO_FPTR(Perl_ck_null), /* unstack */
1341 MEMBER_TO_FPTR(Perl_ck_null), /* enter */
1342 MEMBER_TO_FPTR(Perl_ck_null), /* leave */
1343 MEMBER_TO_FPTR(Perl_ck_null), /* scope */
1344 MEMBER_TO_FPTR(Perl_ck_null), /* enteriter */
1345 MEMBER_TO_FPTR(Perl_ck_null), /* iter */
1346 MEMBER_TO_FPTR(Perl_ck_null), /* enterloop */
1347 MEMBER_TO_FPTR(Perl_ck_null), /* leaveloop */
78f9721b 1348 MEMBER_TO_FPTR(Perl_ck_return), /* return */
2b260de0
GS
1349 MEMBER_TO_FPTR(Perl_ck_null), /* last */
1350 MEMBER_TO_FPTR(Perl_ck_null), /* next */
1351 MEMBER_TO_FPTR(Perl_ck_null), /* redo */
1352 MEMBER_TO_FPTR(Perl_ck_null), /* dump */
1353 MEMBER_TO_FPTR(Perl_ck_null), /* goto */
d98f61e7 1354 MEMBER_TO_FPTR(Perl_ck_exit), /* exit */
16fe6d59 1355 MEMBER_TO_FPTR(Perl_ck_open), /* open */
2b260de0
GS
1356 MEMBER_TO_FPTR(Perl_ck_fun), /* close */
1357 MEMBER_TO_FPTR(Perl_ck_fun), /* pipe_op */
1358 MEMBER_TO_FPTR(Perl_ck_fun), /* fileno */
a86a20aa 1359 MEMBER_TO_FPTR(Perl_ck_fun), /* umask */
2b260de0
GS
1360 MEMBER_TO_FPTR(Perl_ck_fun), /* binmode */
1361 MEMBER_TO_FPTR(Perl_ck_fun), /* tie */
1362 MEMBER_TO_FPTR(Perl_ck_fun), /* untie */
1363 MEMBER_TO_FPTR(Perl_ck_fun), /* tied */
1364 MEMBER_TO_FPTR(Perl_ck_fun), /* dbmopen */
1365 MEMBER_TO_FPTR(Perl_ck_fun), /* dbmclose */
1366 MEMBER_TO_FPTR(Perl_ck_select), /* sselect */
1367 MEMBER_TO_FPTR(Perl_ck_select), /* select */
1368 MEMBER_TO_FPTR(Perl_ck_eof), /* getc */
1369 MEMBER_TO_FPTR(Perl_ck_fun), /* read */
1370 MEMBER_TO_FPTR(Perl_ck_fun), /* enterwrite */
1371 MEMBER_TO_FPTR(Perl_ck_null), /* leavewrite */
1372 MEMBER_TO_FPTR(Perl_ck_listiob), /* prtf */
1373 MEMBER_TO_FPTR(Perl_ck_listiob), /* print */
1374 MEMBER_TO_FPTR(Perl_ck_fun), /* sysopen */
1375 MEMBER_TO_FPTR(Perl_ck_fun), /* sysseek */
1376 MEMBER_TO_FPTR(Perl_ck_fun), /* sysread */
1377 MEMBER_TO_FPTR(Perl_ck_fun), /* syswrite */
1378 MEMBER_TO_FPTR(Perl_ck_fun), /* send */
1379 MEMBER_TO_FPTR(Perl_ck_fun), /* recv */
1380 MEMBER_TO_FPTR(Perl_ck_eof), /* eof */
1381 MEMBER_TO_FPTR(Perl_ck_fun), /* tell */
1382 MEMBER_TO_FPTR(Perl_ck_fun), /* seek */
1383 MEMBER_TO_FPTR(Perl_ck_trunc), /* truncate */
1384 MEMBER_TO_FPTR(Perl_ck_fun), /* fcntl */
1385 MEMBER_TO_FPTR(Perl_ck_fun), /* ioctl */
1386 MEMBER_TO_FPTR(Perl_ck_fun), /* flock */
1387 MEMBER_TO_FPTR(Perl_ck_fun), /* socket */
1388 MEMBER_TO_FPTR(Perl_ck_fun), /* sockpair */
1389 MEMBER_TO_FPTR(Perl_ck_fun), /* bind */
1390 MEMBER_TO_FPTR(Perl_ck_fun), /* connect */
1391 MEMBER_TO_FPTR(Perl_ck_fun), /* listen */
1392 MEMBER_TO_FPTR(Perl_ck_fun), /* accept */
1393 MEMBER_TO_FPTR(Perl_ck_fun), /* shutdown */
1394 MEMBER_TO_FPTR(Perl_ck_fun), /* gsockopt */
1395 MEMBER_TO_FPTR(Perl_ck_fun), /* ssockopt */
1396 MEMBER_TO_FPTR(Perl_ck_fun), /* getsockname */
1397 MEMBER_TO_FPTR(Perl_ck_fun), /* getpeername */
1398 MEMBER_TO_FPTR(Perl_ck_ftst), /* lstat */
1399 MEMBER_TO_FPTR(Perl_ck_ftst), /* stat */
1400 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftrread */
1401 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftrwrite */
1402 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftrexec */
1403 MEMBER_TO_FPTR(Perl_ck_ftst), /* fteread */
1404 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftewrite */
1405 MEMBER_TO_FPTR(Perl_ck_ftst), /* fteexec */
1406 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftis */
2b260de0
GS
1407 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftsize */
1408 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftmtime */
1409 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftatime */
1410 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftctime */
7834bb7e
NC
1411 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftrowned */
1412 MEMBER_TO_FPTR(Perl_ck_ftst), /* fteowned */
1413 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftzero */
2b260de0
GS
1414 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftsock */
1415 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftchr */
1416 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftblk */
1417 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftfile */
1418 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftdir */
1419 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftpipe */
2b260de0
GS
1420 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftsuid */
1421 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftsgid */
1422 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftsvtx */
7834bb7e 1423 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftlink */
2b260de0
GS
1424 MEMBER_TO_FPTR(Perl_ck_ftst), /* fttty */
1425 MEMBER_TO_FPTR(Perl_ck_ftst), /* fttext */
1426 MEMBER_TO_FPTR(Perl_ck_ftst), /* ftbinary */
d4ac975e 1427 MEMBER_TO_FPTR(Perl_ck_chdir), /* chdir */
2b260de0
GS
1428 MEMBER_TO_FPTR(Perl_ck_fun), /* chown */
1429 MEMBER_TO_FPTR(Perl_ck_fun), /* chroot */
1430 MEMBER_TO_FPTR(Perl_ck_fun), /* unlink */
a86a20aa 1431 MEMBER_TO_FPTR(Perl_ck_fun), /* chmod */
2b260de0
GS
1432 MEMBER_TO_FPTR(Perl_ck_fun), /* utime */
1433 MEMBER_TO_FPTR(Perl_ck_fun), /* rename */
1434 MEMBER_TO_FPTR(Perl_ck_fun), /* link */
1435 MEMBER_TO_FPTR(Perl_ck_fun), /* symlink */
1436 MEMBER_TO_FPTR(Perl_ck_fun), /* readlink */
a86a20aa 1437 MEMBER_TO_FPTR(Perl_ck_fun), /* mkdir */
2b260de0
GS
1438 MEMBER_TO_FPTR(Perl_ck_fun), /* rmdir */
1439 MEMBER_TO_FPTR(Perl_ck_fun), /* open_dir */
1440 MEMBER_TO_FPTR(Perl_ck_fun), /* readdir */
1441 MEMBER_TO_FPTR(Perl_ck_fun), /* telldir */
1442 MEMBER_TO_FPTR(Perl_ck_fun), /* seekdir */
1443 MEMBER_TO_FPTR(Perl_ck_fun), /* rewinddir */
1444 MEMBER_TO_FPTR(Perl_ck_fun), /* closedir */
1445 MEMBER_TO_FPTR(Perl_ck_null), /* fork */
1446 MEMBER_TO_FPTR(Perl_ck_null), /* wait */
1447 MEMBER_TO_FPTR(Perl_ck_fun), /* waitpid */
1448 MEMBER_TO_FPTR(Perl_ck_exec), /* system */
1449 MEMBER_TO_FPTR(Perl_ck_exec), /* exec */
1450 MEMBER_TO_FPTR(Perl_ck_fun), /* kill */
1451 MEMBER_TO_FPTR(Perl_ck_null), /* getppid */
1452 MEMBER_TO_FPTR(Perl_ck_fun), /* getpgrp */
1453 MEMBER_TO_FPTR(Perl_ck_fun), /* setpgrp */
1454 MEMBER_TO_FPTR(Perl_ck_fun), /* getpriority */
1455 MEMBER_TO_FPTR(Perl_ck_fun), /* setpriority */
1456 MEMBER_TO_FPTR(Perl_ck_null), /* time */
1457 MEMBER_TO_FPTR(Perl_ck_null), /* tms */
1458 MEMBER_TO_FPTR(Perl_ck_fun), /* localtime */
1459 MEMBER_TO_FPTR(Perl_ck_fun), /* gmtime */
1460 MEMBER_TO_FPTR(Perl_ck_fun), /* alarm */
1461 MEMBER_TO_FPTR(Perl_ck_fun), /* sleep */
1462 MEMBER_TO_FPTR(Perl_ck_fun), /* shmget */
1463 MEMBER_TO_FPTR(Perl_ck_fun), /* shmctl */
1464 MEMBER_TO_FPTR(Perl_ck_fun), /* shmread */
1465 MEMBER_TO_FPTR(Perl_ck_fun), /* shmwrite */
1466 MEMBER_TO_FPTR(Perl_ck_fun), /* msgget */
1467 MEMBER_TO_FPTR(Perl_ck_fun), /* msgctl */
1468 MEMBER_TO_FPTR(Perl_ck_fun), /* msgsnd */
1469 MEMBER_TO_FPTR(Perl_ck_fun), /* msgrcv */
7834bb7e 1470 MEMBER_TO_FPTR(Perl_ck_fun), /* semop */
2b260de0
GS
1471 MEMBER_TO_FPTR(Perl_ck_fun), /* semget */
1472 MEMBER_TO_FPTR(Perl_ck_fun), /* semctl */
2b260de0
GS
1473 MEMBER_TO_FPTR(Perl_ck_require), /* require */
1474 MEMBER_TO_FPTR(Perl_ck_fun), /* dofile */
1475 MEMBER_TO_FPTR(Perl_ck_eval), /* entereval */
1476 MEMBER_TO_FPTR(Perl_ck_null), /* leaveeval */
1477 MEMBER_TO_FPTR(Perl_ck_null), /* entertry */
1478 MEMBER_TO_FPTR(Perl_ck_null), /* leavetry */
1479 MEMBER_TO_FPTR(Perl_ck_fun), /* ghbyname */
1480 MEMBER_TO_FPTR(Perl_ck_fun), /* ghbyaddr */
1481 MEMBER_TO_FPTR(Perl_ck_null), /* ghostent */
1482 MEMBER_TO_FPTR(Perl_ck_fun), /* gnbyname */
1483 MEMBER_TO_FPTR(Perl_ck_fun), /* gnbyaddr */
1484 MEMBER_TO_FPTR(Perl_ck_null), /* gnetent */
1485 MEMBER_TO_FPTR(Perl_ck_fun), /* gpbyname */
1486 MEMBER_TO_FPTR(Perl_ck_fun), /* gpbynumber */
1487 MEMBER_TO_FPTR(Perl_ck_null), /* gprotoent */
1488 MEMBER_TO_FPTR(Perl_ck_fun), /* gsbyname */
1489 MEMBER_TO_FPTR(Perl_ck_fun), /* gsbyport */
1490 MEMBER_TO_FPTR(Perl_ck_null), /* gservent */
1491 MEMBER_TO_FPTR(Perl_ck_fun), /* shostent */
1492 MEMBER_TO_FPTR(Perl_ck_fun), /* snetent */
1493 MEMBER_TO_FPTR(Perl_ck_fun), /* sprotoent */
1494 MEMBER_TO_FPTR(Perl_ck_fun), /* sservent */
1495 MEMBER_TO_FPTR(Perl_ck_null), /* ehostent */
1496 MEMBER_TO_FPTR(Perl_ck_null), /* enetent */
1497 MEMBER_TO_FPTR(Perl_ck_null), /* eprotoent */
1498 MEMBER_TO_FPTR(Perl_ck_null), /* eservent */
1499 MEMBER_TO_FPTR(Perl_ck_fun), /* gpwnam */
1500 MEMBER_TO_FPTR(Perl_ck_fun), /* gpwuid */
1501 MEMBER_TO_FPTR(Perl_ck_null), /* gpwent */
1502 MEMBER_TO_FPTR(Perl_ck_null), /* spwent */
1503 MEMBER_TO_FPTR(Perl_ck_null), /* epwent */
1504 MEMBER_TO_FPTR(Perl_ck_fun), /* ggrnam */
1505 MEMBER_TO_FPTR(Perl_ck_fun), /* ggrgid */
1506 MEMBER_TO_FPTR(Perl_ck_null), /* ggrent */
1507 MEMBER_TO_FPTR(Perl_ck_null), /* sgrent */
1508 MEMBER_TO_FPTR(Perl_ck_null), /* egrent */
1509 MEMBER_TO_FPTR(Perl_ck_null), /* getlogin */
1510 MEMBER_TO_FPTR(Perl_ck_fun), /* syscall */
1511 MEMBER_TO_FPTR(Perl_ck_rfun), /* lock */
2b260de0
GS
1512 MEMBER_TO_FPTR(Perl_ck_null), /* setstate */
1513 MEMBER_TO_FPTR(Perl_ck_null), /* method_named */
c963b151
BD
1514 MEMBER_TO_FPTR(Perl_ck_null), /* dor */
1515 MEMBER_TO_FPTR(Perl_ck_null), /* dorassign */
0d863452
RH
1516 MEMBER_TO_FPTR(Perl_ck_null), /* entergiven */
1517 MEMBER_TO_FPTR(Perl_ck_null), /* leavegiven */
1518 MEMBER_TO_FPTR(Perl_ck_null), /* enterwhen */
1519 MEMBER_TO_FPTR(Perl_ck_null), /* leavewhen */
1520 MEMBER_TO_FPTR(Perl_ck_null), /* break */
1521 MEMBER_TO_FPTR(Perl_ck_null), /* continue */
1522 MEMBER_TO_FPTR(Perl_ck_smartmatch), /* smartmatch */
cfc4a7da 1523 MEMBER_TO_FPTR(Perl_ck_listiob), /* say */
438c221d 1524 MEMBER_TO_FPTR(Perl_ck_null), /* custom */
27da23d5 1525}
79072805 1526#endif
97aff369 1527#ifdef PERL_CHECK_INITED
27da23d5 1528;
97aff369 1529#endif /* #ifdef PERL_CHECK_INITED */
27da23d5
JH
1530
1531#ifndef PERL_GLOBAL_STRUCT_INIT
79072805
LW
1532
1533#ifndef DOINIT
1ccb7c8d 1534EXTCONST U32 PL_opargs[];
79072805 1535#else
1ccb7c8d 1536EXTCONST U32 PL_opargs[] = {
79072805 1537 0x00000000, /* null */
93a17b20 1538 0x00000000, /* stub */
1a67a97c 1539 0x00003604, /* scalar */
79072805
LW
1540 0x00000004, /* pushmark */
1541 0x00000014, /* wantarray */
1a67a97c 1542 0x00000c04, /* const */
7934575e
GS
1543 0x00000c44, /* gvsv */
1544 0x00000c44, /* gv */
b162f9ea 1545 0x00022440, /* gelem */
748a9306
LW
1546 0x00000044, /* padsv */
1547 0x00000040, /* padav */
1548 0x00000040, /* padhv */
1549 0x00000040, /* padany */
1a67a97c 1550 0x00000a40, /* pushre */
b162f9ea
IZ
1551 0x00000244, /* rv2gv */
1552 0x00000244, /* rv2sv */
1553 0x00000214, /* av2arylen */
1554 0x00000240, /* rv2cv */
1a67a97c
SM
1555 0x00000c00, /* anoncode */
1556 0x00003604, /* prototype */
b162f9ea
IZ
1557 0x00004201, /* refgen */
1558 0x00002206, /* srefgen */
1a67a97c
SM
1559 0x0001368c, /* ref */
1560 0x00122804, /* bless */
e3f73d4e 1561 0x00003608, /* backtick */
649da076 1562 0x00012808, /* glob */
b04ef359 1563 0x0001d608, /* readline */
5fc9b9e4 1564 0x00000c08, /* rcatline */
b162f9ea
IZ
1565 0x00002204, /* regcmaybe */
1566 0x00002204, /* regcreset */
1567 0x00002604, /* regcomp */
1a67a97c
SM
1568 0x00000a40, /* match */
1569 0x00000a04, /* qr */
1570 0x00002a54, /* subst */
b162f9ea 1571 0x00000654, /* substcont */
1a67a97c 1572 0x00003014, /* trans */
79072805 1573 0x00000004, /* sassign */
b162f9ea 1574 0x00044408, /* aassign */
21f5b33c
GS
1575 0x0000560d, /* chop */
1576 0x0001368c, /* schop */
1a67a97c
SM
1577 0x0000570d, /* chomp */
1578 0x0001378c, /* schomp */
1579 0x00013694, /* defined */
1580 0x00013604, /* undef */
1581 0x00013684, /* study */
1582 0x0001368c, /* pos */
b162f9ea
IZ
1583 0x00002264, /* preinc */
1584 0x00002254, /* i_preinc */
1585 0x00002264, /* predec */
1586 0x00002254, /* i_predec */
21f5b33c 1587 0x0000226c, /* postinc */
b162f9ea 1588 0x0000235c, /* i_postinc */
21f5b33c 1589 0x0000226c, /* postdec */
b162f9ea
IZ
1590 0x0000235c, /* i_postdec */
1591 0x0002250e, /* pow */
1592 0x0002252e, /* multiply */
1593 0x0002251e, /* i_multiply */
1594 0x0002252e, /* divide */
1595 0x0002251e, /* i_divide */
1596 0x0002253e, /* modulo */
1597 0x0002251e, /* i_modulo */
1598 0x00024409, /* repeat */
1599 0x0002252e, /* add */
1600 0x0002251e, /* i_add */
1601 0x0002252e, /* subtract */
1602 0x0002251e, /* i_subtract */
df91b2c5 1603 0x0002250e, /* concat */
1a67a97c 1604 0x0000290e, /* stringify */
b162f9ea
IZ
1605 0x0002250e, /* left_shift */
1606 0x0002250e, /* right_shift */
1607 0x00022436, /* lt */
1608 0x00022416, /* i_lt */
1609 0x00022436, /* gt */
1610 0x00022416, /* i_gt */
1611 0x00022436, /* le */
1612 0x00022416, /* i_le */
1613 0x00022436, /* ge */
1614 0x00022416, /* i_ge */
1615 0x00022436, /* eq */
1616 0x00022416, /* i_eq */
1617 0x00022436, /* ne */
1618 0x00022416, /* i_ne */
1619 0x0002243e, /* ncmp */
1620 0x0002241e, /* i_ncmp */
1621 0x00022416, /* slt */
1622 0x00022416, /* sgt */
1623 0x00022416, /* sle */
1624 0x00022416, /* sge */
1625 0x00022416, /* seq */
1626 0x00022416, /* sne */
1627 0x0002241e, /* scmp */
21f5b33c
GS
1628 0x0002240e, /* bit_and */
1629 0x0002240e, /* bit_xor */
1630 0x0002240e, /* bit_or */
1631 0x0000222e, /* negate */
b162f9ea
IZ
1632 0x0000231e, /* i_negate */
1633 0x00002216, /* not */
21f5b33c 1634 0x0000220e, /* complement */
1a67a97c
SM
1635 0x0002290e, /* atan2 */
1636 0x0001378e, /* sin */
1637 0x0001378e, /* cos */
1638 0x0001370c, /* rand */
1639 0x00013604, /* srand */
1640 0x0001378e, /* exp */
1641 0x0001378e, /* log */
1642 0x0001378e, /* sqrt */
1643 0x0001378e, /* int */
1644 0x0001378e, /* hex */
1645 0x0001378e, /* oct */
1646 0x0001378e, /* abs */
1647 0x0001379c, /* length */
1648 0x1322280c, /* substr */
1649 0x0022281c, /* vec */
1650 0x0122291c, /* index */
1651 0x0122291c, /* rindex */
fc7325bb 1652 0x0004280d, /* sprintf */
1a67a97c
SM
1653 0x00042805, /* formline */
1654 0x0001379e, /* ord */
1655 0x0001378e, /* chr */
1656 0x0002290e, /* crypt */
1657 0x0001368e, /* ucfirst */
1658 0x0001368e, /* lcfirst */
1659 0x0001368e, /* uc */
1660 0x0001368e, /* lc */
69b47968 1661 0x0001368e, /* quotemeta */
b162f9ea 1662 0x00000248, /* rv2av */
7934575e 1663 0x00026c04, /* aelemfast */
b162f9ea 1664 0x00026404, /* aelem */
1a67a97c 1665 0x00046801, /* aslice */
59af0135 1666 0x00009600, /* each */
1a67a97c
SM
1667 0x00009608, /* values */
1668 0x00009608, /* keys */
1669 0x00003600, /* delete */
1670 0x00003614, /* exists */
b162f9ea
IZ
1671 0x00000248, /* rv2hv */
1672 0x00028404, /* helem */
1a67a97c 1673 0x00048801, /* hslice */
13dcffc6 1674 0x00122800, /* unpack */
1a67a97c
SM
1675 0x0004280d, /* pack */
1676 0x00222808, /* split */
69b47968 1677 0x0004280d, /* join */
1a67a97c 1678 0x00004801, /* list */
b162f9ea 1679 0x00448400, /* lslice */
1a67a97c
SM
1680 0x00004805, /* anonlist */
1681 0x00004805, /* anonhash */
1682 0x05326801, /* splice */
1683 0x0004691d, /* push */
26f600bc
RGS
1684 0x00017604, /* pop */
1685 0x00017604, /* shift */
1a67a97c 1686 0x0004691d, /* unshift */
cd299c6e 1687 0x0005a841, /* sort */
1a67a97c
SM
1688 0x00004809, /* reverse */
1689 0x0004a841, /* grepstart */
b162f9ea 1690 0x00000648, /* grepwhile */
1a67a97c 1691 0x0004a841, /* mapstart */
b162f9ea 1692 0x00000648, /* mapwhile */
1a67a97c 1693 0x00022600, /* range */
b162f9ea
IZ
1694 0x00022200, /* flip */
1695 0x00000200, /* flop */
1696 0x00000600, /* and */
1697 0x00000600, /* or */
888b73cf 1698 0x00022406, /* xor */
1a67a97c 1699 0x00000640, /* cond_expr */
b162f9ea
IZ
1700 0x00000604, /* andassign */
1701 0x00000604, /* orassign */
1702 0x00000240, /* method */
1703 0x00004249, /* entersub */
1704 0x00000200, /* leavesub */
cd06dffe 1705 0x00000200, /* leavesublv */
1a67a97c
SM
1706 0x00013608, /* caller */
1707 0x0000481d, /* warn */
1708 0x0000485d, /* die */
1709 0x00013614, /* reset */
1710 0x00000800, /* lineseq */
1711 0x00001404, /* nextstate */
1712 0x00001404, /* dbstate */
79072805
LW
1713 0x00000004, /* unstack */
1714 0x00000000, /* enter */
1a67a97c
SM
1715 0x00000800, /* leave */
1716 0x00000800, /* scope */
1717 0x00001240, /* enteriter */
79072805 1718 0x00000000, /* iter */
1a67a97c 1719 0x00001240, /* enterloop */
b162f9ea 1720 0x00000400, /* leaveloop */
1a67a97c
SM
1721 0x00004841, /* return */
1722 0x00001a44, /* last */
1723 0x00001a44, /* next */
1724 0x00001a44, /* redo */
1725 0x00001a44, /* dump */
1726 0x00001a44, /* goto */
1727 0x00013644, /* exit */
a567e93b 1728 0x0052c81d, /* open */
1a67a97c
SM
1729 0x0001d614, /* close */
1730 0x000cc814, /* pipe_op */
1731 0x0000d61c, /* fileno */
1732 0x0001361c, /* umask */
1c1fc3ea 1733 0x0012c804, /* binmode */
1a67a97c
SM
1734 0x0042e855, /* tie */
1735 0x0000f614, /* untie */
1736 0x0000f604, /* tied */
1737 0x00228814, /* dbmopen */
1738 0x00009614, /* dbmclose */
1739 0x02222808, /* sselect */
1740 0x0001c80c, /* select */
1741 0x0001d60c, /* getc */
1742 0x122ec81d, /* read */
1743 0x0001d654, /* enterwrite */
b162f9ea 1744 0x00000200, /* leavewrite */
1a67a97c
SM
1745 0x0005c815, /* prtf */
1746 0x0005c815, /* print */
1747 0x1222c804, /* sysopen */
1748 0x0022c804, /* sysseek */
1749 0x122ec81d, /* sysread */
1750 0x1322c81d, /* syswrite */
1751 0x1222c81d, /* send */
1752 0x022ec81d, /* recv */
1753 0x0001d614, /* eof */
1754 0x0001d60c, /* tell */
1755 0x0022c804, /* seek */
1756 0x00022814, /* truncate */
1757 0x0022c80c, /* fcntl */
1758 0x0022c80c, /* ioctl */
1759 0x0002c91c, /* flock */
1760 0x0222c814, /* socket */
1761 0x222cc814, /* sockpair */
1762 0x0002c814, /* bind */
1763 0x0002c814, /* connect */
1764 0x0002c814, /* listen */
1765 0x000cc81c, /* accept */
1766 0x0002c81c, /* shutdown */
1767 0x0022c814, /* gsockopt */
1768 0x0222c814, /* ssockopt */
1769 0x0000d614, /* getsockname */
1770 0x0000d614, /* getpeername */
1771 0x0000d880, /* lstat */
1772 0x0000d880, /* stat */
1773 0x0000d894, /* ftrread */
1774 0x0000d894, /* ftrwrite */
1775 0x0000d894, /* ftrexec */
1776 0x0000d894, /* fteread */
1777 0x0000d894, /* ftewrite */
1778 0x0000d894, /* fteexec */
1779 0x0000d894, /* ftis */
1a67a97c
SM
1780 0x0000d89c, /* ftsize */
1781 0x0000d88c, /* ftmtime */
1782 0x0000d88c, /* ftatime */
1783 0x0000d88c, /* ftctime */
7834bb7e
NC
1784 0x0000d894, /* ftrowned */
1785 0x0000d894, /* fteowned */
1786 0x0000d894, /* ftzero */
1a67a97c
SM
1787 0x0000d894, /* ftsock */
1788 0x0000d894, /* ftchr */
1789 0x0000d894, /* ftblk */
1790 0x0000d894, /* ftfile */
1791 0x0000d894, /* ftdir */
1792 0x0000d894, /* ftpipe */
1a67a97c
SM
1793 0x0000d894, /* ftsuid */
1794 0x0000d894, /* ftsgid */
1795 0x0000d894, /* ftsvtx */
7834bb7e 1796 0x0000d894, /* ftlink */
1a67a97c
SM
1797 0x0000d814, /* fttty */
1798 0x0000d894, /* fttext */
1799 0x0000d894, /* ftbinary */
1800 0x0001371c, /* chdir */
1801 0x0000491d, /* chown */
1802 0x0001379c, /* chroot */
1803 0x0000499d, /* unlink */
1804 0x0000491d, /* chmod */
1805 0x0000491d, /* utime */
1806 0x0002291c, /* rename */
1807 0x0002291c, /* link */
1808 0x0002291c, /* symlink */
1809 0x0001368c, /* readlink */
491873e5 1810 0x0013299c, /* mkdir */
1a67a97c 1811 0x0001379c, /* rmdir */
1e2c6ed7 1812 0x0002c814, /* open_dir */
1a67a97c
SM
1813 0x0000d600, /* readdir */
1814 0x0000d60c, /* telldir */
1815 0x0002c804, /* seekdir */
1816 0x0000d604, /* rewinddir */
1817 0x0000d614, /* closedir */
79072805 1818 0x0000001c, /* fork */
b162f9ea 1819 0x0000011c, /* wait */
1a67a97c
SM
1820 0x0002291c, /* waitpid */
1821 0x0005291d, /* system */
1822 0x0005295d, /* exec */
1823 0x0000495d, /* kill */
b162f9ea 1824 0x0000011c, /* getppid */
1a67a97c
SM
1825 0x0001371c, /* getpgrp */
1826 0x0013291c, /* setpgrp */
1827 0x0002291c, /* getpriority */
1828 0x0022291c, /* setpriority */
b162f9ea 1829 0x0000011c, /* time */
79072805 1830 0x00000000, /* tms */
1a67a97c
SM
1831 0x00013608, /* localtime */
1832 0x00013608, /* gmtime */
1833 0x0001369c, /* alarm */
1834 0x0001371c, /* sleep */
1835 0x0022281d, /* shmget */
1836 0x0022281d, /* shmctl */
1837 0x0222281d, /* shmread */
1838 0x0222281d, /* shmwrite */
1839 0x0002281d, /* msgget */
1840 0x0022281d, /* msgctl */
1841 0x0022281d, /* msgsnd */
1842 0x2222281d, /* msgrcv */
7834bb7e 1843 0x0002281d, /* semop */
1a67a97c
SM
1844 0x0022281d, /* semget */
1845 0x0222281d, /* semctl */
1a67a97c 1846 0x000136c0, /* require */
b162f9ea 1847 0x00002240, /* dofile */
1a67a97c 1848 0x00003640, /* entereval */
b162f9ea
IZ
1849 0x00002200, /* leaveeval */
1850 0x00000600, /* entertry */
1a67a97c
SM
1851 0x00000800, /* leavetry */
1852 0x00003600, /* ghbyname */
1853 0x00022800, /* ghbyaddr */
79072805 1854 0x00000000, /* ghostent */
1a67a97c
SM
1855 0x00003600, /* gnbyname */
1856 0x00022800, /* gnbyaddr */
79072805 1857 0x00000000, /* gnetent */
1a67a97c
SM
1858 0x00003600, /* gpbyname */
1859 0x00002800, /* gpbynumber */
79072805 1860 0x00000000, /* gprotoent */
1a67a97c
SM
1861 0x00022800, /* gsbyname */
1862 0x00022800, /* gsbyport */
79072805 1863 0x00000000, /* gservent */
1a67a97c
SM
1864 0x00003614, /* shostent */
1865 0x00003614, /* snetent */
1866 0x00003614, /* sprotoent */
1867 0x00003614, /* sservent */
93a17b20
LW
1868 0x00000014, /* ehostent */
1869 0x00000014, /* enetent */
1870 0x00000014, /* eprotoent */
1871 0x00000014, /* eservent */
1a67a97c
SM
1872 0x00003600, /* gpwnam */
1873 0x00003600, /* gpwuid */
79072805 1874 0x00000000, /* gpwent */
a0d0e21e
LW
1875 0x00000014, /* spwent */
1876 0x00000014, /* epwent */
1a67a97c
SM
1877 0x00003600, /* ggrnam */
1878 0x00003600, /* ggrgid */
79072805 1879 0x00000000, /* ggrent */
a0d0e21e
LW
1880 0x00000014, /* sgrent */
1881 0x00000014, /* egrent */
79072805 1882 0x0000000c, /* getlogin */
1a67a97c 1883 0x0004281d, /* syscall */
5a47f09b 1884 0x0000f604, /* lock */
3f872cb9 1885 0x00001404, /* setstate */
f5d5a27c 1886 0x00000c40, /* method_named */
c963b151
BD
1887 0x00000600, /* dor */
1888 0x00000604, /* dorassign */
0d863452
RH
1889 0x00000640, /* entergiven */
1890 0x00000200, /* leavegiven */
1891 0x00000640, /* enterwhen */
1892 0x00000200, /* leavewhen */
1893 0x00000000, /* break */
1894 0x00000000, /* continue */
1895 0x00000404, /* smartmatch */
1896 0x0005c815, /* say */
438c221d 1897 0x00000000, /* custom */
79072805
LW
1898};
1899#endif
73c4f7a1 1900
bae1192d
JH
1901#endif /* !PERL_GLOBAL_STRUCT_INIT */
1902
73c4f7a1 1903END_EXTERN_C
27da23d5 1904
37442d52 1905/* ex: set ro: */