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