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         "kvaslice",
 284         "aeach",
 285         "akeys",
 286         "avalues",
 287         "each",
 288         "values",
 289         "keys",
 290         "delete",
 291         "exists",
 292         "rv2hv",
 293         "helem",
 294         "hslice",
 295         "kvhslice",
 296         "unpack",
 297         "pack",
 298         "split",
 299         "join",
 300         "list",
 301         "lslice",
 302         "anonlist",
 303         "anonhash",
 304         "splice",
 305         "push",
 306         "pop",
 307         "shift",
 308         "unshift",
 309         "sort",
 310         "reverse",
 311         "grepstart",
 312         "grepwhile",
 313         "mapstart",
 314         "mapwhile",
 315         "range",
 316         "flip",
 317         "flop",
 318         "and",
 319         "or",
 320         "xor",
 321         "dor",
 322         "cond_expr",
 323         "andassign",
 324         "orassign",
 325         "dorassign",
 326         "method",
 327         "entersub",
 328         "leavesub",
 329         "leavesublv",
 330         "caller",
 331         "warn",
 332         "die",
 333         "reset",
 334         "lineseq",
 335         "nextstate",
 336         "dbstate",
 337         "unstack",
 338         "enter",
 339         "leave",
 340         "scope",
 341         "enteriter",
 342         "iter",
 343         "enterloop",
 344         "leaveloop",
 345         "return",
 346         "last",
 347         "next",
 348         "redo",
 349         "dump",
 350         "goto",
 351         "exit",
 352         "method_named",
 353         "entergiven",
 354         "leavegiven",
 355         "enterwhen",
 356         "leavewhen",
 357         "break",
 358         "continue",
 359         "open",
 360         "close",
 361         "pipe_op",
 362         "fileno",
 363         "umask",
 364         "binmode",
 365         "tie",
 366         "untie",
 367         "tied",
 368         "dbmopen",
 369         "dbmclose",
 370         "sselect",
 371         "select",
 372         "getc",
 373         "read",
 374         "enterwrite",
 375         "leavewrite",
 376         "prtf",
 377         "print",
 378         "say",
 379         "sysopen",
 380         "sysseek",
 381         "sysread",
 382         "syswrite",
 383         "eof",
 384         "tell",
 385         "seek",
 386         "truncate",
 387         "fcntl",
 388         "ioctl",
 389         "flock",
 390         "send",
 391         "recv",
 392         "socket",
 393         "sockpair",
 394         "bind",
 395         "connect",
 396         "listen",
 397         "accept",
 398         "shutdown",
 399         "gsockopt",
 400         "ssockopt",
 401         "getsockname",
 402         "getpeername",
 403         "lstat",
 404         "stat",
 405         "ftrread",
 406         "ftrwrite",
 407         "ftrexec",
 408         "fteread",
 409         "ftewrite",
 410         "fteexec",
 411         "ftis",
 412         "ftsize",
 413         "ftmtime",
 414         "ftatime",
 415         "ftctime",
 416         "ftrowned",
 417         "fteowned",
 418         "ftzero",
 419         "ftsock",
 420         "ftchr",
 421         "ftblk",
 422         "ftfile",
 423         "ftdir",
 424         "ftpipe",
 425         "ftsuid",
 426         "ftsgid",
 427         "ftsvtx",
 428         "ftlink",
 429         "fttty",
 430         "fttext",
 431         "ftbinary",
 432         "chdir",
 433         "chown",
 434         "chroot",
 435         "unlink",
 436         "chmod",
 437         "utime",
 438         "rename",
 439         "link",
 440         "symlink",
 441         "readlink",
 442         "mkdir",
 443         "rmdir",
 444         "open_dir",
 445         "readdir",
 446         "telldir",
 447         "seekdir",
 448         "rewinddir",
 449         "closedir",
 450         "fork",
 451         "wait",
 452         "waitpid",
 453         "system",
 454         "exec",
 455         "kill",
 456         "getppid",
 457         "getpgrp",
 458         "setpgrp",
 459         "getpriority",
 460         "setpriority",
 461         "time",
 462         "tms",
 463         "localtime",
 464         "gmtime",
 465         "alarm",
 466         "sleep",
 467         "shmget",
 468         "shmctl",
 469         "shmread",
 470         "shmwrite",
 471         "msgget",
 472         "msgctl",
 473         "msgsnd",
 474         "msgrcv",
 475         "semop",
 476         "semget",
 477         "semctl",
 478         "require",
 479         "dofile",
 480         "hintseval",
 481         "entereval",
 482         "leaveeval",
 483         "entertry",
 484         "leavetry",
 485         "ghbyname",
 486         "ghbyaddr",
 487         "ghostent",
 488         "gnbyname",
 489         "gnbyaddr",
 490         "gnetent",
 491         "gpbyname",
 492         "gpbynumber",
 493         "gprotoent",
 494         "gsbyname",
 495         "gsbyport",
 496         "gservent",
 497         "shostent",
 498         "snetent",
 499         "sprotoent",
 500         "sservent",
 501         "ehostent",
 502         "enetent",
 503         "eprotoent",
 504         "eservent",
 505         "gpwnam",
 506         "gpwuid",
 507         "gpwent",
 508         "spwent",
 509         "epwent",
 510         "ggrnam",
 511         "ggrgid",
 512         "ggrent",
 513         "sgrent",
 514         "egrent",
 515         "getlogin",
 516         "syscall",
 517         "lock",
 518         "once",
 519         "custom",
 520         "reach",
 521         "rkeys",
 522         "rvalues",
 523         "coreargs",
 524         "runcv",
 525         "fc",
 526         "padcv",
 527         "introcv",
 528         "clonecv",
 529         "padrange",
 530         "refassign",
 531         "lvref",
 532         "freed",
 533 };
 534 #endif
 535
 536 #ifndef DOINIT
 537 EXTCONST char* const PL_op_desc[];
 538 #else
 539 EXTCONST char* const PL_op_desc[] = {
 540         "null operation",
 541         "stub",
 542         "scalar",
 543         "pushmark",
 544         "wantarray",
 545         "constant item",
 546         "scalar variable",
 547         "glob value",
 548         "glob elem",
 549         "private variable",
 550         "private array",
 551         "private hash",
 552         "private value",
 553         "push regexp",
 554         "ref-to-glob cast",
 555         "scalar dereference",
 556         "array length",
 557         "subroutine dereference",
 558         "anonymous subroutine",
 559         "subroutine prototype",
 560         "reference constructor",
 561         "single ref constructor",
 562         "reference-type operator",
 563         "bless",
 564         "quoted execution (``, qx)",
 565         "glob",
 566         "<HANDLE>",
 567         "append I/O operator",
 568         "regexp internal guard",
 569         "regexp internal reset",
 570         "regexp compilation",
 571         "pattern match (m//)",
 572         "pattern quote (qr//)",
 573         "substitution (s///)",
 574         "substitution iterator",
 575         "transliteration (tr///)",
 576         "transliteration (tr///)",
 577         "scalar assignment",
 578         "list assignment",
 579         "chop",
 580         "scalar chop",
 581         "chomp",
 582         "scalar chomp",
 583         "defined operator",
 584         "undef operator",
 585         "study",
 586         "match position",
 587         "preincrement (++)",
 588         "integer preincrement (++)",
 589         "predecrement (--)",
 590         "integer predecrement (--)",
 591         "postincrement (++)",
 592         "integer postincrement (++)",
 593         "postdecrement (--)",
 594         "integer postdecrement (--)",
 595         "exponentiation (**)",
 596         "multiplication (*)",
 597         "integer multiplication (*)",
 598         "division (/)",
 599         "integer division (/)",
 600         "modulus (%)",
 601         "integer modulus (%)",
 602         "repeat (x)",
 603         "addition (+)",
 604         "integer addition (+)",
 605         "subtraction (-)",
 606         "integer subtraction (-)",
 607         "concatenation (.) or string",
 608         "string",
 609         "left bitshift (<<)",
 610         "right bitshift (>>)",
 611         "numeric lt (<)",
 612         "integer lt (<)",
 613         "numeric gt (>)",
 614         "integer gt (>)",
 615         "numeric le (<=)",
 616         "integer le (<=)",
 617         "numeric ge (>=)",
 618         "integer ge (>=)",
 619         "numeric eq (==)",
 620         "integer eq (==)",
 621         "numeric ne (!=)",
 622         "integer ne (!=)",
 623         "numeric comparison (<=>)",
 624         "integer comparison (<=>)",
 625         "string lt",
 626         "string gt",
 627         "string le",
 628         "string ge",
 629         "string eq",
 630         "string ne",
 631         "string comparison (cmp)",
 632         "bitwise and (&)",
 633         "bitwise xor (^)",
 634         "bitwise or (|)",
 635         "negation (-)",
 636         "integer negation (-)",
 637         "not",
 638         "1's complement (~)",
 639         "smart match",
 640         "atan2",
 641         "sin",
 642         "cos",
 643         "rand",
 644         "srand",
 645         "exp",
 646         "log",
 647         "sqrt",
 648         "int",
 649         "hex",
 650         "oct",
 651         "abs",
 652         "length",
 653         "substr",
 654         "vec",
 655         "index",
 656         "rindex",
 657         "sprintf",
 658         "formline",
 659         "ord",
 660         "chr",
 661         "crypt",
 662         "ucfirst",
 663         "lcfirst",
 664         "uc",
 665         "lc",
 666         "quotemeta",
 667         "array dereference",
 668         "constant array element",
 669         "constant lexical array element",
 670         "array element",
 671         "array slice",
 672         "index/value array slice",
 673         "each on array",
 674         "keys on array",
 675         "values on array",
 676         "each",
 677         "values",
 678         "keys",
 679         "delete",
 680         "exists",
 681         "hash dereference",
 682         "hash element",
 683         "hash slice",
 684         "key/value hash slice",
 685         "unpack",
 686         "pack",
 687         "split",
 688         "join or string",
 689         "list",
 690         "list slice",
 691         "anonymous list ([])",
 692         "anonymous hash ({})",
 693         "splice",
 694         "push",
 695         "pop",
 696         "shift",
 697         "unshift",
 698         "sort",
 699         "reverse",
 700         "grep",
 701         "grep iterator",
 702         "map",
 703         "map iterator",
 704         "flipflop",
 705         "range (or flip)",
 706         "range (or flop)",
 707         "logical and (&&)",
 708         "logical or (||)",
 709         "logical xor",
 710         "defined or (//)",
 711         "conditional expression",
 712         "logical and assignment (&&=)",
 713         "logical or assignment (||=)",
 714         "defined or assignment (//=)",
 715         "method lookup",
 716         "subroutine entry",
 717         "subroutine exit",
 718         "lvalue subroutine return",
 719         "caller",
 720         "warn",
 721         "die",
 722         "symbol reset",
 723         "line sequence",
 724         "next statement",
 725         "debug next statement",
 726         "iteration finalizer",
 727         "block entry",
 728         "block exit",
 729         "block",
 730         "foreach loop entry",
 731         "foreach loop iterator",
 732         "loop entry",
 733         "loop exit",
 734         "return",
 735         "last",
 736         "next",
 737         "redo",
 738         "dump",
 739         "goto",
 740         "exit",
 741         "method with known name",
 742         "given()",
 743         "leave given block",
 744         "when()",
 745         "leave when block",
 746         "break",
 747         "continue",
 748         "open",
 749         "close",
 750         "pipe",
 751         "fileno",
 752         "umask",
 753         "binmode",
 754         "tie",
 755         "untie",
 756         "tied",
 757         "dbmopen",
 758         "dbmclose",
 759         "select system call",
 760         "select",
 761         "getc",
 762         "read",
 763         "write",
 764         "write exit",
 765         "printf",
 766         "print",
 767         "say",
 768         "sysopen",
 769         "sysseek",
 770         "sysread",
 771         "syswrite",
 772         "eof",
 773         "tell",
 774         "seek",
 775         "truncate",
 776         "fcntl",
 777         "ioctl",
 778         "flock",
 779         "send",
 780         "recv",
 781         "socket",
 782         "socketpair",
 783         "bind",
 784         "connect",
 785         "listen",
 786         "accept",
 787         "shutdown",
 788         "getsockopt",
 789         "setsockopt",
 790         "getsockname",
 791         "getpeername",
 792         "lstat",
 793         "stat",
 794         "-R",
 795         "-W",
 796         "-X",
 797         "-r",
 798         "-w",
 799         "-x",
 800         "-e",
 801         "-s",
 802         "-M",
 803         "-A",
 804         "-C",
 805         "-O",
 806         "-o",
 807         "-z",
 808         "-S",
 809         "-c",
 810         "-b",
 811         "-f",
 812         "-d",
 813         "-p",
 814         "-u",
 815         "-g",
 816         "-k",
 817         "-l",
 818         "-t",
 819         "-T",
 820         "-B",
 821         "chdir",
 822         "chown",
 823         "chroot",
 824         "unlink",
 825         "chmod",
 826         "utime",
 827         "rename",
 828         "link",
 829         "symlink",
 830         "readlink",
 831         "mkdir",
 832         "rmdir",
 833         "opendir",
 834         "readdir",
 835         "telldir",
 836         "seekdir",
 837         "rewinddir",
 838         "closedir",
 839         "fork",
 840         "wait",
 841         "waitpid",
 842         "system",
 843         "exec",
 844         "kill",
 845         "getppid",
 846         "getpgrp",
 847         "setpgrp",
 848         "getpriority",
 849         "setpriority",
 850         "time",
 851         "times",
 852         "localtime",
 853         "gmtime",
 854         "alarm",
 855         "sleep",
 856         "shmget",
 857         "shmctl",
 858         "shmread",
 859         "shmwrite",
 860         "msgget",
 861         "msgctl",
 862         "msgsnd",
 863         "msgrcv",
 864         "semop",
 865         "semget",
 866         "semctl",
 867         "require",
 868         "do \"file\"",
 869         "eval hints",
 870         "eval \"string\"",
 871         "eval \"string\" exit",
 872         "eval {block}",
 873         "eval {block} exit",
 874         "gethostbyname",
 875         "gethostbyaddr",
 876         "gethostent",
 877         "getnetbyname",
 878         "getnetbyaddr",
 879         "getnetent",
 880         "getprotobyname",
 881         "getprotobynumber",
 882         "getprotoent",
 883         "getservbyname",
 884         "getservbyport",
 885         "getservent",
 886         "sethostent",
 887         "setnetent",
 888         "setprotoent",
 889         "setservent",
 890         "endhostent",
 891         "endnetent",
 892         "endprotoent",
 893         "endservent",
 894         "getpwnam",
 895         "getpwuid",
 896         "getpwent",
 897         "setpwent",
 898         "endpwent",
 899         "getgrnam",
 900         "getgrgid",
 901         "getgrent",
 902         "setgrent",
 903         "endgrent",
 904         "getlogin",
 905         "syscall",
 906         "lock",
 907         "once",
 908         "unknown custom operator",
 909         "each on reference",
 910         "keys on reference",
 911         "values on reference",
 912         "CORE:: subroutine",
 913         "__SUB__",
 914         "fc",
 915         "private subroutine",
 916         "private subroutine",
 917         "private subroutine",
 918         "list of private variables",
 919         "lvalue ref assignment",
 920         "lvalue ref assignment",
 921         "freed op",
 922 };
 923 #endif
 924
 925 END_EXTERN_C
 926
 927 #endif /* !PERL_GLOBAL_STRUCT_INIT */
 928
 929 START_EXTERN_C
 930
 931 #ifdef PERL_GLOBAL_STRUCT_INIT
 932 #  define PERL_PPADDR_INITED
 933 static const Perl_ppaddr_t Gppaddr[]
 934 #else
 935 #  ifndef PERL_GLOBAL_STRUCT
 936 #    define PERL_PPADDR_INITED
 937 EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
 938 #  endif
 939 #endif /* PERL_GLOBAL_STRUCT */
 940 #if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
 941 #  define PERL_PPADDR_INITED
 942 = {
 943         Perl_pp_null,
 944         Perl_pp_stub,
 945         Perl_pp_scalar, /* implemented by Perl_pp_null */
 946         Perl_pp_pushmark,
 947         Perl_pp_wantarray,
 948         Perl_pp_const,
 949         Perl_pp_gvsv,
 950         Perl_pp_gv,
 951         Perl_pp_gelem,
 952         Perl_pp_padsv,
 953         Perl_pp_padav,
 954         Perl_pp_padhv,
 955         Perl_pp_padany, /* implemented by Perl_unimplemented_op */
 956         Perl_pp_pushre,
 957         Perl_pp_rv2gv,
 958         Perl_pp_rv2sv,
 959         Perl_pp_av2arylen,
 960         Perl_pp_rv2cv,
 961         Perl_pp_anoncode,
 962         Perl_pp_prototype,
 963         Perl_pp_refgen,
 964         Perl_pp_srefgen,
 965         Perl_pp_ref,
 966         Perl_pp_bless,
 967         Perl_pp_backtick,
 968         Perl_pp_glob,
 969         Perl_pp_readline,
 970         Perl_pp_rcatline,
 971         Perl_pp_regcmaybe,      /* implemented by Perl_pp_null */
 972         Perl_pp_regcreset,
 973         Perl_pp_regcomp,
 974         Perl_pp_match,
 975         Perl_pp_qr,
 976         Perl_pp_subst,
 977         Perl_pp_substcont,
 978         Perl_pp_trans,
 979         Perl_pp_transr, /* implemented by Perl_pp_trans */
 980         Perl_pp_sassign,
 981         Perl_pp_aassign,
 982         Perl_pp_chop,
 983         Perl_pp_schop,
 984         Perl_pp_chomp,  /* implemented by Perl_pp_chop */
 985         Perl_pp_schomp, /* implemented by Perl_pp_schop */
 986         Perl_pp_defined,
 987         Perl_pp_undef,
 988         Perl_pp_study,
 989         Perl_pp_pos,
 990         Perl_pp_preinc,
 991         Perl_pp_i_preinc,       /* implemented by Perl_pp_preinc */
 992         Perl_pp_predec, /* implemented by Perl_pp_preinc */
 993         Perl_pp_i_predec,       /* implemented by Perl_pp_preinc */
 994         Perl_pp_postinc,
 995         Perl_pp_i_postinc,      /* implemented by Perl_pp_postinc */
 996         Perl_pp_postdec,        /* implemented by Perl_pp_postinc */
 997         Perl_pp_i_postdec,      /* implemented by Perl_pp_postinc */
 998         Perl_pp_pow,
 999         Perl_pp_multiply,
1000         Perl_pp_i_multiply,
1001         Perl_pp_divide,
1002         Perl_pp_i_divide,
1003         Perl_pp_modulo,
1004         Perl_pp_i_modulo,
1005         Perl_pp_repeat,
1006         Perl_pp_add,
1007         Perl_pp_i_add,
1008         Perl_pp_subtract,
1009         Perl_pp_i_subtract,
1010         Perl_pp_concat,
1011         Perl_pp_stringify,
1012         Perl_pp_left_shift,
1013         Perl_pp_right_shift,
1014         Perl_pp_lt,
1015         Perl_pp_i_lt,
1016         Perl_pp_gt,
1017         Perl_pp_i_gt,
1018         Perl_pp_le,
1019         Perl_pp_i_le,
1020         Perl_pp_ge,
1021         Perl_pp_i_ge,
1022         Perl_pp_eq,
1023         Perl_pp_i_eq,
1024         Perl_pp_ne,
1025         Perl_pp_i_ne,
1026         Perl_pp_ncmp,
1027         Perl_pp_i_ncmp,
1028         Perl_pp_slt,    /* implemented by Perl_pp_sle */
1029         Perl_pp_sgt,    /* implemented by Perl_pp_sle */
1030         Perl_pp_sle,
1031         Perl_pp_sge,    /* implemented by Perl_pp_sle */
1032         Perl_pp_seq,
1033         Perl_pp_sne,
1034         Perl_pp_scmp,
1035         Perl_pp_bit_and,
1036         Perl_pp_bit_xor,        /* implemented by Perl_pp_bit_or */
1037         Perl_pp_bit_or,
1038         Perl_pp_negate,
1039         Perl_pp_i_negate,
1040         Perl_pp_not,
1041         Perl_pp_complement,
1042         Perl_pp_smartmatch,
1043         Perl_pp_atan2,
1044         Perl_pp_sin,
1045         Perl_pp_cos,    /* implemented by Perl_pp_sin */
1046         Perl_pp_rand,
1047         Perl_pp_srand,
1048         Perl_pp_exp,    /* implemented by Perl_pp_sin */
1049         Perl_pp_log,    /* implemented by Perl_pp_sin */
1050         Perl_pp_sqrt,   /* implemented by Perl_pp_sin */
1051         Perl_pp_int,
1052         Perl_pp_hex,    /* implemented by Perl_pp_oct */
1053         Perl_pp_oct,
1054         Perl_pp_abs,
1055         Perl_pp_length,
1056         Perl_pp_substr,
1057         Perl_pp_vec,
1058         Perl_pp_index,
1059         Perl_pp_rindex, /* implemented by Perl_pp_index */
1060         Perl_pp_sprintf,
1061         Perl_pp_formline,
1062         Perl_pp_ord,
1063         Perl_pp_chr,
1064         Perl_pp_crypt,
1065         Perl_pp_ucfirst,
1066         Perl_pp_lcfirst,        /* implemented by Perl_pp_ucfirst */
1067         Perl_pp_uc,
1068         Perl_pp_lc,
1069         Perl_pp_quotemeta,
1070         Perl_pp_rv2av,
1071         Perl_pp_aelemfast,
1072         Perl_pp_aelemfast_lex,  /* implemented by Perl_pp_aelemfast */
1073         Perl_pp_aelem,
1074         Perl_pp_aslice,
1075         Perl_pp_kvaslice,
1076         Perl_pp_aeach,
1077         Perl_pp_akeys,
1078         Perl_pp_avalues,        /* implemented by Perl_pp_akeys */
1079         Perl_pp_each,
1080         Perl_pp_values, /* implemented by Perl_do_kv */
1081         Perl_pp_keys,   /* implemented by Perl_do_kv */
1082         Perl_pp_delete,
1083         Perl_pp_exists,
1084         Perl_pp_rv2hv,  /* implemented by Perl_pp_rv2av */
1085         Perl_pp_helem,
1086         Perl_pp_hslice,
1087         Perl_pp_kvhslice,
1088         Perl_pp_unpack,
1089         Perl_pp_pack,
1090         Perl_pp_split,
1091         Perl_pp_join,
1092         Perl_pp_list,
1093         Perl_pp_lslice,
1094         Perl_pp_anonlist,
1095         Perl_pp_anonhash,
1096         Perl_pp_splice,
1097         Perl_pp_push,
1098         Perl_pp_pop,    /* implemented by Perl_pp_shift */
1099         Perl_pp_shift,
1100         Perl_pp_unshift,
1101         Perl_pp_sort,
1102         Perl_pp_reverse,
1103         Perl_pp_grepstart,
1104         Perl_pp_grepwhile,
1105         Perl_pp_mapstart,       /* implemented by Perl_unimplemented_op */
1106         Perl_pp_mapwhile,
1107         Perl_pp_range,
1108         Perl_pp_flip,
1109         Perl_pp_flop,
1110         Perl_pp_and,
1111         Perl_pp_or,
1112         Perl_pp_xor,
1113         Perl_pp_dor,    /* implemented by Perl_pp_defined */
1114         Perl_pp_cond_expr,
1115         Perl_pp_andassign,      /* implemented by Perl_pp_and */
1116         Perl_pp_orassign,       /* implemented by Perl_pp_or */
1117         Perl_pp_dorassign,      /* implemented by Perl_pp_defined */
1118         Perl_pp_method,
1119         Perl_pp_entersub,
1120         Perl_pp_leavesub,
1121         Perl_pp_leavesublv,
1122         Perl_pp_caller,
1123         Perl_pp_warn,
1124         Perl_pp_die,
1125         Perl_pp_reset,
1126         Perl_pp_lineseq,        /* implemented by Perl_pp_null */
1127         Perl_pp_nextstate,
1128         Perl_pp_dbstate,
1129         Perl_pp_unstack,
1130         Perl_pp_enter,
1131         Perl_pp_leave,
1132         Perl_pp_scope,  /* implemented by Perl_pp_null */
1133         Perl_pp_enteriter,
1134         Perl_pp_iter,
1135         Perl_pp_enterloop,
1136         Perl_pp_leaveloop,
1137         Perl_pp_return,
1138         Perl_pp_last,
1139         Perl_pp_next,
1140         Perl_pp_redo,
1141         Perl_pp_dump,   /* implemented by Perl_pp_goto */
1142         Perl_pp_goto,
1143         Perl_pp_exit,
1144         Perl_pp_method_named,
1145         Perl_pp_entergiven,
1146         Perl_pp_leavegiven,
1147         Perl_pp_enterwhen,
1148         Perl_pp_leavewhen,
1149         Perl_pp_break,
1150         Perl_pp_continue,
1151         Perl_pp_open,
1152         Perl_pp_close,
1153         Perl_pp_pipe_op,
1154         Perl_pp_fileno,
1155         Perl_pp_umask,
1156         Perl_pp_binmode,
1157         Perl_pp_tie,
1158         Perl_pp_untie,
1159         Perl_pp_tied,
1160         Perl_pp_dbmopen,
1161         Perl_pp_dbmclose,       /* implemented by Perl_pp_untie */
1162         Perl_pp_sselect,
1163         Perl_pp_select,
1164         Perl_pp_getc,
1165         Perl_pp_read,   /* implemented by Perl_pp_sysread */
1166         Perl_pp_enterwrite,
1167         Perl_pp_leavewrite,
1168         Perl_pp_prtf,
1169         Perl_pp_print,
1170         Perl_pp_say,    /* implemented by Perl_pp_print */
1171         Perl_pp_sysopen,
1172         Perl_pp_sysseek,
1173         Perl_pp_sysread,
1174         Perl_pp_syswrite,
1175         Perl_pp_eof,
1176         Perl_pp_tell,
1177         Perl_pp_seek,   /* implemented by Perl_pp_sysseek */
1178         Perl_pp_truncate,
1179         Perl_pp_fcntl,  /* implemented by Perl_pp_ioctl */
1180         Perl_pp_ioctl,
1181         Perl_pp_flock,
1182         Perl_pp_send,   /* implemented by Perl_pp_syswrite */
1183         Perl_pp_recv,   /* implemented by Perl_pp_sysread */
1184         Perl_pp_socket,
1185         Perl_pp_sockpair,
1186         Perl_pp_bind,
1187         Perl_pp_connect,        /* implemented by Perl_pp_bind */
1188         Perl_pp_listen,
1189         Perl_pp_accept,
1190         Perl_pp_shutdown,
1191         Perl_pp_gsockopt,       /* implemented by Perl_pp_ssockopt */
1192         Perl_pp_ssockopt,
1193         Perl_pp_getsockname,    /* implemented by Perl_pp_getpeername */
1194         Perl_pp_getpeername,
1195         Perl_pp_lstat,  /* implemented by Perl_pp_stat */
1196         Perl_pp_stat,
1197         Perl_pp_ftrread,
1198         Perl_pp_ftrwrite,       /* implemented by Perl_pp_ftrread */
1199         Perl_pp_ftrexec,        /* implemented by Perl_pp_ftrread */
1200         Perl_pp_fteread,        /* implemented by Perl_pp_ftrread */
1201         Perl_pp_ftewrite,       /* implemented by Perl_pp_ftrread */
1202         Perl_pp_fteexec,        /* implemented by Perl_pp_ftrread */
1203         Perl_pp_ftis,
1204         Perl_pp_ftsize, /* implemented by Perl_pp_ftis */
1205         Perl_pp_ftmtime,        /* implemented by Perl_pp_ftis */
1206         Perl_pp_ftatime,        /* implemented by Perl_pp_ftis */
1207         Perl_pp_ftctime,        /* implemented by Perl_pp_ftis */
1208         Perl_pp_ftrowned,
1209         Perl_pp_fteowned,       /* implemented by Perl_pp_ftrowned */
1210         Perl_pp_ftzero, /* implemented by Perl_pp_ftrowned */
1211         Perl_pp_ftsock, /* implemented by Perl_pp_ftrowned */
1212         Perl_pp_ftchr,  /* implemented by Perl_pp_ftrowned */
1213         Perl_pp_ftblk,  /* implemented by Perl_pp_ftrowned */
1214         Perl_pp_ftfile, /* implemented by Perl_pp_ftrowned */
1215         Perl_pp_ftdir,  /* implemented by Perl_pp_ftrowned */
1216         Perl_pp_ftpipe, /* implemented by Perl_pp_ftrowned */
1217         Perl_pp_ftsuid, /* implemented by Perl_pp_ftrowned */
1218         Perl_pp_ftsgid, /* implemented by Perl_pp_ftrowned */
1219         Perl_pp_ftsvtx, /* implemented by Perl_pp_ftrowned */
1220         Perl_pp_ftlink,
1221         Perl_pp_fttty,
1222         Perl_pp_fttext,
1223         Perl_pp_ftbinary,       /* implemented by Perl_pp_fttext */
1224         Perl_pp_chdir,
1225         Perl_pp_chown,
1226         Perl_pp_chroot,
1227         Perl_pp_unlink, /* implemented by Perl_pp_chown */
1228         Perl_pp_chmod,  /* implemented by Perl_pp_chown */
1229         Perl_pp_utime,  /* implemented by Perl_pp_chown */
1230         Perl_pp_rename,
1231         Perl_pp_link,
1232         Perl_pp_symlink,        /* implemented by Perl_pp_link */
1233         Perl_pp_readlink,
1234         Perl_pp_mkdir,
1235         Perl_pp_rmdir,
1236         Perl_pp_open_dir,
1237         Perl_pp_readdir,
1238         Perl_pp_telldir,
1239         Perl_pp_seekdir,
1240         Perl_pp_rewinddir,
1241         Perl_pp_closedir,
1242         Perl_pp_fork,
1243         Perl_pp_wait,
1244         Perl_pp_waitpid,
1245         Perl_pp_system,
1246         Perl_pp_exec,
1247         Perl_pp_kill,   /* implemented by Perl_pp_chown */
1248         Perl_pp_getppid,
1249         Perl_pp_getpgrp,
1250         Perl_pp_setpgrp,
1251         Perl_pp_getpriority,
1252         Perl_pp_setpriority,
1253         Perl_pp_time,
1254         Perl_pp_tms,
1255         Perl_pp_localtime,      /* implemented by Perl_pp_gmtime */
1256         Perl_pp_gmtime,
1257         Perl_pp_alarm,
1258         Perl_pp_sleep,
1259         Perl_pp_shmget, /* implemented by Perl_pp_semget */
1260         Perl_pp_shmctl, /* implemented by Perl_pp_semctl */
1261         Perl_pp_shmread,        /* implemented by Perl_pp_shmwrite */
1262         Perl_pp_shmwrite,
1263         Perl_pp_msgget, /* implemented by Perl_pp_semget */
1264         Perl_pp_msgctl, /* implemented by Perl_pp_semctl */
1265         Perl_pp_msgsnd, /* implemented by Perl_pp_shmwrite */
1266         Perl_pp_msgrcv, /* implemented by Perl_pp_shmwrite */
1267         Perl_pp_semop,  /* implemented by Perl_pp_shmwrite */
1268         Perl_pp_semget,
1269         Perl_pp_semctl,
1270         Perl_pp_require,
1271         Perl_pp_dofile, /* implemented by Perl_pp_require */
1272         Perl_pp_hintseval,
1273         Perl_pp_entereval,
1274         Perl_pp_leaveeval,
1275         Perl_pp_entertry,
1276         Perl_pp_leavetry,
1277         Perl_pp_ghbyname,       /* implemented by Perl_pp_ghostent */
1278         Perl_pp_ghbyaddr,       /* implemented by Perl_pp_ghostent */
1279         Perl_pp_ghostent,
1280         Perl_pp_gnbyname,       /* implemented by Perl_pp_gnetent */
1281         Perl_pp_gnbyaddr,       /* implemented by Perl_pp_gnetent */
1282         Perl_pp_gnetent,
1283         Perl_pp_gpbyname,       /* implemented by Perl_pp_gprotoent */
1284         Perl_pp_gpbynumber,     /* implemented by Perl_pp_gprotoent */
1285         Perl_pp_gprotoent,
1286         Perl_pp_gsbyname,       /* implemented by Perl_pp_gservent */
1287         Perl_pp_gsbyport,       /* implemented by Perl_pp_gservent */
1288         Perl_pp_gservent,
1289         Perl_pp_shostent,
1290         Perl_pp_snetent,        /* implemented by Perl_pp_shostent */
1291         Perl_pp_sprotoent,      /* implemented by Perl_pp_shostent */
1292         Perl_pp_sservent,       /* implemented by Perl_pp_shostent */
1293         Perl_pp_ehostent,
1294         Perl_pp_enetent,        /* implemented by Perl_pp_ehostent */
1295         Perl_pp_eprotoent,      /* implemented by Perl_pp_ehostent */
1296         Perl_pp_eservent,       /* implemented by Perl_pp_ehostent */
1297         Perl_pp_gpwnam, /* implemented by Perl_pp_gpwent */
1298         Perl_pp_gpwuid, /* implemented by Perl_pp_gpwent */
1299         Perl_pp_gpwent,
1300         Perl_pp_spwent, /* implemented by Perl_pp_ehostent */
1301         Perl_pp_epwent, /* implemented by Perl_pp_ehostent */
1302         Perl_pp_ggrnam, /* implemented by Perl_pp_ggrent */
1303         Perl_pp_ggrgid, /* implemented by Perl_pp_ggrent */
1304         Perl_pp_ggrent,
1305         Perl_pp_sgrent, /* implemented by Perl_pp_ehostent */
1306         Perl_pp_egrent, /* implemented by Perl_pp_ehostent */
1307         Perl_pp_getlogin,
1308         Perl_pp_syscall,
1309         Perl_pp_lock,
1310         Perl_pp_once,
1311         Perl_pp_custom, /* implemented by Perl_unimplemented_op */
1312         Perl_pp_reach,  /* implemented by Perl_pp_rkeys */
1313         Perl_pp_rkeys,
1314         Perl_pp_rvalues,        /* implemented by Perl_pp_rkeys */
1315         Perl_pp_coreargs,
1316         Perl_pp_runcv,
1317         Perl_pp_fc,
1318         Perl_pp_padcv,
1319         Perl_pp_introcv,
1320         Perl_pp_clonecv,
1321         Perl_pp_padrange,
1322         Perl_pp_refassign,
1323         Perl_pp_lvref,
1324 }
1325 #endif
1326 #ifdef PERL_PPADDR_INITED
1327 ;
1328 #endif
1329
1330 #ifdef PERL_GLOBAL_STRUCT_INIT
1331 #  define PERL_CHECK_INITED
1332 static const Perl_check_t Gcheck[]
1333 #else
1334 #  ifndef PERL_GLOBAL_STRUCT
1335 #    define PERL_CHECK_INITED
1336 EXT Perl_check_t PL_check[] /* or perlvars.h */
1337 #  endif
1338 #endif
1339 #if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
1340 #  define PERL_CHECK_INITED
1341 = {
1342         Perl_ck_null,           /* null */
1343         Perl_ck_null,           /* stub */
1344         Perl_ck_fun,            /* scalar */
1345         Perl_ck_null,           /* pushmark */
1346         Perl_ck_null,           /* wantarray */
1347         Perl_ck_svconst,        /* const */
1348         Perl_ck_null,           /* gvsv */
1349         Perl_ck_null,           /* gv */
1350         Perl_ck_null,           /* gelem */
1351         Perl_ck_null,           /* padsv */
1352         Perl_ck_null,           /* padav */
1353         Perl_ck_null,           /* padhv */
1354         Perl_ck_null,           /* padany */
1355         Perl_ck_null,           /* pushre */
1356         Perl_ck_rvconst,        /* rv2gv */
1357         Perl_ck_rvconst,        /* rv2sv */
1358         Perl_ck_null,           /* av2arylen */
1359         Perl_ck_rvconst,        /* rv2cv */
1360         Perl_ck_anoncode,       /* anoncode */
1361         Perl_ck_null,           /* prototype */
1362         Perl_ck_spair,          /* refgen */
1363         Perl_ck_null,           /* srefgen */
1364         Perl_ck_fun,            /* ref */
1365         Perl_ck_fun,            /* bless */
1366         Perl_ck_backtick,       /* backtick */
1367         Perl_ck_glob,           /* glob */
1368         Perl_ck_readline,       /* readline */
1369         Perl_ck_null,           /* rcatline */
1370         Perl_ck_fun,            /* regcmaybe */
1371         Perl_ck_fun,            /* regcreset */
1372         Perl_ck_null,           /* regcomp */
1373         Perl_ck_match,          /* match */
1374         Perl_ck_match,          /* qr */
1375         Perl_ck_match,          /* subst */
1376         Perl_ck_null,           /* substcont */
1377         Perl_ck_match,          /* trans */
1378         Perl_ck_match,          /* transr */
1379         Perl_ck_sassign,        /* sassign */
1380         Perl_ck_null,           /* aassign */
1381         Perl_ck_spair,          /* chop */
1382         Perl_ck_null,           /* schop */
1383         Perl_ck_spair,          /* chomp */
1384         Perl_ck_null,           /* schomp */
1385         Perl_ck_defined,        /* defined */
1386         Perl_ck_fun,            /* undef */
1387         Perl_ck_fun,            /* study */
1388         Perl_ck_fun,            /* pos */
1389         Perl_ck_lfun,           /* preinc */
1390         Perl_ck_lfun,           /* i_preinc */
1391         Perl_ck_lfun,           /* predec */
1392         Perl_ck_lfun,           /* i_predec */
1393         Perl_ck_lfun,           /* postinc */
1394         Perl_ck_lfun,           /* i_postinc */
1395         Perl_ck_lfun,           /* postdec */
1396         Perl_ck_lfun,           /* i_postdec */
1397         Perl_ck_null,           /* pow */
1398         Perl_ck_null,           /* multiply */
1399         Perl_ck_null,           /* i_multiply */
1400         Perl_ck_null,           /* divide */
1401         Perl_ck_null,           /* i_divide */
1402         Perl_ck_null,           /* modulo */
1403         Perl_ck_null,           /* i_modulo */
1404         Perl_ck_repeat,         /* repeat */
1405         Perl_ck_null,           /* add */
1406         Perl_ck_null,           /* i_add */
1407         Perl_ck_null,           /* subtract */
1408         Perl_ck_null,           /* i_subtract */
1409         Perl_ck_concat,         /* concat */
1410         Perl_ck_fun,            /* stringify */
1411         Perl_ck_bitop,          /* left_shift */
1412         Perl_ck_bitop,          /* right_shift */
1413         Perl_ck_cmp,            /* lt */
1414         Perl_ck_cmp,            /* i_lt */
1415         Perl_ck_cmp,            /* gt */
1416         Perl_ck_cmp,            /* i_gt */
1417         Perl_ck_cmp,            /* le */
1418         Perl_ck_cmp,            /* i_le */
1419         Perl_ck_cmp,            /* ge */
1420         Perl_ck_cmp,            /* i_ge */
1421         Perl_ck_null,           /* eq */
1422         Perl_ck_null,           /* i_eq */
1423         Perl_ck_null,           /* ne */
1424         Perl_ck_null,           /* i_ne */
1425         Perl_ck_null,           /* ncmp */
1426         Perl_ck_null,           /* i_ncmp */
1427         Perl_ck_null,           /* slt */
1428         Perl_ck_null,           /* sgt */
1429         Perl_ck_null,           /* sle */
1430         Perl_ck_null,           /* sge */
1431         Perl_ck_null,           /* seq */
1432         Perl_ck_null,           /* sne */
1433         Perl_ck_null,           /* scmp */
1434         Perl_ck_bitop,          /* bit_and */
1435         Perl_ck_bitop,          /* bit_xor */
1436         Perl_ck_bitop,          /* bit_or */
1437         Perl_ck_null,           /* negate */
1438         Perl_ck_null,           /* i_negate */
1439         Perl_ck_null,           /* not */
1440         Perl_ck_bitop,          /* complement */
1441         Perl_ck_smartmatch,     /* smartmatch */
1442         Perl_ck_fun,            /* atan2 */
1443         Perl_ck_fun,            /* sin */
1444         Perl_ck_fun,            /* cos */
1445         Perl_ck_fun,            /* rand */
1446         Perl_ck_fun,            /* srand */
1447         Perl_ck_fun,            /* exp */
1448         Perl_ck_fun,            /* log */
1449         Perl_ck_fun,            /* sqrt */
1450         Perl_ck_fun,            /* int */
1451         Perl_ck_fun,            /* hex */
1452         Perl_ck_fun,            /* oct */
1453         Perl_ck_fun,            /* abs */
1454         Perl_ck_length,         /* length */
1455         Perl_ck_substr,         /* substr */
1456         Perl_ck_fun,            /* vec */
1457         Perl_ck_index,          /* index */
1458         Perl_ck_index,          /* rindex */
1459         Perl_ck_lfun,           /* sprintf */
1460         Perl_ck_fun,            /* formline */
1461         Perl_ck_fun,            /* ord */
1462         Perl_ck_fun,            /* chr */
1463         Perl_ck_fun,            /* crypt */
1464         Perl_ck_fun,            /* ucfirst */
1465         Perl_ck_fun,            /* lcfirst */
1466         Perl_ck_fun,            /* uc */
1467         Perl_ck_fun,            /* lc */
1468         Perl_ck_fun,            /* quotemeta */
1469         Perl_ck_rvconst,        /* rv2av */
1470         Perl_ck_null,           /* aelemfast */
1471         Perl_ck_null,           /* aelemfast_lex */
1472         Perl_ck_null,           /* aelem */
1473         Perl_ck_null,           /* aslice */
1474         Perl_ck_null,           /* kvaslice */
1475         Perl_ck_each,           /* aeach */
1476         Perl_ck_each,           /* akeys */
1477         Perl_ck_each,           /* avalues */
1478         Perl_ck_each,           /* each */
1479         Perl_ck_each,           /* values */
1480         Perl_ck_each,           /* keys */
1481         Perl_ck_delete,         /* delete */
1482         Perl_ck_exists,         /* exists */
1483         Perl_ck_rvconst,        /* rv2hv */
1484         Perl_ck_null,           /* helem */
1485         Perl_ck_null,           /* hslice */
1486         Perl_ck_null,           /* kvhslice */
1487         Perl_ck_fun,            /* unpack */
1488         Perl_ck_fun,            /* pack */
1489         Perl_ck_split,          /* split */
1490         Perl_ck_join,           /* join */
1491         Perl_ck_null,           /* list */
1492         Perl_ck_null,           /* lslice */
1493         Perl_ck_fun,            /* anonlist */
1494         Perl_ck_fun,            /* anonhash */
1495         Perl_ck_fun,            /* splice */
1496         Perl_ck_fun,            /* push */
1497         Perl_ck_shift,          /* pop */
1498         Perl_ck_shift,          /* shift */
1499         Perl_ck_fun,            /* unshift */
1500         Perl_ck_sort,           /* sort */
1501         Perl_ck_fun,            /* reverse */
1502         Perl_ck_grep,           /* grepstart */
1503         Perl_ck_null,           /* grepwhile */
1504         Perl_ck_grep,           /* mapstart */
1505         Perl_ck_null,           /* mapwhile */
1506         Perl_ck_null,           /* range */
1507         Perl_ck_null,           /* flip */
1508         Perl_ck_null,           /* flop */
1509         Perl_ck_null,           /* and */
1510         Perl_ck_null,           /* or */
1511         Perl_ck_null,           /* xor */
1512         Perl_ck_null,           /* dor */
1513         Perl_ck_null,           /* cond_expr */
1514         Perl_ck_null,           /* andassign */
1515         Perl_ck_null,           /* orassign */
1516         Perl_ck_null,           /* dorassign */
1517         Perl_ck_method,         /* method */
1518         Perl_ck_subr,           /* entersub */
1519         Perl_ck_null,           /* leavesub */
1520         Perl_ck_null,           /* leavesublv */
1521         Perl_ck_fun,            /* caller */
1522         Perl_ck_fun,            /* warn */
1523         Perl_ck_fun,            /* die */
1524         Perl_ck_fun,            /* reset */
1525         Perl_ck_null,           /* lineseq */
1526         Perl_ck_null,           /* nextstate */
1527         Perl_ck_null,           /* dbstate */
1528         Perl_ck_null,           /* unstack */
1529         Perl_ck_null,           /* enter */
1530         Perl_ck_null,           /* leave */
1531         Perl_ck_null,           /* scope */
1532         Perl_ck_null,           /* enteriter */
1533         Perl_ck_null,           /* iter */
1534         Perl_ck_null,           /* enterloop */
1535         Perl_ck_null,           /* leaveloop */
1536         Perl_ck_return,         /* return */
1537         Perl_ck_null,           /* last */
1538         Perl_ck_null,           /* next */
1539         Perl_ck_null,           /* redo */
1540         Perl_ck_null,           /* dump */
1541         Perl_ck_null,           /* goto */
1542         Perl_ck_fun,            /* exit */
1543         Perl_ck_null,           /* method_named */
1544         Perl_ck_null,           /* entergiven */
1545         Perl_ck_null,           /* leavegiven */
1546         Perl_ck_null,           /* enterwhen */
1547         Perl_ck_null,           /* leavewhen */
1548         Perl_ck_null,           /* break */
1549         Perl_ck_null,           /* continue */
1550         Perl_ck_open,           /* open */
1551         Perl_ck_fun,            /* close */
1552         Perl_ck_fun,            /* pipe_op */
1553         Perl_ck_fun,            /* fileno */
1554         Perl_ck_fun,            /* umask */
1555         Perl_ck_fun,            /* binmode */
1556         Perl_ck_fun,            /* tie */
1557         Perl_ck_fun,            /* untie */
1558         Perl_ck_fun,            /* tied */
1559         Perl_ck_fun,            /* dbmopen */
1560         Perl_ck_fun,            /* dbmclose */
1561         Perl_ck_select,         /* sselect */
1562         Perl_ck_select,         /* select */
1563         Perl_ck_eof,            /* getc */
1564         Perl_ck_fun,            /* read */
1565         Perl_ck_fun,            /* enterwrite */
1566         Perl_ck_null,           /* leavewrite */
1567         Perl_ck_listiob,        /* prtf */
1568         Perl_ck_listiob,        /* print */
1569         Perl_ck_listiob,        /* say */
1570         Perl_ck_fun,            /* sysopen */
1571         Perl_ck_fun,            /* sysseek */
1572         Perl_ck_fun,            /* sysread */
1573         Perl_ck_fun,            /* syswrite */
1574         Perl_ck_eof,            /* eof */
1575         Perl_ck_tell,           /* tell */
1576         Perl_ck_tell,           /* seek */
1577         Perl_ck_trunc,          /* truncate */
1578         Perl_ck_fun,            /* fcntl */
1579         Perl_ck_fun,            /* ioctl */
1580         Perl_ck_fun,            /* flock */
1581         Perl_ck_fun,            /* send */
1582         Perl_ck_fun,            /* recv */
1583         Perl_ck_fun,            /* socket */
1584         Perl_ck_fun,            /* sockpair */
1585         Perl_ck_fun,            /* bind */
1586         Perl_ck_fun,            /* connect */
1587         Perl_ck_fun,            /* listen */
1588         Perl_ck_fun,            /* accept */
1589         Perl_ck_fun,            /* shutdown */
1590         Perl_ck_fun,            /* gsockopt */
1591         Perl_ck_fun,            /* ssockopt */
1592         Perl_ck_fun,            /* getsockname */
1593         Perl_ck_fun,            /* getpeername */
1594         Perl_ck_ftst,           /* lstat */
1595         Perl_ck_ftst,           /* stat */
1596         Perl_ck_ftst,           /* ftrread */
1597         Perl_ck_ftst,           /* ftrwrite */
1598         Perl_ck_ftst,           /* ftrexec */
1599         Perl_ck_ftst,           /* fteread */
1600         Perl_ck_ftst,           /* ftewrite */
1601         Perl_ck_ftst,           /* fteexec */
1602         Perl_ck_ftst,           /* ftis */
1603         Perl_ck_ftst,           /* ftsize */
1604         Perl_ck_ftst,           /* ftmtime */
1605         Perl_ck_ftst,           /* ftatime */
1606         Perl_ck_ftst,           /* ftctime */
1607         Perl_ck_ftst,           /* ftrowned */
1608         Perl_ck_ftst,           /* fteowned */
1609         Perl_ck_ftst,           /* ftzero */
1610         Perl_ck_ftst,           /* ftsock */
1611         Perl_ck_ftst,           /* ftchr */
1612         Perl_ck_ftst,           /* ftblk */
1613         Perl_ck_ftst,           /* ftfile */
1614         Perl_ck_ftst,           /* ftdir */
1615         Perl_ck_ftst,           /* ftpipe */
1616         Perl_ck_ftst,           /* ftsuid */
1617         Perl_ck_ftst,           /* ftsgid */
1618         Perl_ck_ftst,           /* ftsvtx */
1619         Perl_ck_ftst,           /* ftlink */
1620         Perl_ck_ftst,           /* fttty */
1621         Perl_ck_ftst,           /* fttext */
1622         Perl_ck_ftst,           /* ftbinary */
1623         Perl_ck_trunc,          /* chdir */
1624         Perl_ck_fun,            /* chown */
1625         Perl_ck_fun,            /* chroot */
1626         Perl_ck_fun,            /* unlink */
1627         Perl_ck_fun,            /* chmod */
1628         Perl_ck_fun,            /* utime */
1629         Perl_ck_fun,            /* rename */
1630         Perl_ck_fun,            /* link */
1631         Perl_ck_fun,            /* symlink */
1632         Perl_ck_fun,            /* readlink */
1633         Perl_ck_fun,            /* mkdir */
1634         Perl_ck_fun,            /* rmdir */
1635         Perl_ck_fun,            /* open_dir */
1636         Perl_ck_fun,            /* readdir */
1637         Perl_ck_fun,            /* telldir */
1638         Perl_ck_fun,            /* seekdir */
1639         Perl_ck_fun,            /* rewinddir */
1640         Perl_ck_fun,            /* closedir */
1641         Perl_ck_null,           /* fork */
1642         Perl_ck_null,           /* wait */
1643         Perl_ck_fun,            /* waitpid */
1644         Perl_ck_exec,           /* system */
1645         Perl_ck_exec,           /* exec */
1646         Perl_ck_fun,            /* kill */
1647         Perl_ck_null,           /* getppid */
1648         Perl_ck_fun,            /* getpgrp */
1649         Perl_ck_fun,            /* setpgrp */
1650         Perl_ck_fun,            /* getpriority */
1651         Perl_ck_fun,            /* setpriority */
1652         Perl_ck_null,           /* time */
1653         Perl_ck_null,           /* tms */
1654         Perl_ck_fun,            /* localtime */
1655         Perl_ck_fun,            /* gmtime */
1656         Perl_ck_fun,            /* alarm */
1657         Perl_ck_fun,            /* sleep */
1658         Perl_ck_fun,            /* shmget */
1659         Perl_ck_fun,            /* shmctl */
1660         Perl_ck_fun,            /* shmread */
1661         Perl_ck_fun,            /* shmwrite */
1662         Perl_ck_fun,            /* msgget */
1663         Perl_ck_fun,            /* msgctl */
1664         Perl_ck_fun,            /* msgsnd */
1665         Perl_ck_fun,            /* msgrcv */
1666         Perl_ck_fun,            /* semop */
1667         Perl_ck_fun,            /* semget */
1668         Perl_ck_fun,            /* semctl */
1669         Perl_ck_require,        /* require */
1670         Perl_ck_fun,            /* dofile */
1671         Perl_ck_svconst,        /* hintseval */
1672         Perl_ck_eval,           /* entereval */
1673         Perl_ck_null,           /* leaveeval */
1674         Perl_ck_eval,           /* entertry */
1675         Perl_ck_null,           /* leavetry */
1676         Perl_ck_fun,            /* ghbyname */
1677         Perl_ck_fun,            /* ghbyaddr */
1678         Perl_ck_null,           /* ghostent */
1679         Perl_ck_fun,            /* gnbyname */
1680         Perl_ck_fun,            /* gnbyaddr */
1681         Perl_ck_null,           /* gnetent */
1682         Perl_ck_fun,            /* gpbyname */
1683         Perl_ck_fun,            /* gpbynumber */
1684         Perl_ck_null,           /* gprotoent */
1685         Perl_ck_fun,            /* gsbyname */
1686         Perl_ck_fun,            /* gsbyport */
1687         Perl_ck_null,           /* gservent */
1688         Perl_ck_fun,            /* shostent */
1689         Perl_ck_fun,            /* snetent */
1690         Perl_ck_fun,            /* sprotoent */
1691         Perl_ck_fun,            /* sservent */
1692         Perl_ck_null,           /* ehostent */
1693         Perl_ck_null,           /* enetent */
1694         Perl_ck_null,           /* eprotoent */
1695         Perl_ck_null,           /* eservent */
1696         Perl_ck_fun,            /* gpwnam */
1697         Perl_ck_fun,            /* gpwuid */
1698         Perl_ck_null,           /* gpwent */
1699         Perl_ck_null,           /* spwent */
1700         Perl_ck_null,           /* epwent */
1701         Perl_ck_fun,            /* ggrnam */
1702         Perl_ck_fun,            /* ggrgid */
1703         Perl_ck_null,           /* ggrent */
1704         Perl_ck_null,           /* sgrent */
1705         Perl_ck_null,           /* egrent */
1706         Perl_ck_null,           /* getlogin */
1707         Perl_ck_fun,            /* syscall */
1708         Perl_ck_rfun,           /* lock */
1709         Perl_ck_null,           /* once */
1710         Perl_ck_null,           /* custom */
1711         Perl_ck_each,           /* reach */
1712         Perl_ck_each,           /* rkeys */
1713         Perl_ck_each,           /* rvalues */
1714         Perl_ck_null,           /* coreargs */
1715         Perl_ck_null,           /* runcv */
1716         Perl_ck_fun,            /* fc */
1717         Perl_ck_null,           /* padcv */
1718         Perl_ck_null,           /* introcv */
1719         Perl_ck_null,           /* clonecv */
1720         Perl_ck_null,           /* padrange */
1721         Perl_ck_refassign,      /* refassign */
1722         Perl_ck_null,           /* lvref */
1723 }
1724 #endif
1725 #ifdef PERL_CHECK_INITED
1726 ;
1727 #endif /* #ifdef PERL_CHECK_INITED */
1728
1729 #ifndef PERL_GLOBAL_STRUCT_INIT
1730
1731 #ifndef DOINIT
1732 EXTCONST U32 PL_opargs[];
1733 #else
1734 EXTCONST U32 PL_opargs[] = {
1735         0x00000000,     /* null */
1736         0x00000000,     /* stub */
1737         0x00001b04,     /* scalar */
1738         0x00000004,     /* pushmark */
1739         0x00000004,     /* wantarray */
1740         0x00000604,     /* const */
1741         0x00000644,     /* gvsv */
1742         0x00000644,     /* gv */
1743         0x00011240,     /* gelem */
1744         0x00000044,     /* padsv */
1745         0x00000040,     /* padav */
1746         0x00000040,     /* padhv */
1747         0x00000040,     /* padany */
1748         0x00000540,     /* pushre */
1749         0x00000144,     /* rv2gv */
1750         0x00000144,     /* rv2sv */
1751         0x00000104,     /* av2arylen */
1752         0x00000140,     /* rv2cv */
1753         0x00000600,     /* anoncode */
1754         0x00001b04,     /* prototype */
1755         0x00002101,     /* refgen */
1756         0x00001106,     /* srefgen */
1757         0x00009b8c,     /* ref */
1758         0x00091404,     /* bless */
1759         0x00009b88,     /* backtick */
1760         0x00009408,     /* glob */
1761         0x0000eb08,     /* readline */
1762         0x00000608,     /* rcatline */
1763         0x00001104,     /* regcmaybe */
1764         0x00001104,     /* regcreset */
1765         0x00001304,     /* regcomp */
1766         0x00000540,     /* match */
1767         0x00000504,     /* qr */
1768         0x00001544,     /* subst */
1769         0x00000344,     /* substcont */
1770         0x00001804,     /* trans */
1771         0x00001804,     /* transr */
1772         0x00000004,     /* sassign */
1773         0x00022208,     /* aassign */
1774         0x00002b0d,     /* chop */
1775         0x00009b8c,     /* schop */
1776         0x00002b1d,     /* chomp */
1777         0x00009b9c,     /* schomp */
1778         0x00009b84,     /* defined */
1779         0x0000fb04,     /* undef */
1780         0x00009b84,     /* study */
1781         0x0000fb8c,     /* pos */
1782         0x00001164,     /* preinc */
1783         0x00001144,     /* i_preinc */
1784         0x00001164,     /* predec */
1785         0x00001144,     /* i_predec */
1786         0x0000116c,     /* postinc */
1787         0x0000115c,     /* i_postinc */
1788         0x0000116c,     /* postdec */
1789         0x0000115c,     /* i_postdec */
1790         0x0001121e,     /* pow */
1791         0x0001123e,     /* multiply */
1792         0x0001121e,     /* i_multiply */
1793         0x0001123e,     /* divide */
1794         0x0001121e,     /* i_divide */
1795         0x0001123e,     /* modulo */
1796         0x0001121e,     /* i_modulo */
1797         0x0001220b,     /* repeat */
1798         0x0001123e,     /* add */
1799         0x0001121e,     /* i_add */
1800         0x0001123e,     /* subtract */
1801         0x0001121e,     /* i_subtract */
1802         0x0001121e,     /* concat */
1803         0x0000141e,     /* stringify */
1804         0x0001121e,     /* left_shift */
1805         0x0001121e,     /* right_shift */
1806         0x00011226,     /* lt */
1807         0x00011206,     /* i_lt */
1808         0x00011226,     /* gt */
1809         0x00011206,     /* i_gt */
1810         0x00011226,     /* le */
1811         0x00011206,     /* i_le */
1812         0x00011226,     /* ge */
1813         0x00011206,     /* i_ge */
1814         0x00011226,     /* eq */
1815         0x00011206,     /* i_eq */
1816         0x00011226,     /* ne */
1817         0x00011206,     /* i_ne */
1818         0x0001122e,     /* ncmp */
1819         0x0001120e,     /* i_ncmp */
1820         0x00011206,     /* slt */
1821         0x00011206,     /* sgt */
1822         0x00011206,     /* sle */
1823         0x00011206,     /* sge */
1824         0x00011206,     /* seq */
1825         0x00011206,     /* sne */
1826         0x0001120e,     /* scmp */
1827         0x0001120e,     /* bit_and */
1828         0x0001120e,     /* bit_xor */
1829         0x0001120e,     /* bit_or */
1830         0x0000112e,     /* negate */
1831         0x0000111e,     /* i_negate */
1832         0x00001106,     /* not */
1833         0x0000110e,     /* complement */
1834         0x00000204,     /* smartmatch */
1835         0x0001141e,     /* atan2 */
1836         0x00009b9e,     /* sin */
1837         0x00009b9e,     /* cos */
1838         0x00009b1c,     /* rand */
1839         0x00009b1c,     /* srand */
1840         0x00009b9e,     /* exp */
1841         0x00009b9e,     /* log */
1842         0x00009b9e,     /* sqrt */
1843         0x00009b9e,     /* int */
1844         0x00009b9e,     /* hex */
1845         0x00009b9e,     /* oct */
1846         0x00009b9e,     /* abs */
1847         0x00009b9e,     /* length */
1848         0x0991140c,     /* substr */
1849         0x0011140c,     /* vec */
1850         0x0091141c,     /* index */
1851         0x0091141c,     /* rindex */
1852         0x0002140f,     /* sprintf */
1853         0x00021405,     /* formline */
1854         0x00009b9e,     /* ord */
1855         0x00009b9e,     /* chr */
1856         0x0001141e,     /* crypt */
1857         0x00009b8e,     /* ucfirst */
1858         0x00009b8e,     /* lcfirst */
1859         0x00009b8e,     /* uc */
1860         0x00009b8e,     /* lc */
1861         0x00009b8e,     /* quotemeta */
1862         0x00000148,     /* rv2av */
1863         0x00013604,     /* aelemfast */
1864         0x00013040,     /* aelemfast_lex */
1865         0x00013204,     /* aelem */
1866         0x00023401,     /* aslice */
1867         0x00023401,     /* kvaslice */
1868         0x00003b00,     /* aeach */
1869         0x00003b08,     /* akeys */
1870         0x00003b08,     /* avalues */
1871         0x00004b00,     /* each */
1872         0x00004b08,     /* values */
1873         0x00004b08,     /* keys */
1874         0x00001b00,     /* delete */
1875         0x00001b04,     /* exists */
1876         0x00000140,     /* rv2hv */
1877         0x00014204,     /* helem */
1878         0x00024401,     /* hslice */
1879         0x00024401,     /* kvhslice */
1880         0x00091480,     /* unpack */
1881         0x0002140f,     /* pack */
1882         0x00111408,     /* split */
1883         0x0002140d,     /* join */
1884         0x00002401,     /* list */
1885         0x00224200,     /* lslice */
1886         0x00002405,     /* anonlist */
1887         0x00002405,     /* anonhash */
1888         0x02993401,     /* splice */
1889         0x0002341d,     /* push */
1890         0x0000bb04,     /* pop */
1891         0x0000bb04,     /* shift */
1892         0x0002341d,     /* unshift */
1893         0x0002d441,     /* sort */
1894         0x00002409,     /* reverse */
1895         0x00025441,     /* grepstart */
1896         0x00000348,     /* grepwhile */
1897         0x00025441,     /* mapstart */
1898         0x00000348,     /* mapwhile */
1899         0x00011300,     /* range */
1900         0x00011100,     /* flip */
1901         0x00000100,     /* flop */
1902         0x00000300,     /* and */
1903         0x00000300,     /* or */
1904         0x00011206,     /* xor */
1905         0x00000300,     /* dor */
1906         0x00000340,     /* cond_expr */
1907         0x00000304,     /* andassign */
1908         0x00000304,     /* orassign */
1909         0x00000304,     /* dorassign */
1910         0x00000e40,     /* method */
1911         0x00002149,     /* entersub */
1912         0x00000100,     /* leavesub */
1913         0x00000100,     /* leavesublv */
1914         0x00009b08,     /* caller */
1915         0x0000240d,     /* warn */
1916         0x0000244d,     /* die */
1917         0x00009b04,     /* reset */
1918         0x00000400,     /* lineseq */
1919         0x00000a04,     /* nextstate */
1920         0x00000a04,     /* dbstate */
1921         0x00000004,     /* unstack */
1922         0x00000000,     /* enter */
1923         0x00000400,     /* leave */
1924         0x00000400,     /* scope */
1925         0x00000940,     /* enteriter */
1926         0x00000000,     /* iter */
1927         0x00000940,     /* enterloop */
1928         0x00000200,     /* leaveloop */
1929         0x00002441,     /* return */
1930         0x00000d44,     /* last */
1931         0x00000d44,     /* next */
1932         0x00000d44,     /* redo */
1933         0x00000d44,     /* dump */
1934         0x00000d44,     /* goto */
1935         0x00009b44,     /* exit */
1936         0x00000e40,     /* method_named */
1937         0x00000340,     /* entergiven */
1938         0x00000100,     /* leavegiven */
1939         0x00000340,     /* enterwhen */
1940         0x00000100,     /* leavewhen */
1941         0x00000000,     /* break */
1942         0x00000000,     /* continue */
1943         0x0029640d,     /* open */
1944         0x0000eb04,     /* close */
1945         0x00066404,     /* pipe_op */
1946         0x00006b0c,     /* fileno */
1947         0x00009b0c,     /* umask */
1948         0x00096404,     /* binmode */
1949         0x00217445,     /* tie */
1950         0x00007b04,     /* untie */
1951         0x00007b04,     /* tied */
1952         0x00114404,     /* dbmopen */
1953         0x00004b04,     /* dbmclose */
1954         0x01111408,     /* sselect */
1955         0x0000e40c,     /* select */
1956         0x0000eb0c,     /* getc */
1957         0x0917640d,     /* read */
1958         0x0000eb44,     /* enterwrite */
1959         0x00000100,     /* leavewrite */
1960         0x0002e405,     /* prtf */
1961         0x0002e405,     /* print */
1962         0x0002e405,     /* say */
1963         0x09116404,     /* sysopen */
1964         0x00116404,     /* sysseek */
1965         0x0917640d,     /* sysread */
1966         0x0991640d,     /* syswrite */
1967         0x0000eb04,     /* eof */
1968         0x0000eb0c,     /* tell */
1969         0x00116404,     /* seek */
1970         0x00011404,     /* truncate */
1971         0x0011640c,     /* fcntl */
1972         0x0011640c,     /* ioctl */
1973         0x0001641c,     /* flock */
1974         0x0911640d,     /* send */
1975         0x0117640d,     /* recv */
1976         0x01116404,     /* socket */
1977         0x11166404,     /* sockpair */
1978         0x00016404,     /* bind */
1979         0x00016404,     /* connect */
1980         0x00016404,     /* listen */
1981         0x0006640c,     /* accept */
1982         0x0001640c,     /* shutdown */
1983         0x00116404,     /* gsockopt */
1984         0x01116404,     /* ssockopt */
1985         0x00006b04,     /* getsockname */
1986         0x00006b04,     /* getpeername */
1987         0x0000ec80,     /* lstat */
1988         0x0000ec80,     /* stat */
1989         0x00006c84,     /* ftrread */
1990         0x00006c84,     /* ftrwrite */
1991         0x00006c84,     /* ftrexec */
1992         0x00006c84,     /* fteread */
1993         0x00006c84,     /* ftewrite */
1994         0x00006c84,     /* fteexec */
1995         0x00006c84,     /* ftis */
1996         0x00006c8c,     /* ftsize */
1997         0x00006c8c,     /* ftmtime */
1998         0x00006c8c,     /* ftatime */
1999         0x00006c8c,     /* ftctime */
2000         0x00006c84,     /* ftrowned */
2001         0x00006c84,     /* fteowned */
2002         0x00006c84,     /* ftzero */
2003         0x00006c84,     /* ftsock */
2004         0x00006c84,     /* ftchr */
2005         0x00006c84,     /* ftblk */
2006         0x00006c84,     /* ftfile */
2007         0x00006c84,     /* ftdir */
2008         0x00006c84,     /* ftpipe */
2009         0x00006c84,     /* ftsuid */
2010         0x00006c84,     /* ftsgid */
2011         0x00006c84,     /* ftsvtx */
2012         0x00006c84,     /* ftlink */
2013         0x00006c04,     /* fttty */
2014         0x00006c84,     /* fttext */
2015         0x00006c84,     /* ftbinary */
2016         0x00009b1c,     /* chdir */
2017         0x0000241d,     /* chown */
2018         0x00009b9c,     /* chroot */
2019         0x0000249d,     /* unlink */
2020         0x0000241d,     /* chmod */
2021         0x0000241d,     /* utime */
2022         0x0001141c,     /* rename */
2023         0x0001141c,     /* link */
2024         0x0001141c,     /* symlink */
2025         0x00009b8c,     /* readlink */
2026         0x0009949c,     /* mkdir */
2027         0x00009b9c,     /* rmdir */
2028         0x00016404,     /* open_dir */
2029         0x00006b00,     /* readdir */
2030         0x00006b0c,     /* telldir */
2031         0x00016404,     /* seekdir */
2032         0x00006b04,     /* rewinddir */
2033         0x00006b04,     /* closedir */
2034         0x0000000c,     /* fork */
2035         0x0000001c,     /* wait */
2036         0x0001141c,     /* waitpid */
2037         0x0002941d,     /* system */
2038         0x0002945d,     /* exec */
2039         0x0000245d,     /* kill */
2040         0x0000001c,     /* getppid */
2041         0x00009b1c,     /* getpgrp */
2042         0x0009941c,     /* setpgrp */
2043         0x0001141c,     /* getpriority */
2044         0x0011141c,     /* setpriority */
2045         0x0000001c,     /* time */
2046         0x00000000,     /* tms */
2047         0x00009b08,     /* localtime */
2048         0x00009b08,     /* gmtime */
2049         0x00009b8c,     /* alarm */
2050         0x00009b1c,     /* sleep */
2051         0x0011140d,     /* shmget */
2052         0x0011140d,     /* shmctl */
2053         0x0111140d,     /* shmread */
2054         0x0111140d,     /* shmwrite */
2055         0x0001140d,     /* msgget */
2056         0x0011140d,     /* msgctl */
2057         0x0011140d,     /* msgsnd */
2058         0x1111140d,     /* msgrcv */
2059         0x0001140d,     /* semop */
2060         0x0011140d,     /* semget */
2061         0x0111140d,     /* semctl */
2062         0x00009bc0,     /* require */
2063         0x00001140,     /* dofile */
2064         0x00000604,     /* hintseval */
2065         0x00009bc0,     /* entereval */
2066         0x00001100,     /* leaveeval */
2067         0x00000340,     /* entertry */
2068         0x00000400,     /* leavetry */
2069         0x00001b00,     /* ghbyname */
2070         0x00011400,     /* ghbyaddr */
2071         0x00000000,     /* ghostent */
2072         0x00001b00,     /* gnbyname */
2073         0x00011400,     /* gnbyaddr */
2074         0x00000000,     /* gnetent */
2075         0x00001b00,     /* gpbyname */
2076         0x00001400,     /* gpbynumber */
2077         0x00000000,     /* gprotoent */
2078         0x00011400,     /* gsbyname */
2079         0x00011400,     /* gsbyport */
2080         0x00000000,     /* gservent */
2081         0x00001b04,     /* shostent */
2082         0x00001b04,     /* snetent */
2083         0x00001b04,     /* sprotoent */
2084         0x00001b04,     /* sservent */
2085         0x00000004,     /* ehostent */
2086         0x00000004,     /* enetent */
2087         0x00000004,     /* eprotoent */
2088         0x00000004,     /* eservent */
2089         0x00001b00,     /* gpwnam */
2090         0x00001b00,     /* gpwuid */
2091         0x00000000,     /* gpwent */
2092         0x00000004,     /* spwent */
2093         0x00000004,     /* epwent */
2094         0x00001b00,     /* ggrnam */
2095         0x00001b00,     /* ggrgid */
2096         0x00000000,     /* ggrent */
2097         0x00000004,     /* sgrent */
2098         0x00000004,     /* egrent */
2099         0x0000000c,     /* getlogin */
2100         0x0002140d,     /* syscall */
2101         0x00007b04,     /* lock */
2102         0x00000300,     /* once */
2103         0x00000000,     /* custom */
2104         0x00001b00,     /* reach */
2105         0x00001b08,     /* rkeys */
2106         0x00001b08,     /* rvalues */
2107         0x00000600,     /* coreargs */
2108         0x00000004,     /* runcv */
2109         0x00009b8e,     /* fc */
2110         0x00000040,     /* padcv */
2111         0x00000040,     /* introcv */
2112         0x00000040,     /* clonecv */
2113         0x00000040,     /* padrange */
2114         0x00000240,     /* refassign */
2115         0x00000140,     /* lvref */
2116 };
2117 #endif
2118
2119 #endif /* !PERL_GLOBAL_STRUCT_INIT */
2120
2121 END_EXTERN_C
2122
2123
2124 #define OPpARG1_MASK            0x01
2125 #define OPpCOREARGS_DEREF1      0x01
2126 #define OPpENTERSUB_INARGS      0x01
2127 #define OPpSORT_NUMERIC         0x01
2128 #define OPpTRANS_FROM_UTF       0x01
2129 #define OPpCONST_NOVER          0x02
2130 #define OPpCOREARGS_DEREF2      0x02
2131 #define OPpEVAL_HAS_HH          0x02
2132 #define OPpFT_ACCESS            0x02
2133 #define OPpGREP_LEX             0x02
2134 #define OPpHINT_STRICT_REFS     0x02
2135 #define OPpSORT_INTEGER         0x02
2136 #define OPpTRANS_TO_UTF         0x02
2137 #define OPpARG2_MASK            0x03
2138 #define OPpCONST_SHORTCIRCUIT   0x04
2139 #define OPpDONT_INIT_GV         0x04
2140 #define OPpENTERSUB_HASTARG     0x04
2141 #define OPpEVAL_UNICODE         0x04
2142 #define OPpFT_STACKED           0x04
2143 #define OPpITER_REVERSED        0x04
2144 #define OPpLVREF_ELEM           0x04
2145 #define OPpSLICEWARNING         0x04
2146 #define OPpSORT_REVERSE         0x04
2147 #define OPpTRANS_IDENTICAL      0x04
2148 #define OPpARG3_MASK            0x07
2149 #define OPpPADRANGE_COUNTSHIFT  0x07
2150 #define OPpCONST_STRICT         0x08
2151 #define OPpENTERSUB_AMPER       0x08
2152 #define OPpEVAL_BYTES           0x08
2153 #define OPpFT_STACKING          0x08
2154 #define OPpITER_DEF             0x08
2155 #define OPpMAYBE_LVSUB          0x08
2156 #define OPpREVERSE_INPLACE      0x08
2157 #define OPpSORT_INPLACE         0x08
2158 #define OPpTRANS_SQUASH         0x08
2159 #define OPpARG4_MASK            0x0f
2160 #define OPpALLOW_FAKE           0x10
2161 #define OPpCONST_ENTERED        0x10
2162 #define OPpENTERSUB_DB          0x10
2163 #define OPpEVAL_COPHH           0x10
2164 #define OPpFT_AFTER_t           0x10
2165 #define OPpLVAL_DEFER           0x10
2166 #define OPpOPEN_IN_RAW          0x10
2167 #define OPpOUR_INTRO            0x10
2168 #define OPpPAD_STATE            0x10
2169 #define OPpSORT_DESCEND         0x10
2170 #define OPpSUBSTR_REPL_FIRST    0x10
2171 #define OPpTARGET_MY            0x10
2172 #define OPpDEREF_AV             0x20
2173 #define OPpEARLY_CV             0x20
2174 #define OPpEVAL_RE_REPARSING    0x20
2175 #define OPpHUSH_VMSISH          0x20
2176 #define OPpOPEN_IN_CRLF         0x20
2177 #define OPpSORT_QSORT           0x20
2178 #define OPpTRANS_COMPLEMENT     0x20
2179 #define OPpTRUEBOOL             0x20
2180 #define OPpASSIGN_BACKWARDS     0x40
2181 #define OPpASSIGN_COMMON        0x40
2182 #define OPpCONST_BARE           0x40
2183 #define OPpCOREARGS_SCALARMOD   0x40
2184 #define OPpDEREF_HV             0x40
2185 #define OPpEXISTS_SUB           0x40
2186 #define OPpFLIP_LINENUM         0x40
2187 #define OPpHINT_M_VMSISH_STATUS 0x40
2188 #define OPpLIST_GUESSED         0x40
2189 #define OPpMAYBE_TRUEBOOL       0x40
2190 #define OPpMAY_RETURN_CONSTANT  0x40
2191 #define OPpOPEN_OUT_RAW         0x40
2192 #define OPpREFCOUNTED           0x40
2193 #define OPpREPEAT_DOLIST        0x40
2194 #define OPpRUNTIME              0x40
2195 #define OPpSLICE                0x40
2196 #define OPpSORT_STABLE          0x40
2197 #define OPpTRANS_GROWS          0x40
2198 #define OPpDEREF                0x60
2199 #define OPpDEREF_SV             0x60
2200 #define OPpPADRANGE_COUNTMASK   0x7f
2201 #define OPpASSIGN_CV_TO_GV      0x80
2202 #define OPpCOREARGS_PUSHMARK    0x80
2203 #define OPpENTERSUB_NOPAREN     0x80
2204 #define OPpHINT_M_VMSISH_TIME   0x80
2205 #define OPpLVALUE               0x80
2206 #define OPpLVAL_INTRO           0x80
2207 #define OPpOFFBYONE             0x80
2208 #define OPpOPEN_OUT_CRLF        0x80
2209 #define OPpPV_IS_UTF8           0x80
2210 #define OPpSPLIT_IMPLIM         0x80
2211 #define OPpTRANS_DELETE         0x80
2212 START_EXTERN_C
2213
2214 #ifndef PERL_GLOBAL_STRUCT_INIT
2215
2216 #  ifndef DOINIT
2217
2218 /* data about the flags in op_private */
2219
2220 EXTCONST I16  PL_op_private_bitdef_ix[];
2221 EXTCONST U16  PL_op_private_bitdefs[];
2222 EXTCONST char PL_op_private_labels[];
2223 EXTCONST I16  PL_op_private_bitfields[];
2224 EXTCONST U8   PL_op_private_valid[];
2225
2226 #  else
2227
2228
2229 /* PL_op_private_labels[]: the short descriptions of private flags.
2230  * All labels are concatenated into a single char array
2231  * (separated by \0's) for compactness.
2232  */
2233
2234 EXTCONST char PL_op_private_labels[] = {
2235     '$','M','O','D','\0',
2236     '+','1','\0',
2237     '-','\0',
2238     '<','U','T','F','\0',
2239     '>','U','T','F','\0',
2240     'A','M','P','E','R','\0',
2241     'B','A','R','E','\0',
2242     'B','K','W','A','R','D','\0',
2243     'B','O','O','L','\0',
2244     'B','O','O','L','?','\0',
2245     'B','Y','T','E','S','\0',
2246     'C','O','M','M','O','N','\0',
2247     'C','O','M','P','L','\0',
2248     'C','O','N','S','T','\0',
2249     'C','O','P','H','H','\0',
2250     'C','V','2','G','V','\0',
2251     'D','B','G','\0',
2252     'D','E','F','\0',
2253     'D','E','L','\0',
2254     'D','E','R','E','F','1','\0',
2255     'D','E','R','E','F','2','\0',
2256     'D','E','S','C','\0',
2257     'D','O','L','I','S','T','\0',
2258     'D','R','E','F','A','V','\0',
2259     'D','R','E','F','H','V','\0',
2260     'D','R','E','F','S','V','\0',
2261     'E','A','R','L','Y','C','V','\0',
2262     'E','L','E','M','\0',
2263     'E','N','T','E','R','E','D','\0',
2264     'F','A','K','E','\0',
2265     'F','T','A','C','C','E','S','S','\0',
2266     'F','T','A','F','T','E','R','t','\0',
2267     'F','T','S','T','A','C','K','E','D','\0',
2268     'F','T','S','T','A','C','K','I','N','G','\0',
2269     'G','R','E','P','L','E','X','\0',
2270     'G','R','O','W','S','\0',
2271     'G','U','E','S','S','E','D','\0',
2272     'H','A','S','_','H','H','\0',
2273     'H','U','S','H','\0',
2274     'I','D','E','N','T','\0',
2275     'I','M','P','L','I','M','\0',
2276     'I','N','A','R','G','S','\0',
2277     'I','N','B','I','N','\0',
2278     'I','N','C','R','\0',
2279     'I','N','P','L','A','C','E','\0',
2280     'I','N','T','\0',
2281     'L','I','N','E','N','U','M','\0',
2282     'L','V','\0',
2283     'L','V','D','E','F','E','R','\0',
2284     'L','V','I','N','T','R','O','\0',
2285     'L','V','S','U','B','\0',
2286     'M','A','R','K','\0',
2287     'N','O','(',')','\0',
2288     'N','O','I','N','I','T','\0',
2289     'N','O','V','E','R','\0',
2290     'N','U','M','\0',
2291     'O','U','R','I','N','T','R','\0',
2292     'O','U','T','B','I','N','\0',
2293     'O','U','T','C','R','\0',
2294     'Q','S','O','R','T','\0',
2295     'R','E','F','C','\0',
2296     'R','E','P','A','R','S','E','\0',
2297     'R','E','P','L','1','S','T','\0',
2298     'R','E','V','\0',
2299     'R','E','V','E','R','S','E','D','\0',
2300     'R','T','I','M','E','\0',
2301     'S','H','O','R','T','\0',
2302     'S','L','I','C','E','\0',
2303     'S','L','I','C','E','W','A','R','N','\0',
2304     'S','Q','U','A','S','H','\0',
2305     'S','T','A','B','L','E','\0',
2306     'S','T','A','T','E','\0',
2307     'S','T','R','I','C','T','\0',
2308     'S','U','B','\0',
2309     'T','A','R','G','\0',
2310     'T','A','R','G','M','Y','\0',
2311     'U','N','I','\0',
2312     'U','T','F','\0',
2313     'V','M','S','I','S','H','_','S','T','A','T','U','S','\0',
2314     'V','M','S','I','S','H','_','T','I','M','E','\0',
2315
2316 };
2317
2318
2319
2320 /* PL_op_private_bitfields[]: details about each bit field type.
2321  * Each defintition consists of the following list of words:
2322  *    bitmin
2323  *    label (index into PL_op_private_labels[]; -1 if no label)
2324  *    repeat for each enum entry (if any):
2325  *       enum value
2326  *       enum label (index into PL_op_private_labels[])
2327  *    -1
2328  */
2329
2330 EXTCONST I16 PL_op_private_bitfields[] = {
2331     0, 8, -1,
2332     0, 8, -1,
2333     0, 8, -1,
2334     0, 8, -1,
2335     0, 8, -1,
2336     0, 8, -1,
2337     5, -1, 1, 124, 2, 131, 3, 138, -1,
2338
2339 };
2340
2341
2342 /* PL_op_private_bitdef_ix[]: map an op number to a starting position
2343  * in PL_op_private_bitdefs.  If -1, the op has no bits defined */
2344
2345 EXTCONST I16  PL_op_private_bitdef_ix[] = {
2346       -1, /* null */
2347       -1, /* stub */
2348        0, /* scalar */
2349        1, /* pushmark */
2350        3, /* wantarray */
2351        4, /* const */
2352        9, /* gvsv */
2353       11, /* gv */
2354       12, /* gelem */
2355       13, /* padsv */
2356       16, /* padav */
2357       20, /* padhv */
2358       -1, /* padany */
2359       26, /* pushre */
2360       27, /* rv2gv */
2361       34, /* rv2sv */
2362       39, /* av2arylen */
2363       41, /* rv2cv */
2364       -1, /* anoncode */
2365       48, /* prototype */
2366       49, /* refgen */
2367       50, /* srefgen */
2368       51, /* ref */
2369       52, /* bless */
2370       53, /* backtick */
2371       58, /* glob */
2372       59, /* readline */
2373       -1, /* rcatline */
2374       60, /* regcmaybe */
2375       61, /* regcreset */
2376       62, /* regcomp */
2377       63, /* match */
2378       65, /* qr */
2379       66, /* subst */
2380       68, /* substcont */
2381       70, /* trans */
2382       78, /* transr */
2383       86, /* sassign */
2384       89, /* aassign */
2385       92, /* chop */
2386       93, /* schop */
2387       94, /* chomp */
2388       96, /* schomp */
2389       98, /* defined */
2390       99, /* undef */
2391      100, /* study */
2392      101, /* pos */
2393      103, /* preinc */
2394      104, /* i_preinc */
2395      105, /* predec */
2396      106, /* i_predec */
2397      107, /* postinc */
2398      108, /* i_postinc */
2399      110, /* postdec */
2400      111, /* i_postdec */
2401      113, /* pow */
2402      115, /* multiply */
2403      117, /* i_multiply */
2404      119, /* divide */
2405      121, /* i_divide */
2406      123, /* modulo */
2407      125, /* i_modulo */
2408      127, /* repeat */
2409      129, /* add */
2410      131, /* i_add */
2411      133, /* subtract */
2412      135, /* i_subtract */
2413      137, /* concat */
2414      139, /* stringify */
2415      141, /* left_shift */
2416      143, /* right_shift */
2417      145, /* lt */
2418      146, /* i_lt */
2419      147, /* gt */
2420      148, /* i_gt */
2421      149, /* le */
2422      150, /* i_le */
2423      151, /* ge */
2424      152, /* i_ge */
2425      153, /* eq */
2426      154, /* i_eq */
2427      155, /* ne */
2428      156, /* i_ne */
2429      157, /* ncmp */
2430      158, /* i_ncmp */
2431      159, /* slt */
2432      160, /* sgt */
2433      161, /* sle */
2434      162, /* sge */
2435      163, /* seq */
2436      164, /* sne */
2437      165, /* scmp */
2438      166, /* bit_and */
2439      167, /* bit_xor */
2440      168, /* bit_or */
2441      169, /* negate */
2442      170, /* i_negate */
2443      172, /* not */
2444      173, /* complement */
2445      174, /* smartmatch */
2446      175, /* atan2 */
2447      177, /* sin */
2448      179, /* cos */
2449      181, /* rand */
2450      183, /* srand */
2451      185, /* exp */
2452      187, /* log */
2453      189, /* sqrt */
2454      191, /* int */
2455      193, /* hex */
2456      195, /* oct */
2457      197, /* abs */
2458      199, /* length */
2459      201, /* substr */
2460      204, /* vec */
2461      206, /* index */
2462      208, /* rindex */
2463      210, /* sprintf */
2464      211, /* formline */
2465      212, /* ord */
2466      214, /* chr */
2467      216, /* crypt */
2468      218, /* ucfirst */
2469      219, /* lcfirst */
2470      220, /* uc */
2471      221, /* lc */
2472      222, /* quotemeta */
2473      223, /* rv2av */
2474      229, /* aelemfast */
2475      230, /* aelemfast_lex */
2476      231, /* aelem */
2477      236, /* aslice */
2478      239, /* kvaslice */
2479      240, /* aeach */
2480      241, /* akeys */
2481      242, /* avalues */
2482      243, /* each */
2483      244, /* values */
2484      245, /* keys */
2485      247, /* delete */
2486      250, /* exists */
2487      252, /* rv2hv */
2488      260, /* helem */
2489      265, /* hslice */
2490      268, /* kvhslice */
2491      269, /* unpack */
2492      270, /* pack */
2493      271, /* split */
2494      273, /* join */
2495      274, /* list */
2496      276, /* lslice */
2497      277, /* anonlist */
2498      278, /* anonhash */
2499      279, /* splice */
2500      280, /* push */
2501      282, /* pop */
2502      283, /* shift */
2503      284, /* unshift */
2504      286, /* sort */
2505      293, /* reverse */
2506      295, /* grepstart */
2507      296, /* grepwhile */
2508      298, /* mapstart */
2509      299, /* mapwhile */
2510      301, /* range */
2511      302, /* flip */
2512      304, /* flop */
2513      306, /* and */
2514      307, /* or */
2515      308, /* xor */
2516      309, /* dor */
2517      310, /* cond_expr */
2518      312, /* andassign */
2519      313, /* orassign */
2520      314, /* dorassign */
2521      315, /* method */
2522      316, /* entersub */
2523      323, /* leavesub */
2524      325, /* leavesublv */
2525      327, /* caller */
2526      329, /* warn */
2527      330, /* die */
2528      331, /* reset */
2529       -1, /* lineseq */
2530      332, /* nextstate */
2531      335, /* dbstate */
2532       -1, /* unstack */
2533       -1, /* enter */
2534      338, /* leave */
2535       -1, /* scope */
2536      340, /* enteriter */
2537      344, /* iter */
2538       -1, /* enterloop */
2539      345, /* leaveloop */
2540       -1, /* return */
2541      347, /* last */
2542      349, /* next */
2543      351, /* redo */
2544      353, /* dump */
2545      355, /* goto */
2546      357, /* exit */
2547      358, /* method_named */
2548      359, /* entergiven */
2549      360, /* leavegiven */
2550      361, /* enterwhen */
2551      362, /* leavewhen */
2552       -1, /* break */
2553       -1, /* continue */
2554      363, /* open */
2555      368, /* close */
2556      369, /* pipe_op */
2557      370, /* fileno */
2558      371, /* umask */
2559      372, /* binmode */
2560      373, /* tie */
2561      374, /* untie */
2562      375, /* tied */
2563      376, /* dbmopen */
2564      377, /* dbmclose */
2565      378, /* sselect */
2566      379, /* select */
2567      380, /* getc */
2568      381, /* read */
2569      382, /* enterwrite */
2570      383, /* leavewrite */
2571       -1, /* prtf */
2572       -1, /* print */
2573       -1, /* say */
2574      385, /* sysopen */
2575      386, /* sysseek */
2576      387, /* sysread */
2577      388, /* syswrite */
2578      389, /* eof */
2579      390, /* tell */
2580      391, /* seek */
2581      392, /* truncate */
2582      393, /* fcntl */
2583      394, /* ioctl */
2584      395, /* flock */
2585      397, /* send */
2586      398, /* recv */
2587      399, /* socket */
2588      400, /* sockpair */
2589      401, /* bind */
2590      402, /* connect */
2591      403, /* listen */
2592      404, /* accept */
2593      405, /* shutdown */
2594      406, /* gsockopt */
2595      407, /* ssockopt */
2596      408, /* getsockname */
2597      409, /* getpeername */
2598      410, /* lstat */
2599      411, /* stat */
2600      412, /* ftrread */
2601      417, /* ftrwrite */
2602      422, /* ftrexec */
2603      427, /* fteread */
2604      432, /* ftewrite */
2605      437, /* fteexec */
2606      442, /* ftis */
2607      446, /* ftsize */
2608      450, /* ftmtime */
2609      454, /* ftatime */
2610      458, /* ftctime */
2611      462, /* ftrowned */
2612      466, /* fteowned */
2613      470, /* ftzero */
2614      474, /* ftsock */
2615      478, /* ftchr */
2616      482, /* ftblk */
2617      486, /* ftfile */
2618      490, /* ftdir */
2619      494, /* ftpipe */
2620      498, /* ftsuid */
2621      502, /* ftsgid */
2622      506, /* ftsvtx */
2623      510, /* ftlink */
2624      514, /* fttty */
2625      518, /* fttext */
2626      522, /* ftbinary */
2627      526, /* chdir */
2628      528, /* chown */
2629      530, /* chroot */
2630      532, /* unlink */
2631      534, /* chmod */
2632      536, /* utime */
2633      538, /* rename */
2634      540, /* link */
2635      542, /* symlink */
2636      544, /* readlink */
2637      545, /* mkdir */
2638      547, /* rmdir */
2639      549, /* open_dir */
2640      550, /* readdir */
2641      551, /* telldir */
2642      552, /* seekdir */
2643      553, /* rewinddir */
2644      554, /* closedir */
2645       -1, /* fork */
2646      555, /* wait */
2647      556, /* waitpid */
2648      558, /* system */
2649      560, /* exec */
2650      562, /* kill */
2651      564, /* getppid */
2652      565, /* getpgrp */
2653      567, /* setpgrp */
2654      569, /* getpriority */
2655      571, /* setpriority */
2656      573, /* time */
2657       -1, /* tms */
2658      574, /* localtime */
2659      575, /* gmtime */
2660      576, /* alarm */
2661      577, /* sleep */
2662      579, /* shmget */
2663      580, /* shmctl */
2664      581, /* shmread */
2665      582, /* shmwrite */
2666      583, /* msgget */
2667      584, /* msgctl */
2668      585, /* msgsnd */
2669      586, /* msgrcv */
2670      587, /* semop */
2671      588, /* semget */
2672      589, /* semctl */
2673      590, /* require */
2674      591, /* dofile */
2675       -1, /* hintseval */
2676      592, /* entereval */
2677      598, /* leaveeval */
2678      600, /* entertry */
2679       -1, /* leavetry */
2680      601, /* ghbyname */
2681      602, /* ghbyaddr */
2682       -1, /* ghostent */
2683      603, /* gnbyname */
2684      604, /* gnbyaddr */
2685       -1, /* gnetent */
2686      605, /* gpbyname */
2687      606, /* gpbynumber */
2688       -1, /* gprotoent */
2689      607, /* gsbyname */
2690      608, /* gsbyport */
2691       -1, /* gservent */
2692      609, /* shostent */
2693      610, /* snetent */
2694      611, /* sprotoent */
2695      612, /* sservent */
2696       -1, /* ehostent */
2697       -1, /* enetent */
2698       -1, /* eprotoent */
2699       -1, /* eservent */
2700      613, /* gpwnam */
2701      614, /* gpwuid */
2702       -1, /* gpwent */
2703       -1, /* spwent */
2704       -1, /* epwent */
2705      615, /* ggrnam */
2706      616, /* ggrgid */
2707       -1, /* ggrent */
2708       -1, /* sgrent */
2709       -1, /* egrent */
2710       -1, /* getlogin */
2711      617, /* syscall */
2712      618, /* lock */
2713      619, /* once */
2714       -1, /* custom */
2715      620, /* reach */
2716      621, /* rkeys */
2717      623, /* rvalues */
2718      624, /* coreargs */
2719      628, /* runcv */
2720      629, /* fc */
2721       -1, /* padcv */
2722       -1, /* introcv */
2723       -1, /* clonecv */
2724      630, /* padrange */
2725      632, /* refassign */
2726      635, /* lvref */
2727
2728 };
2729
2730
2731
2732 /* PL_op_private_bitdefs[]: given a starting position in this array (as
2733  * supplied by PL_op_private_bitdef_ix[]), each word (until a stop bit is
2734  * seen) defines the meaning of a particular op_private bit for a
2735  * particular op. Each word consists of:
2736  *  bit  0:     stop bit: this is the last bit def for the current op
2737  *  bit  1:     bitfield: if set, this defines a bit field rather than a flag
2738  *  bits 2..4:  unsigned number in the range 0..7 which is the bit number
2739  *  bits 5..15: unsigned number in the range 0..2047 which is an index
2740  *              into PL_op_private_labels[]    (for a flag), or
2741  *              into PL_op_private_bitfields[] (for a bit field)
2742  */
2743
2744 EXTCONST U16  PL_op_private_bitdefs[] = {
2745     /* scalar        */ 0x0003,
2746     /* pushmark      */ 0x265c, 0x3851,
2747     /* wantarray     */ 0x00bd,
2748     /* const         */ 0x0358, 0x13d0, 0x390c, 0x33c8, 0x2a25,
2749     /* gvsv          */ 0x265c, 0x2b71,
2750     /* gv            */ 0x1235,
2751     /* gelem         */ 0x0067,
2752     /* padsv         */ 0x265c, 0x025a, 0x3851,
2753     /* padav         */ 0x265c, 0x3850, 0x274c, 0x3549,
2754     /* padhv         */ 0x265c, 0x0578, 0x04d4, 0x3850, 0x274c, 0x3549,
2755     /* pushre        */ 0x3319,
2756     /* rv2gv         */ 0x265c, 0x025a, 0x14d0, 0x274c, 0x2948, 0x3904, 0x0003,
2757     /* rv2sv         */ 0x265c, 0x025a, 0x2b70, 0x3904, 0x0003,
2758     /* av2arylen     */ 0x274c, 0x0003,
2759     /* rv2cv         */ 0x28bc, 0x0898, 0x0ad0, 0x028c, 0x3a68, 0x3904, 0x0003,
2760     /* prototype     */ 0x0003,
2761     /* refgen        */ 0x0003,
2762     /* srefgen       */ 0x0003,
2763     /* ref           */ 0x0003,
2764     /* bless         */ 0x012f,
2765     /* backtick      */ 0x2d5c, 0x2c78, 0x21d4, 0x2110, 0x0003,
2766     /* glob          */ 0x012f,
2767     /* readline      */ 0x0003,
2768     /* regcmaybe     */ 0x0003,
2769     /* regcreset     */ 0x0003,
2770     /* regcomp       */ 0x0003,
2771     /* match         */ 0x3318, 0x3b11,
2772     /* qr            */ 0x3319,
2773     /* subst         */ 0x3318, 0x3b11,
2774     /* substcont     */ 0x3318, 0x0003,
2775     /* trans         */ 0x0bdc, 0x1b58, 0x07d4, 0x3b10, 0x368c, 0x1e88, 0x01e4, 0x0141,
2776     /* transr        */ 0x0bdc, 0x1b58, 0x07d4, 0x3b10, 0x368c, 0x1e88, 0x01e4, 0x0141,
2777     /* sassign       */ 0x0a1c, 0x03f8, 0x0067,
2778     /* aassign       */ 0x06f8, 0x274c, 0x0067,
2779     /* chop          */ 0x0003,
2780     /* schop         */ 0x0003,
2781     /* chomp         */ 0x3b10, 0x0003,
2782     /* schomp        */ 0x3b10, 0x0003,
2783     /* defined       */ 0x0003,
2784     /* undef         */ 0x0003,
2785     /* study         */ 0x0003,
2786     /* pos           */ 0x274c, 0x0003,
2787     /* preinc        */ 0x0003,
2788     /* i_preinc      */ 0x0003,
2789     /* predec        */ 0x0003,
2790     /* i_predec      */ 0x0003,
2791     /* postinc       */ 0x0003,
2792     /* i_postinc     */ 0x3b10, 0x0003,
2793     /* postdec       */ 0x0003,
2794     /* i_postdec     */ 0x3b10, 0x0003,
2795     /* pow           */ 0x3b10, 0x0067,
2796     /* multiply      */ 0x3b10, 0x0067,
2797     /* i_multiply    */ 0x3b10, 0x0067,
2798     /* divide        */ 0x3b10, 0x0067,
2799     /* i_divide      */ 0x3b10, 0x0067,
2800     /* modulo        */ 0x3b10, 0x0067,
2801     /* i_modulo      */ 0x3b10, 0x0067,
2802     /* repeat        */ 0x0eb8, 0x0067,
2803     /* add           */ 0x3b10, 0x0067,
2804     /* i_add         */ 0x3b10, 0x0067,
2805     /* subtract      */ 0x3b10, 0x0067,
2806     /* i_subtract    */ 0x3b10, 0x0067,
2807     /* concat        */ 0x3b10, 0x0067,
2808     /* stringify     */ 0x3b10, 0x012f,
2809     /* left_shift    */ 0x3b10, 0x0067,
2810     /* right_shift   */ 0x3b10, 0x0067,
2811     /* lt            */ 0x0067,
2812     /* i_lt          */ 0x0067,
2813     /* gt            */ 0x0067,
2814     /* i_gt          */ 0x0067,
2815     /* le            */ 0x0067,
2816     /* i_le          */ 0x0067,
2817     /* ge            */ 0x0067,
2818     /* i_ge          */ 0x0067,
2819     /* eq            */ 0x0067,
2820     /* i_eq          */ 0x0067,
2821     /* ne            */ 0x0067,
2822     /* i_ne          */ 0x0067,
2823     /* ncmp          */ 0x0067,
2824     /* i_ncmp        */ 0x0067,
2825     /* slt           */ 0x0067,
2826     /* sgt           */ 0x0067,
2827     /* sle           */ 0x0067,
2828     /* sge           */ 0x0067,
2829     /* seq           */ 0x0067,
2830     /* sne           */ 0x0067,
2831     /* scmp          */ 0x0067,
2832     /* bit_and       */ 0x0067,
2833     /* bit_xor       */ 0x0067,
2834     /* bit_or        */ 0x0067,
2835     /* negate        */ 0x0003,
2836     /* i_negate      */ 0x3b10, 0x0003,
2837     /* not           */ 0x0003,
2838     /* complement    */ 0x0003,
2839     /* smartmatch    */ 0x0067,
2840     /* atan2         */ 0x3b10, 0x012f,
2841     /* sin           */ 0x3b10, 0x0003,
2842     /* cos           */ 0x3b10, 0x0003,
2843     /* rand          */ 0x3b10, 0x012f,
2844     /* srand         */ 0x3b10, 0x012f,
2845     /* exp           */ 0x3b10, 0x0003,
2846     /* log           */ 0x3b10, 0x0003,
2847     /* sqrt          */ 0x3b10, 0x0003,
2848     /* int           */ 0x3b10, 0x0003,
2849     /* hex           */ 0x3b10, 0x0003,
2850     /* oct           */ 0x3b10, 0x0003,
2851     /* abs           */ 0x3b10, 0x0003,
2852     /* length        */ 0x3b10, 0x0003,
2853     /* substr        */ 0x3070, 0x274c, 0x00cb,
2854     /* vec           */ 0x274c, 0x0067,
2855     /* index         */ 0x3b10, 0x012f,
2856     /* rindex        */ 0x3b10, 0x012f,
2857     /* sprintf       */ 0x012f,
2858     /* formline      */ 0x012f,
2859     /* ord           */ 0x3b10, 0x0003,
2860     /* chr           */ 0x3b10, 0x0003,
2861     /* crypt         */ 0x3b10, 0x012f,
2862     /* ucfirst       */ 0x0003,
2863     /* lcfirst       */ 0x0003,
2864     /* uc            */ 0x0003,
2865     /* lc            */ 0x0003,
2866     /* quotemeta     */ 0x0003,
2867     /* rv2av         */ 0x265c, 0x2b70, 0x274c, 0x3548, 0x3904, 0x0003,
2868     /* aelemfast     */ 0x01ff,
2869     /* aelemfast_lex */ 0x01ff,
2870     /* aelem         */ 0x265c, 0x025a, 0x2550, 0x274c, 0x0067,
2871     /* aslice        */ 0x265c, 0x274c, 0x3549,
2872     /* kvaslice      */ 0x274d,
2873     /* aeach         */ 0x0003,
2874     /* akeys         */ 0x0003,
2875     /* avalues       */ 0x0003,
2876     /* each          */ 0x0003,
2877     /* values        */ 0x0003,
2878     /* keys          */ 0x274c, 0x0003,
2879     /* delete        */ 0x265c, 0x3498, 0x0003,
2880     /* exists        */ 0x39f8, 0x0003,
2881     /* rv2hv         */ 0x265c, 0x0578, 0x04d4, 0x2b70, 0x274c, 0x3548, 0x3904, 0x0003,
2882     /* helem         */ 0x265c, 0x025a, 0x2550, 0x274c, 0x0067,
2883     /* hslice        */ 0x265c, 0x274c, 0x3549,
2884     /* kvhslice      */ 0x274d,
2885     /* unpack        */ 0x012f,
2886     /* pack          */ 0x012f,
2887     /* split         */ 0x1f5c, 0x2b71,
2888     /* join          */ 0x012f,
2889     /* list          */ 0x265c, 0x1c19,
2890     /* lslice        */ 0x0067,
2891     /* anonlist      */ 0x012f,
2892     /* anonhash      */ 0x012f,
2893     /* splice        */ 0x012f,
2894     /* push          */ 0x3b10, 0x012f,
2895     /* pop           */ 0x0003,
2896     /* shift         */ 0x0003,
2897     /* unshift       */ 0x3b10, 0x012f,
2898     /* sort          */ 0x3778, 0x2e14, 0x0e10, 0x226c, 0x3168, 0x2364, 0x2ae1,
2899     /* reverse       */ 0x226c, 0x0003,
2900     /* grepstart     */ 0x1a45,
2901     /* grepwhile     */ 0x1a44, 0x0003,
2902     /* mapstart      */ 0x1a45,
2903     /* mapwhile      */ 0x1a44, 0x0003,
2904     /* range         */ 0x0003,
2905     /* flip          */ 0x23f8, 0x0003,
2906     /* flop          */ 0x23f8, 0x0003,
2907     /* and           */ 0x0003,
2908     /* or            */ 0x0003,
2909     /* xor           */ 0x0067,
2910     /* dor           */ 0x0003,
2911     /* cond_expr     */ 0x265c, 0x0003,
2912     /* andassign     */ 0x0003,
2913     /* orassign      */ 0x0003,
2914     /* dorassign     */ 0x0003,
2915     /* method        */ 0x0003,
2916     /* entersub      */ 0x265c, 0x025a, 0x0ad0, 0x028c, 0x3a68, 0x3904, 0x2021,
2917     /* leavesub      */ 0x2ed8, 0x0003,
2918     /* leavesublv    */ 0x2ed8, 0x0003,
2919     /* caller        */ 0x00bc, 0x012f,
2920     /* warn          */ 0x012f,
2921     /* die           */ 0x012f,
2922     /* reset         */ 0x012f,
2923     /* nextstate     */ 0x3ebc, 0x3cf8, 0x1df5,
2924     /* dbstate       */ 0x3ebc, 0x3cf8, 0x1df5,
2925     /* leave         */ 0x24fc, 0x2ed9,
2926     /* enteriter     */ 0x265c, 0x2b70, 0x0b4c, 0x31e9,
2927     /* iter          */ 0x31e9,
2928     /* leaveloop     */ 0x24fc, 0x0067,
2929     /* last          */ 0x3c7c, 0x0003,
2930     /* next          */ 0x3c7c, 0x0003,
2931     /* redo          */ 0x3c7c, 0x0003,
2932     /* dump          */ 0x3c7c, 0x0003,
2933     /* goto          */ 0x3c7c, 0x0003,
2934     /* exit          */ 0x012f,
2935     /* method_named  */ 0x0003,
2936     /* entergiven    */ 0x0003,
2937     /* leavegiven    */ 0x0003,
2938     /* enterwhen     */ 0x0003,
2939     /* leavewhen     */ 0x0003,
2940     /* open          */ 0x2d5c, 0x2c78, 0x21d4, 0x2110, 0x012f,
2941     /* close         */ 0x012f,
2942     /* pipe_op       */ 0x012f,
2943     /* fileno        */ 0x012f,
2944     /* umask         */ 0x012f,
2945     /* binmode       */ 0x012f,
2946     /* tie           */ 0x012f,
2947     /* untie         */ 0x0003,
2948     /* tied          */ 0x0003,
2949     /* dbmopen       */ 0x012f,
2950     /* dbmclose      */ 0x0003,
2951     /* sselect       */ 0x012f,
2952     /* select        */ 0x012f,
2953     /* getc          */ 0x012f,
2954     /* read          */ 0x012f,
2955     /* enterwrite    */ 0x012f,
2956     /* leavewrite    */ 0x2ed8, 0x0003,
2957     /* sysopen       */ 0x012f,
2958     /* sysseek       */ 0x012f,
2959     /* sysread       */ 0x012f,
2960     /* syswrite      */ 0x012f,
2961     /* eof           */ 0x012f,
2962     /* tell          */ 0x012f,
2963     /* seek          */ 0x012f,
2964     /* truncate      */ 0x012f,
2965     /* fcntl         */ 0x012f,
2966     /* ioctl         */ 0x012f,
2967     /* flock         */ 0x3b10, 0x012f,
2968     /* send          */ 0x012f,
2969     /* recv          */ 0x012f,
2970     /* socket        */ 0x012f,
2971     /* sockpair      */ 0x012f,
2972     /* bind          */ 0x012f,
2973     /* connect       */ 0x012f,
2974     /* listen        */ 0x012f,
2975     /* accept        */ 0x012f,
2976     /* shutdown      */ 0x012f,
2977     /* gsockopt      */ 0x012f,
2978     /* ssockopt      */ 0x012f,
2979     /* getsockname   */ 0x0003,
2980     /* getpeername   */ 0x0003,
2981     /* lstat         */ 0x0003,
2982     /* stat          */ 0x0003,
2983     /* ftrread       */ 0x1690, 0x18ec, 0x17a8, 0x1564, 0x0003,
2984     /* ftrwrite      */ 0x1690, 0x18ec, 0x17a8, 0x1564, 0x0003,
2985     /* ftrexec       */ 0x1690, 0x18ec, 0x17a8, 0x1564, 0x0003,
2986     /* fteread       */ 0x1690, 0x18ec, 0x17a8, 0x1564, 0x0003,
2987     /* ftewrite      */ 0x1690, 0x18ec, 0x17a8, 0x1564, 0x0003,
2988     /* fteexec       */ 0x1690, 0x18ec, 0x17a8, 0x1564, 0x0003,
2989     /* ftis          */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2990     /* ftsize        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2991     /* ftmtime       */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2992     /* ftatime       */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2993     /* ftctime       */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2994     /* ftrowned      */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2995     /* fteowned      */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2996     /* ftzero        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2997     /* ftsock        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2998     /* ftchr         */ 0x1690, 0x18ec, 0x17a8, 0x0003,
2999     /* ftblk         */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3000     /* ftfile        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3001     /* ftdir         */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3002     /* ftpipe        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3003     /* ftsuid        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3004     /* ftsgid        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3005     /* ftsvtx        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3006     /* ftlink        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3007     /* fttty         */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3008     /* fttext        */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3009     /* ftbinary      */ 0x1690, 0x18ec, 0x17a8, 0x0003,
3010     /* chdir         */ 0x3b10, 0x012f,
3011     /* chown         */ 0x3b10, 0x012f,
3012     /* chroot        */ 0x3b10, 0x0003,
3013     /* unlink        */ 0x3b10, 0x012f,
3014     /* chmod         */ 0x3b10, 0x012f,
3015     /* utime         */ 0x3b10, 0x012f,
3016     /* rename        */ 0x3b10, 0x012f,
3017     /* link          */ 0x3b10, 0x012f,
3018     /* symlink       */ 0x3b10, 0x012f,
3019     /* readlink      */ 0x0003,
3020     /* mkdir         */ 0x3b10, 0x012f,
3021     /* rmdir         */ 0x3b10, 0x0003,
3022     /* open_dir      */ 0x012f,
3023     /* readdir       */ 0x0003,
3024     /* telldir       */ 0x0003,
3025     /* seekdir       */ 0x012f,
3026     /* rewinddir     */ 0x0003,
3027     /* closedir      */ 0x0003,
3028     /* wait          */ 0x3b11,
3029     /* waitpid       */ 0x3b10, 0x012f,
3030     /* system        */ 0x3b10, 0x012f,
3031     /* exec          */ 0x3b10, 0x012f,
3032     /* kill          */ 0x3b10, 0x012f,
3033     /* getppid       */ 0x3b11,
3034     /* getpgrp       */ 0x3b10, 0x012f,
3035     /* setpgrp       */ 0x3b10, 0x012f,
3036     /* getpriority   */ 0x3b10, 0x012f,
3037     /* setpriority   */ 0x3b10, 0x012f,
3038     /* time          */ 0x3b11,
3039     /* localtime     */ 0x0003,
3040     /* gmtime        */ 0x012f,
3041     /* alarm         */ 0x0003,
3042     /* sleep         */ 0x3b10, 0x012f,
3043     /* shmget        */ 0x012f,
3044     /* shmctl        */ 0x012f,
3045     /* shmread       */ 0x012f,
3046     /* shmwrite      */ 0x012f,
3047     /* msgget        */ 0x012f,
3048     /* msgctl        */ 0x012f,
3049     /* msgsnd        */ 0x012f,
3050     /* msgrcv        */ 0x012f,
3051     /* semop         */ 0x012f,
3052     /* semget        */ 0x012f,
3053     /* semctl        */ 0x012f,
3054     /* require       */ 0x0003,
3055     /* dofile        */ 0x0003,
3056     /* entereval     */ 0x2f74, 0x0950, 0x062c, 0x3be8, 0x1d04, 0x0003,
3057     /* leaveeval     */ 0x2ed8, 0x0003,
3058     /* entertry      */ 0x0003,
3059     /* ghbyname      */ 0x0003,
3060     /* ghbyaddr      */ 0x012f,
3061     /* gnbyname      */ 0x0003,
3062     /* gnbyaddr      */ 0x012f,
3063     /* gpbyname      */ 0x0003,
3064     /* gpbynumber    */ 0x012f,
3065     /* gsbyname      */ 0x012f,
3066     /* gsbyport      */ 0x012f,
3067     /* shostent      */ 0x0003,
3068     /* snetent       */ 0x0003,
3069     /* sprotoent     */ 0x0003,
3070     /* sservent      */ 0x0003,
3071     /* gpwnam        */ 0x0003,
3072     /* gpwuid        */ 0x0003,
3073     /* ggrnam        */ 0x0003,
3074     /* ggrgid        */ 0x0003,
3075     /* syscall       */ 0x012f,
3076     /* lock          */ 0x0003,
3077     /* once          */ 0x0003,
3078     /* reach         */ 0x0003,
3079     /* rkeys         */ 0x274c, 0x0003,
3080     /* rvalues       */ 0x0003,
3081     /* coreargs      */ 0x281c, 0x0018, 0x0d24, 0x0c41,
3082     /* runcv         */ 0x00bd,
3083     /* fc            */ 0x0003,
3084     /* padrange      */ 0x265c, 0x019b,
3085     /* refassign     */ 0x265c, 0x1328, 0x0067,
3086     /* lvref         */ 0x265c, 0x1328, 0x0003,
3087
3088 };
3089
3090
3091 /* PL_op_private_valid: for each op, indexed by op_type, indicate which
3092  * flags bits in op_private are legal */
3093
3094 EXTCONST U8 PL_op_private_valid[] = {
3095     /* NULL       */ (0xff),
3096     /* STUB       */ (0),
3097     /* SCALAR     */ (OPpARG1_MASK),
3098     /* PUSHMARK   */ (OPpPAD_STATE|OPpLVAL_INTRO),
3099     /* WANTARRAY  */ (OPpOFFBYONE),
3100     /* CONST      */ (OPpCONST_NOVER|OPpCONST_SHORTCIRCUIT|OPpCONST_STRICT|OPpCONST_ENTERED|OPpCONST_BARE),
3101     /* GVSV       */ (OPpOUR_INTRO|OPpLVAL_INTRO),
3102     /* GV         */ (OPpEARLY_CV),
3103     /* GELEM      */ (OPpARG2_MASK),
3104     /* PADSV      */ (OPpPAD_STATE|OPpDEREF|OPpLVAL_INTRO),
3105     /* PADAV      */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpPAD_STATE|OPpLVAL_INTRO),
3106     /* PADHV      */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpPAD_STATE|OPpTRUEBOOL|OPpMAYBE_TRUEBOOL|OPpLVAL_INTRO),
3107     /* PADANY     */ (0),
3108     /* PUSHRE     */ (OPpRUNTIME),
3109     /* RV2GV      */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpDONT_INIT_GV|OPpMAYBE_LVSUB|OPpALLOW_FAKE|OPpDEREF|OPpLVAL_INTRO),
3110     /* RV2SV      */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpOUR_INTRO|OPpDEREF|OPpLVAL_INTRO),
3111     /* AV2ARYLEN  */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
3112     /* RV2CV      */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpENTERSUB_DB|OPpMAY_RETURN_CONSTANT|OPpENTERSUB_NOPAREN),
3113     /* ANONCODE   */ (0),
3114     /* PROTOTYPE  */ (OPpARG1_MASK),
3115     /* REFGEN     */ (OPpARG1_MASK),
3116     /* SREFGEN    */ (OPpARG1_MASK),
3117     /* REF        */ (OPpARG1_MASK),
3118     /* BLESS      */ (OPpARG4_MASK),
3119     /* BACKTICK   */ (OPpARG1_MASK|OPpOPEN_IN_RAW|OPpOPEN_IN_CRLF|OPpOPEN_OUT_RAW|OPpOPEN_OUT_CRLF),
3120     /* GLOB       */ (OPpARG4_MASK),
3121     /* READLINE   */ (OPpARG1_MASK),
3122     /* RCATLINE   */ (0),
3123     /* REGCMAYBE  */ (OPpARG1_MASK),
3124     /* REGCRESET  */ (OPpARG1_MASK),
3125     /* REGCOMP    */ (OPpARG1_MASK),
3126     /* MATCH      */ (OPpTARGET_MY|OPpRUNTIME),
3127     /* QR         */ (OPpRUNTIME),
3128     /* SUBST      */ (OPpTARGET_MY|OPpRUNTIME),
3129     /* SUBSTCONT  */ (OPpARG1_MASK|OPpRUNTIME),
3130     /* TRANS      */ (OPpTRANS_FROM_UTF|OPpTRANS_TO_UTF|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTARGET_MY|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
3131     /* TRANSR     */ (OPpTRANS_FROM_UTF|OPpTRANS_TO_UTF|OPpTRANS_IDENTICAL|OPpTRANS_SQUASH|OPpTARGET_MY|OPpTRANS_COMPLEMENT|OPpTRANS_GROWS|OPpTRANS_DELETE),
3132     /* SASSIGN    */ (OPpARG2_MASK|OPpASSIGN_BACKWARDS|OPpASSIGN_CV_TO_GV),
3133     /* AASSIGN    */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpASSIGN_COMMON),
3134     /* CHOP       */ (OPpARG1_MASK),
3135     /* SCHOP      */ (OPpARG1_MASK),
3136     /* CHOMP      */ (OPpARG1_MASK|OPpTARGET_MY),
3137     /* SCHOMP     */ (OPpARG1_MASK|OPpTARGET_MY),
3138     /* DEFINED    */ (OPpARG1_MASK),
3139     /* UNDEF      */ (OPpARG1_MASK),
3140     /* STUDY      */ (OPpARG1_MASK),
3141     /* POS        */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
3142     /* PREINC     */ (OPpARG1_MASK),
3143     /* I_PREINC   */ (OPpARG1_MASK),
3144     /* PREDEC     */ (OPpARG1_MASK),
3145     /* I_PREDEC   */ (OPpARG1_MASK),
3146     /* POSTINC    */ (OPpARG1_MASK),
3147     /* I_POSTINC  */ (OPpARG1_MASK|OPpTARGET_MY),
3148     /* POSTDEC    */ (OPpARG1_MASK),
3149     /* I_POSTDEC  */ (OPpARG1_MASK|OPpTARGET_MY),
3150     /* POW        */ (OPpARG2_MASK|OPpTARGET_MY),
3151     /* MULTIPLY   */ (OPpARG2_MASK|OPpTARGET_MY),
3152     /* I_MULTIPLY */ (OPpARG2_MASK|OPpTARGET_MY),
3153     /* DIVIDE     */ (OPpARG2_MASK|OPpTARGET_MY),
3154     /* I_DIVIDE   */ (OPpARG2_MASK|OPpTARGET_MY),
3155     /* MODULO     */ (OPpARG2_MASK|OPpTARGET_MY),
3156     /* I_MODULO   */ (OPpARG2_MASK|OPpTARGET_MY),
3157     /* REPEAT     */ (OPpARG2_MASK|OPpREPEAT_DOLIST),
3158     /* ADD        */ (OPpARG2_MASK|OPpTARGET_MY),
3159     /* I_ADD      */ (OPpARG2_MASK|OPpTARGET_MY),
3160     /* SUBTRACT   */ (OPpARG2_MASK|OPpTARGET_MY),
3161     /* I_SUBTRACT */ (OPpARG2_MASK|OPpTARGET_MY),
3162     /* CONCAT     */ (OPpARG2_MASK|OPpTARGET_MY),
3163     /* STRINGIFY  */ (OPpARG4_MASK|OPpTARGET_MY),
3164     /* LEFT_SHIFT */ (OPpARG2_MASK|OPpTARGET_MY),
3165     /* RIGHT_SHIFT */ (OPpARG2_MASK|OPpTARGET_MY),
3166     /* LT         */ (OPpARG2_MASK),
3167     /* I_LT       */ (OPpARG2_MASK),
3168     /* GT         */ (OPpARG2_MASK),
3169     /* I_GT       */ (OPpARG2_MASK),
3170     /* LE         */ (OPpARG2_MASK),
3171     /* I_LE       */ (OPpARG2_MASK),
3172     /* GE         */ (OPpARG2_MASK),
3173     /* I_GE       */ (OPpARG2_MASK),
3174     /* EQ         */ (OPpARG2_MASK),
3175     /* I_EQ       */ (OPpARG2_MASK),
3176     /* NE         */ (OPpARG2_MASK),
3177     /* I_NE       */ (OPpARG2_MASK),
3178     /* NCMP       */ (OPpARG2_MASK),
3179     /* I_NCMP     */ (OPpARG2_MASK),
3180     /* SLT        */ (OPpARG2_MASK),
3181     /* SGT        */ (OPpARG2_MASK),
3182     /* SLE        */ (OPpARG2_MASK),
3183     /* SGE        */ (OPpARG2_MASK),
3184     /* SEQ        */ (OPpARG2_MASK),
3185     /* SNE        */ (OPpARG2_MASK),
3186     /* SCMP       */ (OPpARG2_MASK),
3187     /* BIT_AND    */ (OPpARG2_MASK),
3188     /* BIT_XOR    */ (OPpARG2_MASK),
3189     /* BIT_OR     */ (OPpARG2_MASK),
3190     /* NEGATE     */ (OPpARG1_MASK),
3191     /* I_NEGATE   */ (OPpARG1_MASK|OPpTARGET_MY),
3192     /* NOT        */ (OPpARG1_MASK),
3193     /* COMPLEMENT */ (OPpARG1_MASK),
3194     /* SMARTMATCH */ (OPpARG2_MASK),
3195     /* ATAN2      */ (OPpARG4_MASK|OPpTARGET_MY),
3196     /* SIN        */ (OPpARG1_MASK|OPpTARGET_MY),
3197     /* COS        */ (OPpARG1_MASK|OPpTARGET_MY),
3198     /* RAND       */ (OPpARG4_MASK|OPpTARGET_MY),
3199     /* SRAND      */ (OPpARG4_MASK|OPpTARGET_MY),
3200     /* EXP        */ (OPpARG1_MASK|OPpTARGET_MY),
3201     /* LOG        */ (OPpARG1_MASK|OPpTARGET_MY),
3202     /* SQRT       */ (OPpARG1_MASK|OPpTARGET_MY),
3203     /* INT        */ (OPpARG1_MASK|OPpTARGET_MY),
3204     /* HEX        */ (OPpARG1_MASK|OPpTARGET_MY),
3205     /* OCT        */ (OPpARG1_MASK|OPpTARGET_MY),
3206     /* ABS        */ (OPpARG1_MASK|OPpTARGET_MY),
3207     /* LENGTH     */ (OPpARG1_MASK|OPpTARGET_MY),
3208     /* SUBSTR     */ (OPpARG3_MASK|OPpMAYBE_LVSUB|OPpSUBSTR_REPL_FIRST),
3209     /* VEC        */ (OPpARG2_MASK|OPpMAYBE_LVSUB),
3210     /* INDEX      */ (OPpARG4_MASK|OPpTARGET_MY),
3211     /* RINDEX     */ (OPpARG4_MASK|OPpTARGET_MY),
3212     /* SPRINTF    */ (OPpARG4_MASK),
3213     /* FORMLINE   */ (OPpARG4_MASK),
3214     /* ORD        */ (OPpARG1_MASK|OPpTARGET_MY),
3215     /* CHR        */ (OPpARG1_MASK|OPpTARGET_MY),
3216     /* CRYPT      */ (OPpARG4_MASK|OPpTARGET_MY),
3217     /* UCFIRST    */ (OPpARG1_MASK),
3218     /* LCFIRST    */ (OPpARG1_MASK),
3219     /* UC         */ (OPpARG1_MASK),
3220     /* LC         */ (OPpARG1_MASK),
3221     /* QUOTEMETA  */ (OPpARG1_MASK),
3222     /* RV2AV      */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpOUR_INTRO|OPpLVAL_INTRO),
3223     /* AELEMFAST  */ (255),
3224     /* AELEMFAST_LEX */ (255),
3225     /* AELEM      */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpLVAL_DEFER|OPpDEREF|OPpLVAL_INTRO),
3226     /* ASLICE     */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpLVAL_INTRO),
3227     /* KVASLICE   */ (OPpMAYBE_LVSUB),
3228     /* AEACH      */ (OPpARG1_MASK),
3229     /* AKEYS      */ (OPpARG1_MASK),
3230     /* AVALUES    */ (OPpARG1_MASK),
3231     /* EACH       */ (OPpARG1_MASK),
3232     /* VALUES     */ (OPpARG1_MASK),
3233     /* KEYS       */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
3234     /* DELETE     */ (OPpARG1_MASK|OPpSLICE|OPpLVAL_INTRO),
3235     /* EXISTS     */ (OPpARG1_MASK|OPpEXISTS_SUB),
3236     /* RV2HV      */ (OPpARG1_MASK|OPpHINT_STRICT_REFS|OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpOUR_INTRO|OPpTRUEBOOL|OPpMAYBE_TRUEBOOL|OPpLVAL_INTRO),
3237     /* HELEM      */ (OPpARG2_MASK|OPpMAYBE_LVSUB|OPpLVAL_DEFER|OPpDEREF|OPpLVAL_INTRO),
3238     /* HSLICE     */ (OPpSLICEWARNING|OPpMAYBE_LVSUB|OPpLVAL_INTRO),
3239     /* KVHSLICE   */ (OPpMAYBE_LVSUB),
3240     /* UNPACK     */ (OPpARG4_MASK),
3241     /* PACK       */ (OPpARG4_MASK),
3242     /* SPLIT      */ (OPpOUR_INTRO|OPpSPLIT_IMPLIM),
3243     /* JOIN       */ (OPpARG4_MASK),
3244     /* LIST       */ (OPpLIST_GUESSED|OPpLVAL_INTRO),
3245     /* LSLICE     */ (OPpARG2_MASK),
3246     /* ANONLIST   */ (OPpARG4_MASK),
3247     /* ANONHASH   */ (OPpARG4_MASK),
3248     /* SPLICE     */ (OPpARG4_MASK),
3249     /* PUSH       */ (OPpARG4_MASK|OPpTARGET_MY),
3250     /* POP        */ (OPpARG1_MASK),
3251     /* SHIFT      */ (OPpARG1_MASK),
3252     /* UNSHIFT    */ (OPpARG4_MASK|OPpTARGET_MY),
3253     /* SORT       */ (OPpSORT_NUMERIC|OPpSORT_INTEGER|OPpSORT_REVERSE|OPpSORT_INPLACE|OPpSORT_DESCEND|OPpSORT_QSORT|OPpSORT_STABLE),
3254     /* REVERSE    */ (OPpARG1_MASK|OPpREVERSE_INPLACE),
3255     /* GREPSTART  */ (OPpGREP_LEX),
3256     /* GREPWHILE  */ (OPpARG1_MASK|OPpGREP_LEX),
3257     /* MAPSTART   */ (OPpGREP_LEX),
3258     /* MAPWHILE   */ (OPpARG1_MASK|OPpGREP_LEX),
3259     /* RANGE      */ (OPpARG1_MASK),
3260     /* FLIP       */ (OPpARG1_MASK|OPpFLIP_LINENUM),
3261     /* FLOP       */ (OPpARG1_MASK|OPpFLIP_LINENUM),
3262     /* AND        */ (OPpARG1_MASK),
3263     /* OR         */ (OPpARG1_MASK),
3264     /* XOR        */ (OPpARG2_MASK),
3265     /* DOR        */ (OPpARG1_MASK),
3266     /* COND_EXPR  */ (OPpARG1_MASK|OPpLVAL_INTRO),
3267     /* ANDASSIGN  */ (OPpARG1_MASK),
3268     /* ORASSIGN   */ (OPpARG1_MASK),
3269     /* DORASSIGN  */ (OPpARG1_MASK),
3270     /* METHOD     */ (OPpARG1_MASK),
3271     /* ENTERSUB   */ (OPpENTERSUB_INARGS|OPpHINT_STRICT_REFS|OPpENTERSUB_HASTARG|OPpENTERSUB_AMPER|OPpENTERSUB_DB|OPpDEREF|OPpLVAL_INTRO),
3272     /* LEAVESUB   */ (OPpARG1_MASK|OPpREFCOUNTED),
3273     /* LEAVESUBLV */ (OPpARG1_MASK|OPpREFCOUNTED),
3274     /* CALLER     */ (OPpARG4_MASK|OPpOFFBYONE),
3275     /* WARN       */ (OPpARG4_MASK),
3276     /* DIE        */ (OPpARG4_MASK),
3277     /* RESET      */ (OPpARG4_MASK),
3278     /* LINESEQ    */ (0),
3279     /* NEXTSTATE  */ (OPpHUSH_VMSISH|OPpHINT_M_VMSISH_STATUS|OPpHINT_M_VMSISH_TIME),
3280     /* DBSTATE    */ (OPpHUSH_VMSISH|OPpHINT_M_VMSISH_STATUS|OPpHINT_M_VMSISH_TIME),
3281     /* UNSTACK    */ (0),
3282     /* ENTER      */ (0),
3283     /* LEAVE      */ (OPpREFCOUNTED|OPpLVALUE),
3284     /* SCOPE      */ (0),
3285     /* ENTERITER  */ (OPpITER_REVERSED|OPpITER_DEF|OPpOUR_INTRO|OPpLVAL_INTRO),
3286     /* ITER       */ (OPpITER_REVERSED),
3287     /* ENTERLOOP  */ (0),
3288     /* LEAVELOOP  */ (OPpARG2_MASK|OPpLVALUE),
3289     /* RETURN     */ (0),
3290     /* LAST       */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3291     /* NEXT       */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3292     /* REDO       */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3293     /* DUMP       */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3294     /* GOTO       */ (OPpARG1_MASK|OPpPV_IS_UTF8),
3295     /* EXIT       */ (OPpARG4_MASK),
3296     /* METHOD_NAMED */ (OPpARG1_MASK),
3297     /* ENTERGIVEN */ (OPpARG1_MASK),
3298     /* LEAVEGIVEN */ (OPpARG1_MASK),
3299     /* ENTERWHEN  */ (OPpARG1_MASK),
3300     /* LEAVEWHEN  */ (OPpARG1_MASK),
3301     /* BREAK      */ (0),
3302     /* CONTINUE   */ (0),
3303     /* OPEN       */ (OPpARG4_MASK|OPpOPEN_IN_RAW|OPpOPEN_IN_CRLF|OPpOPEN_OUT_RAW|OPpOPEN_OUT_CRLF),
3304     /* CLOSE      */ (OPpARG4_MASK),
3305     /* PIPE_OP    */ (OPpARG4_MASK),
3306     /* FILENO     */ (OPpARG4_MASK),
3307     /* UMASK      */ (OPpARG4_MASK),
3308     /* BINMODE    */ (OPpARG4_MASK),
3309     /* TIE        */ (OPpARG4_MASK),
3310     /* UNTIE      */ (OPpARG1_MASK),
3311     /* TIED       */ (OPpARG1_MASK),
3312     /* DBMOPEN    */ (OPpARG4_MASK),
3313     /* DBMCLOSE   */ (OPpARG1_MASK),
3314     /* SSELECT    */ (OPpARG4_MASK),
3315     /* SELECT     */ (OPpARG4_MASK),
3316     /* GETC       */ (OPpARG4_MASK),
3317     /* READ       */ (OPpARG4_MASK),
3318     /* ENTERWRITE */ (OPpARG4_MASK),
3319     /* LEAVEWRITE */ (OPpARG1_MASK|OPpREFCOUNTED),
3320     /* PRTF       */ (0),
3321     /* PRINT      */ (0),
3322     /* SAY        */ (0),
3323     /* SYSOPEN    */ (OPpARG4_MASK),
3324     /* SYSSEEK    */ (OPpARG4_MASK),
3325     /* SYSREAD    */ (OPpARG4_MASK),
3326     /* SYSWRITE   */ (OPpARG4_MASK),
3327     /* EOF        */ (OPpARG4_MASK),
3328     /* TELL       */ (OPpARG4_MASK),
3329     /* SEEK       */ (OPpARG4_MASK),
3330     /* TRUNCATE   */ (OPpARG4_MASK),
3331     /* FCNTL      */ (OPpARG4_MASK),
3332     /* IOCTL      */ (OPpARG4_MASK),
3333     /* FLOCK      */ (OPpARG4_MASK|OPpTARGET_MY),
3334     /* SEND       */ (OPpARG4_MASK),
3335     /* RECV       */ (OPpARG4_MASK),
3336     /* SOCKET     */ (OPpARG4_MASK),
3337     /* SOCKPAIR   */ (OPpARG4_MASK),
3338     /* BIND       */ (OPpARG4_MASK),
3339     /* CONNECT    */ (OPpARG4_MASK),
3340     /* LISTEN     */ (OPpARG4_MASK),
3341     /* ACCEPT     */ (OPpARG4_MASK),
3342     /* SHUTDOWN   */ (OPpARG4_MASK),
3343     /* GSOCKOPT   */ (OPpARG4_MASK),
3344     /* SSOCKOPT   */ (OPpARG4_MASK),
3345     /* GETSOCKNAME */ (OPpARG1_MASK),
3346     /* GETPEERNAME */ (OPpARG1_MASK),
3347     /* LSTAT      */ (OPpARG1_MASK),
3348     /* STAT       */ (OPpARG1_MASK),
3349     /* FTRREAD    */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3350     /* FTRWRITE   */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3351     /* FTREXEC    */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3352     /* FTEREAD    */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3353     /* FTEWRITE   */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3354     /* FTEEXEC    */ (OPpARG1_MASK|OPpFT_ACCESS|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3355     /* FTIS       */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3356     /* FTSIZE     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3357     /* FTMTIME    */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3358     /* FTATIME    */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3359     /* FTCTIME    */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3360     /* FTROWNED   */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3361     /* FTEOWNED   */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3362     /* FTZERO     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3363     /* FTSOCK     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3364     /* FTCHR      */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3365     /* FTBLK      */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3366     /* FTFILE     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3367     /* FTDIR      */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3368     /* FTPIPE     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3369     /* FTSUID     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3370     /* FTSGID     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3371     /* FTSVTX     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3372     /* FTLINK     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3373     /* FTTTY      */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3374     /* FTTEXT     */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3375     /* FTBINARY   */ (OPpARG1_MASK|OPpFT_STACKED|OPpFT_STACKING|OPpFT_AFTER_t),
3376     /* CHDIR      */ (OPpARG4_MASK|OPpTARGET_MY),
3377     /* CHOWN      */ (OPpARG4_MASK|OPpTARGET_MY),
3378     /* CHROOT     */ (OPpARG1_MASK|OPpTARGET_MY),
3379     /* UNLINK     */ (OPpARG4_MASK|OPpTARGET_MY),
3380     /* CHMOD      */ (OPpARG4_MASK|OPpTARGET_MY),
3381     /* UTIME      */ (OPpARG4_MASK|OPpTARGET_MY),
3382     /* RENAME     */ (OPpARG4_MASK|OPpTARGET_MY),
3383     /* LINK       */ (OPpARG4_MASK|OPpTARGET_MY),
3384     /* SYMLINK    */ (OPpARG4_MASK|OPpTARGET_MY),
3385     /* READLINK   */ (OPpARG1_MASK),
3386     /* MKDIR      */ (OPpARG4_MASK|OPpTARGET_MY),
3387     /* RMDIR      */ (OPpARG1_MASK|OPpTARGET_MY),
3388     /* OPEN_DIR   */ (OPpARG4_MASK),
3389     /* READDIR    */ (OPpARG1_MASK),
3390     /* TELLDIR    */ (OPpARG1_MASK),
3391     /* SEEKDIR    */ (OPpARG4_MASK),
3392     /* REWINDDIR  */ (OPpARG1_MASK),
3393     /* CLOSEDIR   */ (OPpARG1_MASK),
3394     /* FORK       */ (0),
3395     /* WAIT       */ (OPpTARGET_MY),
3396     /* WAITPID    */ (OPpARG4_MASK|OPpTARGET_MY),
3397     /* SYSTEM     */ (OPpARG4_MASK|OPpTARGET_MY),
3398     /* EXEC       */ (OPpARG4_MASK|OPpTARGET_MY),
3399     /* KILL       */ (OPpARG4_MASK|OPpTARGET_MY),
3400     /* GETPPID    */ (OPpTARGET_MY),
3401     /* GETPGRP    */ (OPpARG4_MASK|OPpTARGET_MY),
3402     /* SETPGRP    */ (OPpARG4_MASK|OPpTARGET_MY),
3403     /* GETPRIORITY */ (OPpARG4_MASK|OPpTARGET_MY),
3404     /* SETPRIORITY */ (OPpARG4_MASK|OPpTARGET_MY),
3405     /* TIME       */ (OPpTARGET_MY),
3406     /* TMS        */ (0),
3407     /* LOCALTIME  */ (OPpARG1_MASK),
3408     /* GMTIME     */ (OPpARG4_MASK),
3409     /* ALARM      */ (OPpARG1_MASK),
3410     /* SLEEP      */ (OPpARG4_MASK|OPpTARGET_MY),
3411     /* SHMGET     */ (OPpARG4_MASK),
3412     /* SHMCTL     */ (OPpARG4_MASK),
3413     /* SHMREAD    */ (OPpARG4_MASK),
3414     /* SHMWRITE   */ (OPpARG4_MASK),
3415     /* MSGGET     */ (OPpARG4_MASK),
3416     /* MSGCTL     */ (OPpARG4_MASK),
3417     /* MSGSND     */ (OPpARG4_MASK),
3418     /* MSGRCV     */ (OPpARG4_MASK),
3419     /* SEMOP      */ (OPpARG4_MASK),
3420     /* SEMGET     */ (OPpARG4_MASK),
3421     /* SEMCTL     */ (OPpARG4_MASK),
3422     /* REQUIRE    */ (OPpARG1_MASK),
3423     /* DOFILE     */ (OPpARG1_MASK),
3424     /* HINTSEVAL  */ (0),
3425     /* ENTEREVAL  */ (OPpARG1_MASK|OPpEVAL_HAS_HH|OPpEVAL_UNICODE|OPpEVAL_BYTES|OPpEVAL_COPHH|OPpEVAL_RE_REPARSING),
3426     /* LEAVEEVAL  */ (OPpARG1_MASK|OPpREFCOUNTED),
3427     /* ENTERTRY   */ (OPpARG1_MASK),
3428     /* LEAVETRY   */ (0),
3429     /* GHBYNAME   */ (OPpARG1_MASK),
3430     /* GHBYADDR   */ (OPpARG4_MASK),
3431     /* GHOSTENT   */ (0),
3432     /* GNBYNAME   */ (OPpARG1_MASK),
3433     /* GNBYADDR   */ (OPpARG4_MASK),
3434     /* GNETENT    */ (0),
3435     /* GPBYNAME   */ (OPpARG1_MASK),
3436     /* GPBYNUMBER */ (OPpARG4_MASK),
3437     /* GPROTOENT  */ (0),
3438     /* GSBYNAME   */ (OPpARG4_MASK),
3439     /* GSBYPORT   */ (OPpARG4_MASK),
3440     /* GSERVENT   */ (0),
3441     /* SHOSTENT   */ (OPpARG1_MASK),
3442     /* SNETENT    */ (OPpARG1_MASK),
3443     /* SPROTOENT  */ (OPpARG1_MASK),
3444     /* SSERVENT   */ (OPpARG1_MASK),
3445     /* EHOSTENT   */ (0),
3446     /* ENETENT    */ (0),
3447     /* EPROTOENT  */ (0),
3448     /* ESERVENT   */ (0),
3449     /* GPWNAM     */ (OPpARG1_MASK),
3450     /* GPWUID     */ (OPpARG1_MASK),
3451     /* GPWENT     */ (0),
3452     /* SPWENT     */ (0),
3453     /* EPWENT     */ (0),
3454     /* GGRNAM     */ (OPpARG1_MASK),
3455     /* GGRGID     */ (OPpARG1_MASK),
3456     /* GGRENT     */ (0),
3457     /* SGRENT     */ (0),
3458     /* EGRENT     */ (0),
3459     /* GETLOGIN   */ (0),
3460     /* SYSCALL    */ (OPpARG4_MASK),
3461     /* LOCK       */ (OPpARG1_MASK),
3462     /* ONCE       */ (OPpARG1_MASK),
3463     /* CUSTOM     */ (0xff),
3464     /* REACH      */ (OPpARG1_MASK),
3465     /* RKEYS      */ (OPpARG1_MASK|OPpMAYBE_LVSUB),
3466     /* RVALUES    */ (OPpARG1_MASK),
3467     /* COREARGS   */ (OPpCOREARGS_DEREF1|OPpCOREARGS_DEREF2|OPpCOREARGS_SCALARMOD|OPpCOREARGS_PUSHMARK),
3468     /* RUNCV      */ (OPpOFFBYONE),
3469     /* FC         */ (OPpARG1_MASK),
3470     /* PADCV      */ (0),
3471     /* INTROCV    */ (0),
3472     /* CLONECV    */ (0),
3473     /* PADRANGE   */ (OPpPADRANGE_COUNTMASK|OPpLVAL_INTRO),
3474     /* REFASSIGN  */ (OPpARG2_MASK|OPpLVREF_ELEM|OPpLVAL_INTRO),
3475     /* LVREF      */ (OPpARG1_MASK|OPpLVREF_ELEM|OPpLVAL_INTRO),
3476
3477 };
3478
3479 #  endif /* !DOINIT */
3480 #endif /* !PERL_GLOBAL_STRUCT_INIT */
3481
3482 END_EXTERN_C
3483
3484
3485
3486 /* ex: set ro: */