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