small fix to Osbmp type instructions.

This commit is contained in:
Vítor Santos Costa 2010-08-02 19:47:29 +01:00
parent 6895b8521a
commit 473fd5516d
1 changed files with 5 additions and 2 deletions

View File

@ -44,8 +44,11 @@ restore_opcodes(yamop *pc, yamop *max)
case _p_execute:
OrArgAdjust(pc->u.Osbmp.or_arg);
pc->u.Osbmp.s = ConstantAdjust(pc->u.Osbmp.s);
pc->u.Osbmp.mod = CellPtoHeapAdjust(pc->u.Osbmp.mod);
pc->u.Osbmp.p0 = ModuleAdjust(pc->u.Osbmp.p0);
pc->u.Osbmp.bmap = CellPtoHeapAdjust(pc->u.Osbmp.bmap);
pc->u.Osbmp.mod = ModuleAdjust(pc->u.Osbmp.mod);
pc->u.Osbmp.p0 = PtoPredAdjust(pc->u.Osbmp.p0);
pc = NEXTOP(pc,Osbmp);
break;
/* instructions type Osbpi */
case _ensure_space:
OrArgAdjust(pc->u.Osbpi.or_arg);