summaryrefslogtreecommitdiff
path: root/ext/ByteLoader
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1999-07-07 13:04:55 +0000
committerJarkko Hietaniemi <jhi@iki.fi>1999-07-07 13:04:55 +0000
commit70c6d02e8060a55a75042c794203b8925b3151f3 (patch)
tree005266ad4c9b7b956634cc3556905f2e332bae83 /ext/ByteLoader
parent1b18133a105fbc5f80d40c868e5dcd6642b2283a (diff)
parentcae6c631be0cfed1f388d3116e456beb58714d6e (diff)
downloadperl-70c6d02e8060a55a75042c794203b8925b3151f3.tar.gz
Integrate with Sarathy; one conflict in t/pragma/warn/recgomp
resolved manually. p4raw-id: //depot/cfgperl@3648
Diffstat (limited to 'ext/ByteLoader')
-rw-r--r--ext/ByteLoader/byterun.c65
-rw-r--r--ext/ByteLoader/byterun.h69
2 files changed, 58 insertions, 76 deletions
diff --git a/ext/ByteLoader/byterun.c b/ext/ByteLoader/byterun.c
index 035578f424..18fa4a150f 100644
--- a/ext/ByteLoader/byterun.c
+++ b/ext/ByteLoader/byterun.c
@@ -30,7 +30,6 @@ static int optype_size[] = {
sizeof(UNOP),
sizeof(BINOP),
sizeof(LOGOP),
- sizeof(CONDOP),
sizeof(LISTOP),
sizeof(PMOP),
sizeof(SVOP),
@@ -716,189 +715,175 @@ byterun(pTHXo_ struct bytestream bs)
cLOGOP->op_other = arg;
break;
}
- case INSN_OP_TRUE: /* 93 */
- {
- opindex arg;
- BGET_opindex(arg);
- cCONDOP->op_true = arg;
- break;
- }
- case INSN_OP_FALSE: /* 94 */
- {
- opindex arg;
- BGET_opindex(arg);
- cCONDOP->op_false = arg;
- break;
- }
- case INSN_OP_CHILDREN: /* 95 */
+ case INSN_OP_CHILDREN: /* 93 */
{
U32 arg;
BGET_U32(arg);
cLISTOP->op_children = arg;
break;
}
- case INSN_OP_PMREPLROOT: /* 96 */
+ case INSN_OP_PMREPLROOT: /* 94 */
{
opindex arg;
BGET_opindex(arg);
cPMOP->op_pmreplroot = arg;
break;
}
- case INSN_OP_PMREPLROOTGV: /* 97 */
+ case INSN_OP_PMREPLROOTGV: /* 95 */
{
svindex arg;
BGET_svindex(arg);
*(SV**)&cPMOP->op_pmreplroot = arg;
break;
}
- case INSN_OP_PMREPLSTART: /* 98 */
+ case INSN_OP_PMREPLSTART: /* 96 */
{
opindex arg;
BGET_opindex(arg);
cPMOP->op_pmreplstart = arg;
break;
}
- case INSN_OP_PMNEXT: /* 99 */
+ case INSN_OP_PMNEXT: /* 97 */
{
opindex arg;
BGET_opindex(arg);
*(OP**)&cPMOP->op_pmnext = arg;
break;
}
- case INSN_PREGCOMP: /* 100 */
+ case INSN_PREGCOMP: /* 98 */
{
pvcontents arg;
BGET_pvcontents(arg);
BSET_pregcomp(PL_op, arg);
break;
}
- case INSN_OP_PMFLAGS: /* 101 */
+ case INSN_OP_PMFLAGS: /* 99 */
{
U16 arg;
BGET_U16(arg);
cPMOP->op_pmflags = arg;
break;
}
- case INSN_OP_PMPERMFLAGS: /* 102 */
+ case INSN_OP_PMPERMFLAGS: /* 100 */
{
U16 arg;
BGET_U16(arg);
cPMOP->op_pmpermflags = arg;
break;
}
- case INSN_OP_SV: /* 103 */
+ case INSN_OP_SV: /* 101 */
{
svindex arg;
BGET_svindex(arg);
cSVOP->op_sv = arg;
break;
}
- case INSN_OP_GV: /* 104 */
+ case INSN_OP_GV: /* 102 */
{
svindex arg;
BGET_svindex(arg);
*(SV**)&cGVOP->op_gv = arg;
break;
}
- case INSN_OP_PV: /* 105 */
+ case INSN_OP_PV: /* 103 */
{
pvcontents arg;
BGET_pvcontents(arg);
cPVOP->op_pv = arg;
break;
}
- case INSN_OP_PV_TR: /* 106 */
+ case INSN_OP_PV_TR: /* 104 */
{
op_tr_array arg;
BGET_op_tr_array(arg);
cPVOP->op_pv = arg;
break;
}
- case INSN_OP_REDOOP: /* 107 */
+ case INSN_OP_REDOOP: /* 105 */
{
opindex arg;
BGET_opindex(arg);
cLOOP->op_redoop = arg;
break;
}
- case INSN_OP_NEXTOP: /* 108 */
+ case INSN_OP_NEXTOP: /* 106 */
{
opindex arg;
BGET_opindex(arg);
cLOOP->op_nextop = arg;
break;
}
- case INSN_OP_LASTOP: /* 109 */
+ case INSN_OP_LASTOP: /* 107 */
{
opindex arg;
BGET_opindex(arg);
cLOOP->op_lastop = arg;
break;
}
- case INSN_COP_LABEL: /* 110 */
+ case INSN_COP_LABEL: /* 108 */
{
pvcontents arg;
BGET_pvcontents(arg);
cCOP->cop_label = arg;
break;
}
- case INSN_COP_STASH: /* 111 */
+ case INSN_COP_STASH: /* 109 */
{
svindex arg;
BGET_svindex(arg);
*(SV**)&cCOP->cop_stash = arg;
break;
}
- case INSN_COP_FILEGV: /* 112 */
+ case INSN_COP_FILEGV: /* 110 */
{
svindex arg;
BGET_svindex(arg);
*(SV**)&cCOP->cop_filegv = arg;
break;
}
- case INSN_COP_SEQ: /* 113 */
+ case INSN_COP_SEQ: /* 111 */
{
U32 arg;
BGET_U32(arg);
cCOP->cop_seq = arg;
break;
}
- case INSN_COP_ARYBASE: /* 114 */
+ case INSN_COP_ARYBASE: /* 112 */
{
I32 arg;
BGET_I32(arg);
cCOP->cop_arybase = arg;
break;
}
- case INSN_COP_LINE: /* 115 */
+ case INSN_COP_LINE: /* 113 */
{
line_t arg;
BGET_U16(arg);
cCOP->cop_line = arg;
break;
}
- case INSN_COP_WARNINGS: /* 116 */
+ case INSN_COP_WARNINGS: /* 114 */
{
svindex arg;
BGET_svindex(arg);
cCOP->cop_warnings = arg;
break;
}
- case INSN_MAIN_START: /* 117 */
+ case INSN_MAIN_START: /* 115 */
{
opindex arg;
BGET_opindex(arg);
PL_main_start = arg;
break;
}
- case INSN_MAIN_ROOT: /* 118 */
+ case INSN_MAIN_ROOT: /* 116 */
{
opindex arg;
BGET_opindex(arg);
PL_main_root = arg;
break;
}
- case INSN_CURPAD: /* 119 */
+ case INSN_CURPAD: /* 117 */
{
svindex arg;
BGET_svindex(arg);
diff --git a/ext/ByteLoader/byterun.h b/ext/ByteLoader/byterun.h
index 6bc03af5f1..31a9033845 100644
--- a/ext/ByteLoader/byterun.h
+++ b/ext/ByteLoader/byterun.h
@@ -109,34 +109,32 @@ enum {
INSN_OP_FIRST, /* 90 */
INSN_OP_LAST, /* 91 */
INSN_OP_OTHER, /* 92 */
- INSN_OP_TRUE, /* 93 */
- INSN_OP_FALSE, /* 94 */
- INSN_OP_CHILDREN, /* 95 */
- INSN_OP_PMREPLROOT, /* 96 */
- INSN_OP_PMREPLROOTGV, /* 97 */
- INSN_OP_PMREPLSTART, /* 98 */
- INSN_OP_PMNEXT, /* 99 */
- INSN_PREGCOMP, /* 100 */
- INSN_OP_PMFLAGS, /* 101 */
- INSN_OP_PMPERMFLAGS, /* 102 */
- INSN_OP_SV, /* 103 */
- INSN_OP_GV, /* 104 */
- INSN_OP_PV, /* 105 */
- INSN_OP_PV_TR, /* 106 */
- INSN_OP_REDOOP, /* 107 */
- INSN_OP_NEXTOP, /* 108 */
- INSN_OP_LASTOP, /* 109 */
- INSN_COP_LABEL, /* 110 */
- INSN_COP_STASH, /* 111 */
- INSN_COP_FILEGV, /* 112 */
- INSN_COP_SEQ, /* 113 */
- INSN_COP_ARYBASE, /* 114 */
- INSN_COP_LINE, /* 115 */
- INSN_COP_WARNINGS, /* 116 */
- INSN_MAIN_START, /* 117 */
- INSN_MAIN_ROOT, /* 118 */
- INSN_CURPAD, /* 119 */
- MAX_INSN = 119
+ INSN_OP_CHILDREN, /* 93 */
+ INSN_OP_PMREPLROOT, /* 94 */
+ INSN_OP_PMREPLROOTGV, /* 95 */
+ INSN_OP_PMREPLSTART, /* 96 */
+ INSN_OP_PMNEXT, /* 97 */
+ INSN_PREGCOMP, /* 98 */
+ INSN_OP_PMFLAGS, /* 99 */
+ INSN_OP_PMPERMFLAGS, /* 100 */
+ INSN_OP_SV, /* 101 */
+ INSN_OP_GV, /* 102 */
+ INSN_OP_PV, /* 103 */
+ INSN_OP_PV_TR, /* 104 */
+ INSN_OP_REDOOP, /* 105 */
+ INSN_OP_NEXTOP, /* 106 */
+ INSN_OP_LASTOP, /* 107 */
+ INSN_COP_LABEL, /* 108 */
+ INSN_COP_STASH, /* 109 */
+ INSN_COP_FILEGV, /* 110 */
+ INSN_COP_SEQ, /* 111 */
+ INSN_COP_ARYBASE, /* 112 */
+ INSN_COP_LINE, /* 113 */
+ INSN_COP_WARNINGS, /* 114 */
+ INSN_MAIN_START, /* 115 */
+ INSN_MAIN_ROOT, /* 116 */
+ INSN_CURPAD, /* 117 */
+ MAX_INSN = 117
};
enum {
@@ -144,14 +142,13 @@ enum {
OPt_UNOP, /* 1 */
OPt_BINOP, /* 2 */
OPt_LOGOP, /* 3 */
- OPt_CONDOP, /* 4 */
- OPt_LISTOP, /* 5 */
- OPt_PMOP, /* 6 */
- OPt_SVOP, /* 7 */
- OPt_GVOP, /* 8 */
- OPt_PVOP, /* 9 */
- OPt_LOOP, /* 10 */
- OPt_COP /* 11 */
+ OPt_LISTOP, /* 4 */
+ OPt_PMOP, /* 5 */
+ OPt_SVOP, /* 6 */
+ OPt_GVOP, /* 7 */
+ OPt_PVOP, /* 8 */
+ OPt_LOOP, /* 9 */
+ OPt_COP /* 10 */
};
EXT void byterun(pTHXo_ struct bytestream bs);