projects / p5sagit/p5-mst-13.2.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw
Fix a Win32 linker error following change #25972
[p5sagit/p5-mst-13.2.git] / opcode.h
diff --git a/opcode.h b/opcode.h
index ab72fed..bd53d0c 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -768,7 +768,7 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
 = {
        MEMBER_TO_FPTR(Perl_pp_null),
        MEMBER_TO_FPTR(Perl_pp_stub),
-       MEMBER_TO_FPTR(Perl_pp_scalar),
+       MEMBER_TO_FPTR(Perl_pp_null),   /* Perl_pp_scalar */
        MEMBER_TO_FPTR(Perl_pp_pushmark),
        MEMBER_TO_FPTR(Perl_pp_wantarray),
        MEMBER_TO_FPTR(Perl_pp_const),
@@ -794,7 +794,7 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_glob),
        MEMBER_TO_FPTR(Perl_pp_readline),
        MEMBER_TO_FPTR(Perl_pp_rcatline),
-       MEMBER_TO_FPTR(Perl_pp_regcmaybe),
+       MEMBER_TO_FPTR(Perl_pp_null),   /* Perl_pp_regcmaybe */
        MEMBER_TO_FPTR(Perl_pp_regcreset),
        MEMBER_TO_FPTR(Perl_pp_regcomp),
        MEMBER_TO_FPTR(Perl_pp_match),
@@ -939,13 +939,13 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_warn),
        MEMBER_TO_FPTR(Perl_pp_die),
        MEMBER_TO_FPTR(Perl_pp_reset),
-       MEMBER_TO_FPTR(Perl_pp_lineseq),
+       MEMBER_TO_FPTR(Perl_pp_null),   /* Perl_pp_lineseq */
        MEMBER_TO_FPTR(Perl_pp_nextstate),
        MEMBER_TO_FPTR(Perl_pp_dbstate),
        MEMBER_TO_FPTR(Perl_pp_unstack),
        MEMBER_TO_FPTR(Perl_pp_enter),
        MEMBER_TO_FPTR(Perl_pp_leave),
-       MEMBER_TO_FPTR(Perl_pp_scope),
+       MEMBER_TO_FPTR(Perl_pp_null),   /* Perl_pp_scope */
        MEMBER_TO_FPTR(Perl_pp_enteriter),
        MEMBER_TO_FPTR(Perl_pp_iter),
        MEMBER_TO_FPTR(Perl_pp_enterloop),
@@ -954,7 +954,7 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_last),
        MEMBER_TO_FPTR(Perl_pp_next),
        MEMBER_TO_FPTR(Perl_pp_redo),
-       MEMBER_TO_FPTR(Perl_pp_dump),
+       MEMBER_TO_FPTR(Perl_pp_goto),   /* Perl_pp_dump */
        MEMBER_TO_FPTR(Perl_pp_goto),
        MEMBER_TO_FPTR(Perl_pp_exit),
        MEMBER_TO_FPTR(Perl_pp_open),
@@ -967,11 +967,11 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_untie),
        MEMBER_TO_FPTR(Perl_pp_tied),
        MEMBER_TO_FPTR(Perl_pp_dbmopen),
-       MEMBER_TO_FPTR(Perl_pp_dbmclose),
+       MEMBER_TO_FPTR(Perl_pp_untie),  /* Perl_pp_dbmclose */
        MEMBER_TO_FPTR(Perl_pp_sselect),
        MEMBER_TO_FPTR(Perl_pp_select),
        MEMBER_TO_FPTR(Perl_pp_getc),
-       MEMBER_TO_FPTR(Perl_pp_read),
+       MEMBER_TO_FPTR(Perl_pp_sysread),        /* Perl_pp_read */
        MEMBER_TO_FPTR(Perl_pp_enterwrite),
        MEMBER_TO_FPTR(Perl_pp_leavewrite),
        MEMBER_TO_FPTR(Perl_pp_prtf),
@@ -981,12 +981,12 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_sysread),
        MEMBER_TO_FPTR(Perl_pp_syswrite),
        MEMBER_TO_FPTR(Perl_pp_send),
-       MEMBER_TO_FPTR(Perl_pp_recv),
+       MEMBER_TO_FPTR(Perl_pp_sysread),        /* Perl_pp_recv */
        MEMBER_TO_FPTR(Perl_pp_eof),
        MEMBER_TO_FPTR(Perl_pp_tell),
-       MEMBER_TO_FPTR(Perl_pp_seek),
+       MEMBER_TO_FPTR(Perl_pp_sysseek),        /* Perl_pp_seek */
        MEMBER_TO_FPTR(Perl_pp_truncate),
-       MEMBER_TO_FPTR(Perl_pp_fcntl),
+       MEMBER_TO_FPTR(Perl_pp_ioctl),  /* Perl_pp_fcntl */
        MEMBER_TO_FPTR(Perl_pp_ioctl),
        MEMBER_TO_FPTR(Perl_pp_flock),
        MEMBER_TO_FPTR(Perl_pp_socket),
@@ -996,48 +996,48 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_listen),
        MEMBER_TO_FPTR(Perl_pp_accept),
        MEMBER_TO_FPTR(Perl_pp_shutdown),
-       MEMBER_TO_FPTR(Perl_pp_gsockopt),
+       MEMBER_TO_FPTR(Perl_pp_ssockopt),       /* Perl_pp_gsockopt */
        MEMBER_TO_FPTR(Perl_pp_ssockopt),
-       MEMBER_TO_FPTR(Perl_pp_getsockname),
+       MEMBER_TO_FPTR(Perl_pp_getpeername),    /* Perl_pp_getsockname */
        MEMBER_TO_FPTR(Perl_pp_getpeername),
-       MEMBER_TO_FPTR(Perl_pp_lstat),
+       MEMBER_TO_FPTR(Perl_pp_stat),   /* Perl_pp_lstat */
        MEMBER_TO_FPTR(Perl_pp_stat),
        MEMBER_TO_FPTR(Perl_pp_ftrread),
-       MEMBER_TO_FPTR(Perl_pp_ftrwrite),
-       MEMBER_TO_FPTR(Perl_pp_ftrexec),
-       MEMBER_TO_FPTR(Perl_pp_fteread),
-       MEMBER_TO_FPTR(Perl_pp_ftewrite),
-       MEMBER_TO_FPTR(Perl_pp_fteexec),
+       MEMBER_TO_FPTR(Perl_pp_ftrread),        /* Perl_pp_ftrwrite */
+       MEMBER_TO_FPTR(Perl_pp_ftrread),        /* Perl_pp_ftrexec */
+       MEMBER_TO_FPTR(Perl_pp_ftrread),        /* Perl_pp_fteread */
+       MEMBER_TO_FPTR(Perl_pp_ftrread),        /* Perl_pp_ftewrite */
+       MEMBER_TO_FPTR(Perl_pp_ftrread),        /* Perl_pp_fteexec */
        MEMBER_TO_FPTR(Perl_pp_ftis),
-       MEMBER_TO_FPTR(Perl_pp_fteowned),
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_fteowned */
        MEMBER_TO_FPTR(Perl_pp_ftrowned),
-       MEMBER_TO_FPTR(Perl_pp_ftzero),
-       MEMBER_TO_FPTR(Perl_pp_ftsize),
-       MEMBER_TO_FPTR(Perl_pp_ftmtime),
-       MEMBER_TO_FPTR(Perl_pp_ftatime),
-       MEMBER_TO_FPTR(Perl_pp_ftctime),
-       MEMBER_TO_FPTR(Perl_pp_ftsock),
-       MEMBER_TO_FPTR(Perl_pp_ftchr),
-       MEMBER_TO_FPTR(Perl_pp_ftblk),
-       MEMBER_TO_FPTR(Perl_pp_ftfile),
-       MEMBER_TO_FPTR(Perl_pp_ftdir),
-       MEMBER_TO_FPTR(Perl_pp_ftpipe),
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftzero */
+       MEMBER_TO_FPTR(Perl_pp_ftis),   /* Perl_pp_ftsize */
+       MEMBER_TO_FPTR(Perl_pp_ftis),   /* Perl_pp_ftmtime */
+       MEMBER_TO_FPTR(Perl_pp_ftis),   /* Perl_pp_ftatime */
+       MEMBER_TO_FPTR(Perl_pp_ftis),   /* Perl_pp_ftctime */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftsock */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftchr */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftblk */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftfile */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftdir */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftpipe */
        MEMBER_TO_FPTR(Perl_pp_ftlink),
-       MEMBER_TO_FPTR(Perl_pp_ftsuid),
-       MEMBER_TO_FPTR(Perl_pp_ftsgid),
-       MEMBER_TO_FPTR(Perl_pp_ftsvtx),
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftsuid */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftsgid */
+       MEMBER_TO_FPTR(Perl_pp_ftrowned),       /* Perl_pp_ftsvtx */
        MEMBER_TO_FPTR(Perl_pp_fttty),
        MEMBER_TO_FPTR(Perl_pp_fttext),
-       MEMBER_TO_FPTR(Perl_pp_ftbinary),
+       MEMBER_TO_FPTR(Perl_pp_fttext), /* Perl_pp_ftbinary */
        MEMBER_TO_FPTR(Perl_pp_chdir),
        MEMBER_TO_FPTR(Perl_pp_chown),
        MEMBER_TO_FPTR(Perl_pp_chroot),
-       MEMBER_TO_FPTR(Perl_pp_unlink),
-       MEMBER_TO_FPTR(Perl_pp_chmod),
-       MEMBER_TO_FPTR(Perl_pp_utime),
+       MEMBER_TO_FPTR(Perl_pp_chown),  /* Perl_pp_unlink */
+       MEMBER_TO_FPTR(Perl_pp_chown),  /* Perl_pp_chmod */
+       MEMBER_TO_FPTR(Perl_pp_chown),  /* Perl_pp_utime */
        MEMBER_TO_FPTR(Perl_pp_rename),
        MEMBER_TO_FPTR(Perl_pp_link),
-       MEMBER_TO_FPTR(Perl_pp_symlink),
+       MEMBER_TO_FPTR(Perl_pp_link),   /* Perl_pp_symlink */
        MEMBER_TO_FPTR(Perl_pp_readlink),
        MEMBER_TO_FPTR(Perl_pp_mkdir),
        MEMBER_TO_FPTR(Perl_pp_rmdir),
@@ -1052,7 +1052,7 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_waitpid),
        MEMBER_TO_FPTR(Perl_pp_system),
        MEMBER_TO_FPTR(Perl_pp_exec),
-       MEMBER_TO_FPTR(Perl_pp_kill),
+       MEMBER_TO_FPTR(Perl_pp_chown),  /* Perl_pp_kill */
        MEMBER_TO_FPTR(Perl_pp_getppid),
        MEMBER_TO_FPTR(Perl_pp_getpgrp),
        MEMBER_TO_FPTR(Perl_pp_setpgrp),
@@ -1060,38 +1060,38 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_setpriority),
        MEMBER_TO_FPTR(Perl_pp_time),
        MEMBER_TO_FPTR(Perl_pp_tms),
-       MEMBER_TO_FPTR(Perl_pp_localtime),
+       MEMBER_TO_FPTR(Perl_pp_gmtime), /* Perl_pp_localtime */
        MEMBER_TO_FPTR(Perl_pp_gmtime),
        MEMBER_TO_FPTR(Perl_pp_alarm),
        MEMBER_TO_FPTR(Perl_pp_sleep),
-       MEMBER_TO_FPTR(Perl_pp_shmget),
-       MEMBER_TO_FPTR(Perl_pp_shmctl),
-       MEMBER_TO_FPTR(Perl_pp_shmread),
+       MEMBER_TO_FPTR(Perl_pp_semget), /* Perl_pp_shmget */
+       MEMBER_TO_FPTR(Perl_pp_semctl), /* Perl_pp_shmctl */
+       MEMBER_TO_FPTR(Perl_pp_shmwrite),       /* Perl_pp_shmread */
        MEMBER_TO_FPTR(Perl_pp_shmwrite),
-       MEMBER_TO_FPTR(Perl_pp_msgget),
-       MEMBER_TO_FPTR(Perl_pp_msgctl),
-       MEMBER_TO_FPTR(Perl_pp_msgsnd),
-       MEMBER_TO_FPTR(Perl_pp_msgrcv),
+       MEMBER_TO_FPTR(Perl_pp_semget), /* Perl_pp_msgget */
+       MEMBER_TO_FPTR(Perl_pp_semctl), /* Perl_pp_msgctl */
+       MEMBER_TO_FPTR(Perl_pp_shmwrite),       /* Perl_pp_msgsnd */
+       MEMBER_TO_FPTR(Perl_pp_shmwrite),       /* Perl_pp_msgrcv */
        MEMBER_TO_FPTR(Perl_pp_semget),
        MEMBER_TO_FPTR(Perl_pp_semctl),
        MEMBER_TO_FPTR(Perl_pp_semop),
        MEMBER_TO_FPTR(Perl_pp_require),
-       MEMBER_TO_FPTR(Perl_pp_dofile),
+       MEMBER_TO_FPTR(Perl_pp_require),        /* Perl_pp_dofile */
        MEMBER_TO_FPTR(Perl_pp_entereval),
        MEMBER_TO_FPTR(Perl_pp_leaveeval),
        MEMBER_TO_FPTR(Perl_pp_entertry),
        MEMBER_TO_FPTR(Perl_pp_leavetry),
-       MEMBER_TO_FPTR(Perl_pp_ghbyname),
-       MEMBER_TO_FPTR(Perl_pp_ghbyaddr),
+       MEMBER_TO_FPTR(Perl_pp_ghostent),       /* Perl_pp_ghbyname */
+       MEMBER_TO_FPTR(Perl_pp_ghostent),       /* Perl_pp_ghbyaddr */
        MEMBER_TO_FPTR(Perl_pp_ghostent),
-       MEMBER_TO_FPTR(Perl_pp_gnbyname),
-       MEMBER_TO_FPTR(Perl_pp_gnbyaddr),
+       MEMBER_TO_FPTR(Perl_pp_gnetent),        /* Perl_pp_gnbyname */
+       MEMBER_TO_FPTR(Perl_pp_gnetent),        /* Perl_pp_gnbyaddr */
        MEMBER_TO_FPTR(Perl_pp_gnetent),
-       MEMBER_TO_FPTR(Perl_pp_gpbyname),
-       MEMBER_TO_FPTR(Perl_pp_gpbynumber),
+       MEMBER_TO_FPTR(Perl_pp_gprotoent),      /* Perl_pp_gpbyname */
+       MEMBER_TO_FPTR(Perl_pp_gprotoent),      /* Perl_pp_gpbynumber */
        MEMBER_TO_FPTR(Perl_pp_gprotoent),
-       MEMBER_TO_FPTR(Perl_pp_gsbyname),
-       MEMBER_TO_FPTR(Perl_pp_gsbyport),
+       MEMBER_TO_FPTR(Perl_pp_gservent),       /* Perl_pp_gsbyname */
+       MEMBER_TO_FPTR(Perl_pp_gservent),       /* Perl_pp_gsbyport */
        MEMBER_TO_FPTR(Perl_pp_gservent),
        MEMBER_TO_FPTR(Perl_pp_shostent),
        MEMBER_TO_FPTR(Perl_pp_snetent),
@@ -1101,13 +1101,13 @@ EXT Perl_ppaddr_t PL_ppaddr[] /* or perlvars.h */
        MEMBER_TO_FPTR(Perl_pp_enetent),
        MEMBER_TO_FPTR(Perl_pp_eprotoent),
        MEMBER_TO_FPTR(Perl_pp_eservent),
-       MEMBER_TO_FPTR(Perl_pp_gpwnam),
-       MEMBER_TO_FPTR(Perl_pp_gpwuid),
+       MEMBER_TO_FPTR(Perl_pp_gpwent), /* Perl_pp_gpwnam */
+       MEMBER_TO_FPTR(Perl_pp_gpwent), /* Perl_pp_gpwuid */
        MEMBER_TO_FPTR(Perl_pp_gpwent),
        MEMBER_TO_FPTR(Perl_pp_spwent),
        MEMBER_TO_FPTR(Perl_pp_epwent),
-       MEMBER_TO_FPTR(Perl_pp_ggrnam),
-       MEMBER_TO_FPTR(Perl_pp_ggrgid),
+       MEMBER_TO_FPTR(Perl_pp_ggrent), /* Perl_pp_ggrnam */
+       MEMBER_TO_FPTR(Perl_pp_ggrent), /* Perl_pp_ggrgid */
        MEMBER_TO_FPTR(Perl_pp_ggrent),
        MEMBER_TO_FPTR(Perl_pp_sgrent),
        MEMBER_TO_FPTR(Perl_pp_egrent),
@@ -1646,7 +1646,7 @@ EXT const U32 PL_opargs[] = {
        0x00017604,     /* pop */
        0x00017604,     /* shift */
        0x0004691d,     /* unshift */
-       0x0005a801,     /* sort */
+       0x0005a841,     /* sort */
        0x00004809,     /* reverse */
        0x0004a841,     /* grepstart */
        0x00000648,     /* grepwhile */
Unnamed repository; edit this file to name it for gitweb.