diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

exo first step.

Browse Source
This commit is contained in:
Vítor Santos Costa
2013-01-07 09:47:14 +00:00
parent 3565a01f1e
commit f063a2bd52
12 changed files with 657 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
H/rclause.h
View File

@@ -218,6 +218,7 @@ restore_opcodes(yamop *pc, yamop *max USES_REGS)
case _Nstop:
case _allocate:
case _copy_idb_term:
case _enter_exo:
case _expand_index:
case _index_blob:
case _index_dbref:
@@ -285,6 +286,8 @@ restore_opcodes(yamop *pc, yamop *max USES_REGS)
pc = NEXTOP(pc,llll);
break;
/* instructions type lp */
case _retry_exo:
case _try_exo:
case _user_switch:
pc->u.lp.l = PtoOpAdjust(pc->u.lp.l);
pc->u.lp.p = PtoPredAdjust(pc->u.lp.p);
@@ -537,6 +540,7 @@ restore_opcodes(yamop *pc, yamop *max USES_REGS)
pc = NEXTOP(pc,sssllp);
break;
/* instructions type x */
case _get_atom_exo:
case _get_list:
case _put_list:
case _save_b_x: