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