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