1 /* -*- buffer-read-only: t -*-
5 * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
6 * 2001, 2002, 2003, 2004, 2005, 2006, 2007 by Larry Wall and others
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.
11 * !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
12 * This file is built by regen/opcode.pl from its data. Any changes made
16 #ifndef PERL_GLOBAL_STRUCT_INIT
18 #define Perl_pp_i_preinc Perl_pp_preinc
19 #define Perl_pp_i_predec Perl_pp_predec
20 #define Perl_pp_i_postinc Perl_pp_postinc
21 #define Perl_pp_i_postdec Perl_pp_postdec
23 PERL_PPDEF(Perl_unimplemented_op)
27 #define OP_NAME(o) ((o)->op_type == OP_CUSTOM ? custom_op_name(o) : \
28 PL_op_name[(o)->op_type])
29 #define OP_DESC(o) ((o)->op_type == OP_CUSTOM ? custom_op_desc(o) : \
30 PL_op_desc[(o)->op_type])
33 EXTCONST char* const PL_op_name[];
35 EXTCONST char* const PL_op_name[] = {
406 EXTCONST char* const PL_op_desc[];
408 EXTCONST char* const PL_op_desc[] = {
424 "scalar dereference",
426 "subroutine dereference",
427 "anonymous subroutine",
428 "subroutine prototype",
429 "reference constructor",
430 "single ref constructor",
431 "reference-type operator",
433 "quoted execution (``, qx)",
436 "append I/O operator",
437 "regexp internal guard",
438 "regexp internal reset",
439 "regexp compilation",
440 "pattern match (m//)",
441 "pattern quote (qr//)",
442 "substitution (s///)",
443 "substitution iterator",
444 "transliteration (tr///)",
456 "integer preincrement (++)",
458 "integer predecrement (--)",
459 "postincrement (++)",
460 "integer postincrement (++)",
461 "postdecrement (--)",
462 "integer postdecrement (--)",
463 "exponentiation (**)",
464 "multiplication (*)",
465 "integer multiplication (*)",
467 "integer division (/)",
469 "integer modulus (%)",
472 "integer addition (+)",
474 "integer subtraction (-)",
475 "concatenation (.) or string",
477 "left bitshift (<<)",
478 "right bitshift (>>)",
491 "numeric comparison (<=>)",
492 "integer comparison (<=>)",
499 "string comparison (cmp)",
504 "integer negation (-)",
506 "1's complement (~)",
536 "constant array element",
557 "anonymous list ([])",
558 "anonymous hash ({})",
577 "conditional expression",
578 "logical and assignment (&&=)",
579 "logical or assignment (||=)",
580 "defined or assignment (//=)",
584 "lvalue subroutine return",
591 "debug next statement",
592 "iteration finalizer",
596 "foreach loop entry",
597 "foreach loop iterator",
607 "method with known name",
625 "select system call",
737 "eval \"string\" exit",
774 "unknown custom operator",
780 #endif /* !PERL_GLOBAL_STRUCT_INIT */
784 #ifdef PERL_GLOBAL_STRUCT_INIT
785 # define PERL_PPADDR_INITED
786 static const Perl_ppaddr_t Gppaddr[]
788 # ifndef PERL_GLOBAL_STRUCT
789 # define PERL_PPADDR_INITED
790 EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
792 #endif /* PERL_GLOBAL_STRUCT */
793 #if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
794 # define PERL_PPADDR_INITED
798 Perl_pp_null, /* Perl_pp_scalar */
808 Perl_unimplemented_op, /* Perl_pp_padany */
824 Perl_pp_null, /* Perl_pp_regcmaybe */
880 Perl_pp_sle, /* Perl_pp_slt */
881 Perl_pp_sle, /* Perl_pp_sgt */
883 Perl_pp_sle, /* Perl_pp_sge */
888 Perl_pp_bit_or, /* Perl_pp_bit_xor */
897 Perl_pp_sin, /* Perl_pp_cos */
900 Perl_pp_sin, /* Perl_pp_exp */
901 Perl_pp_sin, /* Perl_pp_log */
902 Perl_pp_sin, /* Perl_pp_sqrt */
904 Perl_pp_oct, /* Perl_pp_hex */
911 Perl_pp_index, /* Perl_pp_rindex */
918 Perl_pp_ucfirst, /* Perl_pp_lcfirst */
928 Perl_pp_akeys, /* Perl_pp_avalues */
930 Perl_do_kv, /* Perl_pp_values */
931 Perl_do_kv, /* Perl_pp_keys */
934 Perl_pp_rv2av, /* Perl_pp_rv2hv */
948 Perl_pp_shift, /* Perl_pp_pop */
955 Perl_unimplemented_op, /* Perl_pp_mapstart */
963 Perl_pp_defined, /* Perl_pp_dor */
965 Perl_pp_and, /* Perl_pp_andassign */
966 Perl_pp_or, /* Perl_pp_orassign */
967 Perl_pp_defined, /* Perl_pp_dorassign */
976 Perl_pp_null, /* Perl_pp_lineseq */
982 Perl_pp_null, /* Perl_pp_scope */
991 Perl_pp_goto, /* Perl_pp_dump */
994 Perl_pp_method_named,
1011 Perl_pp_untie, /* Perl_pp_dbmclose */
1015 Perl_pp_sysread, /* Perl_pp_read */
1020 Perl_pp_print, /* Perl_pp_say */
1024 Perl_pp_send, /* Perl_pp_syswrite */
1027 Perl_pp_sysseek, /* Perl_pp_seek */
1029 Perl_pp_ioctl, /* Perl_pp_fcntl */
1033 Perl_pp_sysread, /* Perl_pp_recv */
1041 Perl_pp_ssockopt, /* Perl_pp_gsockopt */
1043 Perl_pp_getpeername, /* Perl_pp_getsockname */
1044 Perl_pp_getpeername,
1045 Perl_pp_stat, /* Perl_pp_lstat */
1048 Perl_pp_ftrread, /* Perl_pp_ftrwrite */
1049 Perl_pp_ftrread, /* Perl_pp_ftrexec */
1050 Perl_pp_ftrread, /* Perl_pp_fteread */
1051 Perl_pp_ftrread, /* Perl_pp_ftewrite */
1052 Perl_pp_ftrread, /* Perl_pp_fteexec */
1054 Perl_pp_ftis, /* Perl_pp_ftsize */
1055 Perl_pp_ftis, /* Perl_pp_ftmtime */
1056 Perl_pp_ftis, /* Perl_pp_ftatime */
1057 Perl_pp_ftis, /* Perl_pp_ftctime */
1059 Perl_pp_ftrowned, /* Perl_pp_fteowned */
1060 Perl_pp_ftrowned, /* Perl_pp_ftzero */
1061 Perl_pp_ftrowned, /* Perl_pp_ftsock */
1062 Perl_pp_ftrowned, /* Perl_pp_ftchr */
1063 Perl_pp_ftrowned, /* Perl_pp_ftblk */
1064 Perl_pp_ftrowned, /* Perl_pp_ftfile */
1065 Perl_pp_ftrowned, /* Perl_pp_ftdir */
1066 Perl_pp_ftrowned, /* Perl_pp_ftpipe */
1067 Perl_pp_ftrowned, /* Perl_pp_ftsuid */
1068 Perl_pp_ftrowned, /* Perl_pp_ftsgid */
1069 Perl_pp_ftrowned, /* Perl_pp_ftsvtx */
1073 Perl_pp_fttext, /* Perl_pp_ftbinary */
1077 Perl_pp_chown, /* Perl_pp_unlink */
1078 Perl_pp_chown, /* Perl_pp_chmod */
1079 Perl_pp_chown, /* Perl_pp_utime */
1082 Perl_pp_link, /* Perl_pp_symlink */
1097 Perl_pp_chown, /* Perl_pp_kill */
1101 Perl_pp_getpriority,
1102 Perl_pp_setpriority,
1105 Perl_pp_gmtime, /* Perl_pp_localtime */
1109 Perl_pp_semget, /* Perl_pp_shmget */
1110 Perl_pp_semctl, /* Perl_pp_shmctl */
1111 Perl_pp_shmwrite, /* Perl_pp_shmread */
1113 Perl_pp_semget, /* Perl_pp_msgget */
1114 Perl_pp_semctl, /* Perl_pp_msgctl */
1115 Perl_pp_shmwrite, /* Perl_pp_msgsnd */
1116 Perl_pp_shmwrite, /* Perl_pp_msgrcv */
1117 Perl_pp_shmwrite, /* Perl_pp_semop */
1121 Perl_pp_require, /* Perl_pp_dofile */
1127 Perl_pp_ghostent, /* Perl_pp_ghbyname */
1128 Perl_pp_ghostent, /* Perl_pp_ghbyaddr */
1130 Perl_pp_gnetent, /* Perl_pp_gnbyname */
1131 Perl_pp_gnetent, /* Perl_pp_gnbyaddr */
1133 Perl_pp_gprotoent, /* Perl_pp_gpbyname */
1134 Perl_pp_gprotoent, /* Perl_pp_gpbynumber */
1136 Perl_pp_gservent, /* Perl_pp_gsbyname */
1137 Perl_pp_gservent, /* Perl_pp_gsbyport */
1147 Perl_pp_gpwent, /* Perl_pp_gpwnam */
1148 Perl_pp_gpwent, /* Perl_pp_gpwuid */
1152 Perl_pp_ggrent, /* Perl_pp_ggrnam */
1153 Perl_pp_ggrent, /* Perl_pp_ggrgid */
1161 Perl_unimplemented_op, /* Perl_pp_custom */
1164 #ifdef PERL_PPADDR_INITED
1168 #ifdef PERL_GLOBAL_STRUCT_INIT
1169 # define PERL_CHECK_INITED
1170 static const Perl_check_t Gcheck[]
1172 # ifndef PERL_GLOBAL_STRUCT
1173 # define PERL_CHECK_INITED
1174 EXT Perl_check_t PL_check[] /* or perlvars.h */
1177 #if (defined(DOINIT) && !defined(PERL_GLOBAL_STRUCT)) || defined(PERL_GLOBAL_STRUCT_INIT)
1178 # define PERL_CHECK_INITED
1180 Perl_ck_null, /* null */
1181 Perl_ck_null, /* stub */
1182 Perl_ck_fun, /* scalar */
1183 Perl_ck_null, /* pushmark */
1184 Perl_ck_null, /* wantarray */
1185 Perl_ck_svconst, /* const */
1186 Perl_ck_null, /* gvsv */
1187 Perl_ck_null, /* gv */
1188 Perl_ck_null, /* gelem */
1189 Perl_ck_null, /* padsv */
1190 Perl_ck_null, /* padav */
1191 Perl_ck_null, /* padhv */
1192 Perl_ck_null, /* padany */
1193 Perl_ck_null, /* pushre */
1194 Perl_ck_rvconst, /* rv2gv */
1195 Perl_ck_rvconst, /* rv2sv */
1196 Perl_ck_null, /* av2arylen */
1197 Perl_ck_rvconst, /* rv2cv */
1198 Perl_ck_anoncode, /* anoncode */
1199 Perl_ck_null, /* prototype */
1200 Perl_ck_spair, /* refgen */
1201 Perl_ck_null, /* srefgen */
1202 Perl_ck_fun, /* ref */
1203 Perl_ck_fun, /* bless */
1204 Perl_ck_open, /* backtick */
1205 Perl_ck_glob, /* glob */
1206 Perl_ck_readline, /* readline */
1207 Perl_ck_null, /* rcatline */
1208 Perl_ck_fun, /* regcmaybe */
1209 Perl_ck_fun, /* regcreset */
1210 Perl_ck_null, /* regcomp */
1211 Perl_ck_match, /* match */
1212 Perl_ck_match, /* qr */
1213 Perl_ck_match, /* subst */
1214 Perl_ck_null, /* substcont */
1215 Perl_ck_match, /* trans */
1216 Perl_ck_sassign, /* sassign */
1217 Perl_ck_null, /* aassign */
1218 Perl_ck_spair, /* chop */
1219 Perl_ck_null, /* schop */
1220 Perl_ck_spair, /* chomp */
1221 Perl_ck_null, /* schomp */
1222 Perl_ck_defined, /* defined */
1223 Perl_ck_lfun, /* undef */
1224 Perl_ck_fun, /* study */
1225 Perl_ck_lfun, /* pos */
1226 Perl_ck_lfun, /* preinc */
1227 Perl_ck_lfun, /* i_preinc */
1228 Perl_ck_lfun, /* predec */
1229 Perl_ck_lfun, /* i_predec */
1230 Perl_ck_lfun, /* postinc */
1231 Perl_ck_lfun, /* i_postinc */
1232 Perl_ck_lfun, /* postdec */
1233 Perl_ck_lfun, /* i_postdec */
1234 Perl_ck_null, /* pow */
1235 Perl_ck_null, /* multiply */
1236 Perl_ck_null, /* i_multiply */
1237 Perl_ck_null, /* divide */
1238 Perl_ck_null, /* i_divide */
1239 Perl_ck_null, /* modulo */
1240 Perl_ck_null, /* i_modulo */
1241 Perl_ck_repeat, /* repeat */
1242 Perl_ck_null, /* add */
1243 Perl_ck_null, /* i_add */
1244 Perl_ck_null, /* subtract */
1245 Perl_ck_null, /* i_subtract */
1246 Perl_ck_concat, /* concat */
1247 Perl_ck_fun, /* stringify */
1248 Perl_ck_bitop, /* left_shift */
1249 Perl_ck_bitop, /* right_shift */
1250 Perl_ck_null, /* lt */
1251 Perl_ck_null, /* i_lt */
1252 Perl_ck_null, /* gt */
1253 Perl_ck_null, /* i_gt */
1254 Perl_ck_null, /* le */
1255 Perl_ck_null, /* i_le */
1256 Perl_ck_null, /* ge */
1257 Perl_ck_null, /* i_ge */
1258 Perl_ck_null, /* eq */
1259 Perl_ck_null, /* i_eq */
1260 Perl_ck_null, /* ne */
1261 Perl_ck_null, /* i_ne */
1262 Perl_ck_null, /* ncmp */
1263 Perl_ck_null, /* i_ncmp */
1264 Perl_ck_null, /* slt */
1265 Perl_ck_null, /* sgt */
1266 Perl_ck_null, /* sle */
1267 Perl_ck_null, /* sge */
1268 Perl_ck_null, /* seq */
1269 Perl_ck_null, /* sne */
1270 Perl_ck_null, /* scmp */
1271 Perl_ck_bitop, /* bit_and */
1272 Perl_ck_bitop, /* bit_xor */
1273 Perl_ck_bitop, /* bit_or */
1274 Perl_ck_null, /* negate */
1275 Perl_ck_null, /* i_negate */
1276 Perl_ck_null, /* not */
1277 Perl_ck_bitop, /* complement */
1278 Perl_ck_smartmatch, /* smartmatch */
1279 Perl_ck_fun, /* atan2 */
1280 Perl_ck_fun, /* sin */
1281 Perl_ck_fun, /* cos */
1282 Perl_ck_fun, /* rand */
1283 Perl_ck_fun, /* srand */
1284 Perl_ck_fun, /* exp */
1285 Perl_ck_fun, /* log */
1286 Perl_ck_fun, /* sqrt */
1287 Perl_ck_fun, /* int */
1288 Perl_ck_fun, /* hex */
1289 Perl_ck_fun, /* oct */
1290 Perl_ck_fun, /* abs */
1291 Perl_ck_fun, /* length */
1292 Perl_ck_substr, /* substr */
1293 Perl_ck_fun, /* vec */
1294 Perl_ck_index, /* index */
1295 Perl_ck_index, /* rindex */
1296 Perl_ck_fun, /* sprintf */
1297 Perl_ck_fun, /* formline */
1298 Perl_ck_fun, /* ord */
1299 Perl_ck_fun, /* chr */
1300 Perl_ck_fun, /* crypt */
1301 Perl_ck_fun, /* ucfirst */
1302 Perl_ck_fun, /* lcfirst */
1303 Perl_ck_fun, /* uc */
1304 Perl_ck_fun, /* lc */
1305 Perl_ck_fun, /* quotemeta */
1306 Perl_ck_rvconst, /* rv2av */
1307 Perl_ck_null, /* aelemfast */
1308 Perl_ck_null, /* aelem */
1309 Perl_ck_null, /* aslice */
1310 Perl_ck_each, /* aeach */
1311 Perl_ck_each, /* akeys */
1312 Perl_ck_each, /* avalues */
1313 Perl_ck_each, /* each */
1314 Perl_ck_each, /* values */
1315 Perl_ck_each, /* keys */
1316 Perl_ck_delete, /* delete */
1317 Perl_ck_exists, /* exists */
1318 Perl_ck_rvconst, /* rv2hv */
1319 Perl_ck_null, /* helem */
1320 Perl_ck_null, /* hslice */
1321 Perl_ck_fun, /* boolkeys */
1322 Perl_ck_unpack, /* unpack */
1323 Perl_ck_fun, /* pack */
1324 Perl_ck_split, /* split */
1325 Perl_ck_join, /* join */
1326 Perl_ck_null, /* list */
1327 Perl_ck_null, /* lslice */
1328 Perl_ck_fun, /* anonlist */
1329 Perl_ck_fun, /* anonhash */
1330 Perl_ck_fun, /* splice */
1331 Perl_ck_fun, /* push */
1332 Perl_ck_shift, /* pop */
1333 Perl_ck_shift, /* shift */
1334 Perl_ck_fun, /* unshift */
1335 Perl_ck_sort, /* sort */
1336 Perl_ck_fun, /* reverse */
1337 Perl_ck_grep, /* grepstart */
1338 Perl_ck_null, /* grepwhile */
1339 Perl_ck_grep, /* mapstart */
1340 Perl_ck_null, /* mapwhile */
1341 Perl_ck_null, /* range */
1342 Perl_ck_null, /* flip */
1343 Perl_ck_null, /* flop */
1344 Perl_ck_null, /* and */
1345 Perl_ck_null, /* or */
1346 Perl_ck_null, /* xor */
1347 Perl_ck_null, /* dor */
1348 Perl_ck_null, /* cond_expr */
1349 Perl_ck_null, /* andassign */
1350 Perl_ck_null, /* orassign */
1351 Perl_ck_null, /* dorassign */
1352 Perl_ck_method, /* method */
1353 Perl_ck_subr, /* entersub */
1354 Perl_ck_null, /* leavesub */
1355 Perl_ck_null, /* leavesublv */
1356 Perl_ck_fun, /* caller */
1357 Perl_ck_fun, /* warn */
1358 Perl_ck_die, /* die */
1359 Perl_ck_fun, /* reset */
1360 Perl_ck_null, /* lineseq */
1361 Perl_ck_null, /* nextstate */
1362 Perl_ck_null, /* dbstate */
1363 Perl_ck_null, /* unstack */
1364 Perl_ck_null, /* enter */
1365 Perl_ck_null, /* leave */
1366 Perl_ck_null, /* scope */
1367 Perl_ck_null, /* enteriter */
1368 Perl_ck_null, /* iter */
1369 Perl_ck_null, /* enterloop */
1370 Perl_ck_null, /* leaveloop */
1371 Perl_ck_return, /* return */
1372 Perl_ck_null, /* last */
1373 Perl_ck_null, /* next */
1374 Perl_ck_null, /* redo */
1375 Perl_ck_null, /* dump */
1376 Perl_ck_null, /* goto */
1377 Perl_ck_exit, /* exit */
1378 Perl_ck_null, /* method_named */
1379 Perl_ck_null, /* entergiven */
1380 Perl_ck_null, /* leavegiven */
1381 Perl_ck_null, /* enterwhen */
1382 Perl_ck_null, /* leavewhen */
1383 Perl_ck_null, /* break */
1384 Perl_ck_null, /* continue */
1385 Perl_ck_open, /* open */
1386 Perl_ck_fun, /* close */
1387 Perl_ck_fun, /* pipe_op */
1388 Perl_ck_fun, /* fileno */
1389 Perl_ck_fun, /* umask */
1390 Perl_ck_fun, /* binmode */
1391 Perl_ck_fun, /* tie */
1392 Perl_ck_fun, /* untie */
1393 Perl_ck_fun, /* tied */
1394 Perl_ck_fun, /* dbmopen */
1395 Perl_ck_fun, /* dbmclose */
1396 Perl_ck_select, /* sselect */
1397 Perl_ck_select, /* select */
1398 Perl_ck_eof, /* getc */
1399 Perl_ck_fun, /* read */
1400 Perl_ck_fun, /* enterwrite */
1401 Perl_ck_null, /* leavewrite */
1402 Perl_ck_listiob, /* prtf */
1403 Perl_ck_listiob, /* print */
1404 Perl_ck_listiob, /* say */
1405 Perl_ck_fun, /* sysopen */
1406 Perl_ck_fun, /* sysseek */
1407 Perl_ck_fun, /* sysread */
1408 Perl_ck_fun, /* syswrite */
1409 Perl_ck_eof, /* eof */
1410 Perl_ck_fun, /* tell */
1411 Perl_ck_fun, /* seek */
1412 Perl_ck_trunc, /* truncate */
1413 Perl_ck_fun, /* fcntl */
1414 Perl_ck_fun, /* ioctl */
1415 Perl_ck_fun, /* flock */
1416 Perl_ck_fun, /* send */
1417 Perl_ck_fun, /* recv */
1418 Perl_ck_fun, /* socket */
1419 Perl_ck_fun, /* sockpair */
1420 Perl_ck_fun, /* bind */
1421 Perl_ck_fun, /* connect */
1422 Perl_ck_fun, /* listen */
1423 Perl_ck_fun, /* accept */
1424 Perl_ck_fun, /* shutdown */
1425 Perl_ck_fun, /* gsockopt */
1426 Perl_ck_fun, /* ssockopt */
1427 Perl_ck_fun, /* getsockname */
1428 Perl_ck_fun, /* getpeername */
1429 Perl_ck_ftst, /* lstat */
1430 Perl_ck_ftst, /* stat */
1431 Perl_ck_ftst, /* ftrread */
1432 Perl_ck_ftst, /* ftrwrite */
1433 Perl_ck_ftst, /* ftrexec */
1434 Perl_ck_ftst, /* fteread */
1435 Perl_ck_ftst, /* ftewrite */
1436 Perl_ck_ftst, /* fteexec */
1437 Perl_ck_ftst, /* ftis */
1438 Perl_ck_ftst, /* ftsize */
1439 Perl_ck_ftst, /* ftmtime */
1440 Perl_ck_ftst, /* ftatime */
1441 Perl_ck_ftst, /* ftctime */
1442 Perl_ck_ftst, /* ftrowned */
1443 Perl_ck_ftst, /* fteowned */
1444 Perl_ck_ftst, /* ftzero */
1445 Perl_ck_ftst, /* ftsock */
1446 Perl_ck_ftst, /* ftchr */
1447 Perl_ck_ftst, /* ftblk */
1448 Perl_ck_ftst, /* ftfile */
1449 Perl_ck_ftst, /* ftdir */
1450 Perl_ck_ftst, /* ftpipe */
1451 Perl_ck_ftst, /* ftsuid */
1452 Perl_ck_ftst, /* ftsgid */
1453 Perl_ck_ftst, /* ftsvtx */
1454 Perl_ck_ftst, /* ftlink */
1455 Perl_ck_ftst, /* fttty */
1456 Perl_ck_ftst, /* fttext */
1457 Perl_ck_ftst, /* ftbinary */
1458 Perl_ck_chdir, /* chdir */
1459 Perl_ck_fun, /* chown */
1460 Perl_ck_fun, /* chroot */
1461 Perl_ck_fun, /* unlink */
1462 Perl_ck_fun, /* chmod */
1463 Perl_ck_fun, /* utime */
1464 Perl_ck_fun, /* rename */
1465 Perl_ck_fun, /* link */
1466 Perl_ck_fun, /* symlink */
1467 Perl_ck_fun, /* readlink */
1468 Perl_ck_fun, /* mkdir */
1469 Perl_ck_fun, /* rmdir */
1470 Perl_ck_fun, /* open_dir */
1471 Perl_ck_fun, /* readdir */
1472 Perl_ck_fun, /* telldir */
1473 Perl_ck_fun, /* seekdir */
1474 Perl_ck_fun, /* rewinddir */
1475 Perl_ck_fun, /* closedir */
1476 Perl_ck_null, /* fork */
1477 Perl_ck_null, /* wait */
1478 Perl_ck_fun, /* waitpid */
1479 Perl_ck_exec, /* system */
1480 Perl_ck_exec, /* exec */
1481 Perl_ck_fun, /* kill */
1482 Perl_ck_null, /* getppid */
1483 Perl_ck_fun, /* getpgrp */
1484 Perl_ck_fun, /* setpgrp */
1485 Perl_ck_fun, /* getpriority */
1486 Perl_ck_fun, /* setpriority */
1487 Perl_ck_null, /* time */
1488 Perl_ck_null, /* tms */
1489 Perl_ck_fun, /* localtime */
1490 Perl_ck_fun, /* gmtime */
1491 Perl_ck_fun, /* alarm */
1492 Perl_ck_fun, /* sleep */
1493 Perl_ck_fun, /* shmget */
1494 Perl_ck_fun, /* shmctl */
1495 Perl_ck_fun, /* shmread */
1496 Perl_ck_fun, /* shmwrite */
1497 Perl_ck_fun, /* msgget */
1498 Perl_ck_fun, /* msgctl */
1499 Perl_ck_fun, /* msgsnd */
1500 Perl_ck_fun, /* msgrcv */
1501 Perl_ck_fun, /* semop */
1502 Perl_ck_fun, /* semget */
1503 Perl_ck_fun, /* semctl */
1504 Perl_ck_require, /* require */
1505 Perl_ck_fun, /* dofile */
1506 Perl_ck_svconst, /* hintseval */
1507 Perl_ck_eval, /* entereval */
1508 Perl_ck_null, /* leaveeval */
1509 Perl_ck_eval, /* entertry */
1510 Perl_ck_null, /* leavetry */
1511 Perl_ck_fun, /* ghbyname */
1512 Perl_ck_fun, /* ghbyaddr */
1513 Perl_ck_null, /* ghostent */
1514 Perl_ck_fun, /* gnbyname */
1515 Perl_ck_fun, /* gnbyaddr */
1516 Perl_ck_null, /* gnetent */
1517 Perl_ck_fun, /* gpbyname */
1518 Perl_ck_fun, /* gpbynumber */
1519 Perl_ck_null, /* gprotoent */
1520 Perl_ck_fun, /* gsbyname */
1521 Perl_ck_fun, /* gsbyport */
1522 Perl_ck_null, /* gservent */
1523 Perl_ck_fun, /* shostent */
1524 Perl_ck_fun, /* snetent */
1525 Perl_ck_fun, /* sprotoent */
1526 Perl_ck_fun, /* sservent */
1527 Perl_ck_null, /* ehostent */
1528 Perl_ck_null, /* enetent */
1529 Perl_ck_null, /* eprotoent */
1530 Perl_ck_null, /* eservent */
1531 Perl_ck_fun, /* gpwnam */
1532 Perl_ck_fun, /* gpwuid */
1533 Perl_ck_null, /* gpwent */
1534 Perl_ck_null, /* spwent */
1535 Perl_ck_null, /* epwent */
1536 Perl_ck_fun, /* ggrnam */
1537 Perl_ck_fun, /* ggrgid */
1538 Perl_ck_null, /* ggrent */
1539 Perl_ck_null, /* sgrent */
1540 Perl_ck_null, /* egrent */
1541 Perl_ck_null, /* getlogin */
1542 Perl_ck_fun, /* syscall */
1543 Perl_ck_rfun, /* lock */
1544 Perl_ck_null, /* once */
1545 Perl_ck_null, /* custom */
1548 #ifdef PERL_CHECK_INITED
1550 #endif /* #ifdef PERL_CHECK_INITED */
1552 #ifndef PERL_GLOBAL_STRUCT_INIT
1555 EXTCONST U32 PL_opargs[];
1557 EXTCONST U32 PL_opargs[] = {
1558 0x00000000, /* null */
1559 0x00000000, /* stub */
1560 0x00001b04, /* scalar */
1561 0x00000004, /* pushmark */
1562 0x00000004, /* wantarray */
1563 0x00000604, /* const */
1564 0x00000644, /* gvsv */
1565 0x00000644, /* gv */
1566 0x00011240, /* gelem */
1567 0x00000044, /* padsv */
1568 0x00000040, /* padav */
1569 0x00000040, /* padhv */
1570 0x00000040, /* padany */
1571 0x00000540, /* pushre */
1572 0x00000144, /* rv2gv */
1573 0x00000144, /* rv2sv */
1574 0x00000104, /* av2arylen */
1575 0x00000140, /* rv2cv */
1576 0x00000600, /* anoncode */
1577 0x00001b04, /* prototype */
1578 0x00002101, /* refgen */
1579 0x00001106, /* srefgen */
1580 0x00009b8c, /* ref */
1581 0x00091404, /* bless */
1582 0x00009b88, /* backtick */
1583 0x00009408, /* glob */
1584 0x0000eb08, /* readline */
1585 0x00000608, /* rcatline */
1586 0x00001104, /* regcmaybe */
1587 0x00001104, /* regcreset */
1588 0x00001304, /* regcomp */
1589 0x00000540, /* match */
1590 0x00000504, /* qr */
1591 0x00001544, /* subst */
1592 0x00000344, /* substcont */
1593 0x00001804, /* trans */
1594 0x00000004, /* sassign */
1595 0x00022208, /* aassign */
1596 0x00002b0d, /* chop */
1597 0x00009b8c, /* schop */
1598 0x00002b1d, /* chomp */
1599 0x00009b9c, /* schomp */
1600 0x00009b84, /* defined */
1601 0x00009b04, /* undef */
1602 0x00009b84, /* study */
1603 0x00009b8c, /* pos */
1604 0x00001164, /* preinc */
1605 0x00001144, /* i_preinc */
1606 0x00001164, /* predec */
1607 0x00001144, /* i_predec */
1608 0x0000116c, /* postinc */
1609 0x0000115c, /* i_postinc */
1610 0x0000116c, /* postdec */
1611 0x0000115c, /* i_postdec */
1612 0x0001121e, /* pow */
1613 0x0001123e, /* multiply */
1614 0x0001121e, /* i_multiply */
1615 0x0001123e, /* divide */
1616 0x0001121e, /* i_divide */
1617 0x0001123e, /* modulo */
1618 0x0001121e, /* i_modulo */
1619 0x00012209, /* repeat */
1620 0x0001123e, /* add */
1621 0x0001121e, /* i_add */
1622 0x0001123e, /* subtract */
1623 0x0001121e, /* i_subtract */
1624 0x0001121e, /* concat */
1625 0x0000141e, /* stringify */
1626 0x0001121e, /* left_shift */
1627 0x0001121e, /* right_shift */
1628 0x00011226, /* lt */
1629 0x00011206, /* i_lt */
1630 0x00011226, /* gt */
1631 0x00011206, /* i_gt */
1632 0x00011226, /* le */
1633 0x00011206, /* i_le */
1634 0x00011226, /* ge */
1635 0x00011206, /* i_ge */
1636 0x00011226, /* eq */
1637 0x00011206, /* i_eq */
1638 0x00011226, /* ne */
1639 0x00011206, /* i_ne */
1640 0x0001122e, /* ncmp */
1641 0x0001120e, /* i_ncmp */
1642 0x00011206, /* slt */
1643 0x00011206, /* sgt */
1644 0x00011206, /* sle */
1645 0x00011206, /* sge */
1646 0x00011206, /* seq */
1647 0x00011206, /* sne */
1648 0x0001120e, /* scmp */
1649 0x0001120e, /* bit_and */
1650 0x0001120e, /* bit_xor */
1651 0x0001120e, /* bit_or */
1652 0x0000112e, /* negate */
1653 0x0000111e, /* i_negate */
1654 0x00001106, /* not */
1655 0x0000110e, /* complement */
1656 0x00000204, /* smartmatch */
1657 0x0001141e, /* atan2 */
1658 0x00009b9e, /* sin */
1659 0x00009b9e, /* cos */
1660 0x00009b1c, /* rand */
1661 0x00009b1c, /* srand */
1662 0x00009b9e, /* exp */
1663 0x00009b9e, /* log */
1664 0x00009b9e, /* sqrt */
1665 0x00009b9e, /* int */
1666 0x00009b9e, /* hex */
1667 0x00009b9e, /* oct */
1668 0x00009b9e, /* abs */
1669 0x00009b9e, /* length */
1670 0x0991140c, /* substr */
1671 0x0011140c, /* vec */
1672 0x0091141c, /* index */
1673 0x0091141c, /* rindex */
1674 0x0002140f, /* sprintf */
1675 0x00021405, /* formline */
1676 0x00009b9e, /* ord */
1677 0x00009b9e, /* chr */
1678 0x0001141e, /* crypt */
1679 0x00009b8e, /* ucfirst */
1680 0x00009b8e, /* lcfirst */
1681 0x00009b8e, /* uc */
1682 0x00009b8e, /* lc */
1683 0x00009b8e, /* quotemeta */
1684 0x00000148, /* rv2av */
1685 0x00013604, /* aelemfast */
1686 0x00013204, /* aelem */
1687 0x00023401, /* aslice */
1688 0x00003b00, /* aeach */
1689 0x00003b08, /* akeys */
1690 0x00003b08, /* avalues */
1691 0x00004b00, /* each */
1692 0x00004b08, /* values */
1693 0x00004b08, /* keys */
1694 0x00001b00, /* delete */
1695 0x00001b04, /* exists */
1696 0x00000148, /* rv2hv */
1697 0x00014204, /* helem */
1698 0x00024401, /* hslice */
1699 0x00004b00, /* boolkeys */
1700 0x00091400, /* unpack */
1701 0x0002140d, /* pack */
1702 0x00111408, /* split */
1703 0x0002140d, /* join */
1704 0x00002401, /* list */
1705 0x00224200, /* lslice */
1706 0x00002405, /* anonlist */
1707 0x00002405, /* anonhash */
1708 0x02993401, /* splice */
1709 0x0002341d, /* push */
1710 0x0000bb04, /* pop */
1711 0x0000bb04, /* shift */
1712 0x0002341d, /* unshift */
1713 0x0002d441, /* sort */
1714 0x00002409, /* reverse */
1715 0x00025441, /* grepstart */
1716 0x00000348, /* grepwhile */
1717 0x00025441, /* mapstart */
1718 0x00000348, /* mapwhile */
1719 0x00011300, /* range */
1720 0x00011100, /* flip */
1721 0x00000100, /* flop */
1722 0x00000300, /* and */
1723 0x00000300, /* or */
1724 0x00011206, /* xor */
1725 0x00000300, /* dor */
1726 0x00000340, /* cond_expr */
1727 0x00000304, /* andassign */
1728 0x00000304, /* orassign */
1729 0x00000304, /* dorassign */
1730 0x00000140, /* method */
1731 0x00002149, /* entersub */
1732 0x00000100, /* leavesub */
1733 0x00000100, /* leavesublv */
1734 0x00009b08, /* caller */
1735 0x0000240d, /* warn */
1736 0x0000244d, /* die */
1737 0x00009b04, /* reset */
1738 0x00000400, /* lineseq */
1739 0x00000a04, /* nextstate */
1740 0x00000a04, /* dbstate */
1741 0x00000004, /* unstack */
1742 0x00000000, /* enter */
1743 0x00000400, /* leave */
1744 0x00000400, /* scope */
1745 0x00000940, /* enteriter */
1746 0x00000000, /* iter */
1747 0x00000940, /* enterloop */
1748 0x00000200, /* leaveloop */
1749 0x00002441, /* return */
1750 0x00000d44, /* last */
1751 0x00000d44, /* next */
1752 0x00000d44, /* redo */
1753 0x00000d44, /* dump */
1754 0x00000d44, /* goto */
1755 0x00009b44, /* exit */
1756 0x00000640, /* method_named */
1757 0x00000340, /* entergiven */
1758 0x00000100, /* leavegiven */
1759 0x00000340, /* enterwhen */
1760 0x00000100, /* leavewhen */
1761 0x00000000, /* break */
1762 0x00000000, /* continue */
1763 0x0029640d, /* open */
1764 0x0000eb04, /* close */
1765 0x00066404, /* pipe_op */
1766 0x00006b0c, /* fileno */
1767 0x00009b0c, /* umask */
1768 0x00096404, /* binmode */
1769 0x00217445, /* tie */
1770 0x00007b04, /* untie */
1771 0x00007b04, /* tied */
1772 0x00114404, /* dbmopen */
1773 0x00004b04, /* dbmclose */
1774 0x01111408, /* sselect */
1775 0x0000e40c, /* select */
1776 0x0000eb0c, /* getc */
1777 0x0917640d, /* read */
1778 0x0000eb44, /* enterwrite */
1779 0x00000100, /* leavewrite */
1780 0x0002e405, /* prtf */
1781 0x0002e405, /* print */
1782 0x0002e405, /* say */
1783 0x09116404, /* sysopen */
1784 0x00116404, /* sysseek */
1785 0x0917640d, /* sysread */
1786 0x0991640d, /* syswrite */
1787 0x0000eb04, /* eof */
1788 0x0000eb0c, /* tell */
1789 0x00116404, /* seek */
1790 0x00011404, /* truncate */
1791 0x0011640c, /* fcntl */
1792 0x0011640c, /* ioctl */
1793 0x0001641c, /* flock */
1794 0x0911640d, /* send */
1795 0x0117640d, /* recv */
1796 0x01116404, /* socket */
1797 0x11166404, /* sockpair */
1798 0x00016404, /* bind */
1799 0x00016404, /* connect */
1800 0x00016404, /* listen */
1801 0x0006640c, /* accept */
1802 0x0001640c, /* shutdown */
1803 0x00116404, /* gsockopt */
1804 0x01116404, /* ssockopt */
1805 0x00006b04, /* getsockname */
1806 0x00006b04, /* getpeername */
1807 0x00006c80, /* lstat */
1808 0x00006c80, /* stat */
1809 0x00006c84, /* ftrread */
1810 0x00006c84, /* ftrwrite */
1811 0x00006c84, /* ftrexec */
1812 0x00006c84, /* fteread */
1813 0x00006c84, /* ftewrite */
1814 0x00006c84, /* fteexec */
1815 0x00006c84, /* ftis */
1816 0x00006c8c, /* ftsize */
1817 0x00006c8c, /* ftmtime */
1818 0x00006c8c, /* ftatime */
1819 0x00006c8c, /* ftctime */
1820 0x00006c84, /* ftrowned */
1821 0x00006c84, /* fteowned */
1822 0x00006c84, /* ftzero */
1823 0x00006c84, /* ftsock */
1824 0x00006c84, /* ftchr */
1825 0x00006c84, /* ftblk */
1826 0x00006c84, /* ftfile */
1827 0x00006c84, /* ftdir */
1828 0x00006c84, /* ftpipe */
1829 0x00006c84, /* ftsuid */
1830 0x00006c84, /* ftsgid */
1831 0x00006c84, /* ftsvtx */
1832 0x00006c84, /* ftlink */
1833 0x00006c04, /* fttty */
1834 0x00006c84, /* fttext */
1835 0x00006c84, /* ftbinary */
1836 0x00009b1c, /* chdir */
1837 0x0000241d, /* chown */
1838 0x00009b9c, /* chroot */
1839 0x0000249d, /* unlink */
1840 0x0000241d, /* chmod */
1841 0x0000241d, /* utime */
1842 0x0001141c, /* rename */
1843 0x0001141c, /* link */
1844 0x0001141c, /* symlink */
1845 0x00009b8c, /* readlink */
1846 0x0009949c, /* mkdir */
1847 0x00009b9c, /* rmdir */
1848 0x00016404, /* open_dir */
1849 0x00006b00, /* readdir */
1850 0x00006b0c, /* telldir */
1851 0x00016404, /* seekdir */
1852 0x00006b04, /* rewinddir */
1853 0x00006b04, /* closedir */
1854 0x0000000c, /* fork */
1855 0x0000001c, /* wait */
1856 0x0001141c, /* waitpid */
1857 0x0002941d, /* system */
1858 0x0002945d, /* exec */
1859 0x0000245d, /* kill */
1860 0x0000001c, /* getppid */
1861 0x00009b1c, /* getpgrp */
1862 0x0009941c, /* setpgrp */
1863 0x0001141c, /* getpriority */
1864 0x0011141c, /* setpriority */
1865 0x0000001c, /* time */
1866 0x00000000, /* tms */
1867 0x00009b08, /* localtime */
1868 0x00009b08, /* gmtime */
1869 0x00009b8c, /* alarm */
1870 0x00009b1c, /* sleep */
1871 0x0011140d, /* shmget */
1872 0x0011140d, /* shmctl */
1873 0x0111140d, /* shmread */
1874 0x0111140d, /* shmwrite */
1875 0x0001140d, /* msgget */
1876 0x0011140d, /* msgctl */
1877 0x0011140d, /* msgsnd */
1878 0x1111140d, /* msgrcv */
1879 0x0001140d, /* semop */
1880 0x0011140d, /* semget */
1881 0x0111140d, /* semctl */
1882 0x00009bc0, /* require */
1883 0x00001140, /* dofile */
1884 0x00000604, /* hintseval */
1885 0x00001b40, /* entereval */
1886 0x00001100, /* leaveeval */
1887 0x00000b40, /* entertry */
1888 0x00000400, /* leavetry */
1889 0x00001b00, /* ghbyname */
1890 0x00011400, /* ghbyaddr */
1891 0x00000000, /* ghostent */
1892 0x00001b00, /* gnbyname */
1893 0x00011400, /* gnbyaddr */
1894 0x00000000, /* gnetent */
1895 0x00001b00, /* gpbyname */
1896 0x00001400, /* gpbynumber */
1897 0x00000000, /* gprotoent */
1898 0x00011400, /* gsbyname */
1899 0x00011400, /* gsbyport */
1900 0x00000000, /* gservent */
1901 0x00001b04, /* shostent */
1902 0x00001b04, /* snetent */
1903 0x00001b04, /* sprotoent */
1904 0x00001b04, /* sservent */
1905 0x00000004, /* ehostent */
1906 0x00000004, /* enetent */
1907 0x00000004, /* eprotoent */
1908 0x00000004, /* eservent */
1909 0x00001b00, /* gpwnam */
1910 0x00001b00, /* gpwuid */
1911 0x00000000, /* gpwent */
1912 0x00000004, /* spwent */
1913 0x00000004, /* epwent */
1914 0x00001b00, /* ggrnam */
1915 0x00001b00, /* ggrgid */
1916 0x00000000, /* ggrent */
1917 0x00000004, /* sgrent */
1918 0x00000004, /* egrent */
1919 0x0000000c, /* getlogin */
1920 0x0002140d, /* syscall */
1921 0x00007b04, /* lock */
1922 0x00000300, /* once */
1923 0x00000000, /* custom */
1927 #endif /* !PERL_GLOBAL_STRUCT_INIT */