fix bug in current_predicate/2

fix bug in c_interface.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2221 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2008-04-28 23:02:32 +00:00
parent 89bdffe91e
commit f1d5e84918
5 changed files with 46 additions and 12 deletions

View File

@@ -10,8 +10,11 @@
* File: c_interface.c *
* comments: c_interface primitives definition *
* *
* Last rev: $Date: 2008-04-11 16:30:27 $,$Author: ricroc $ *
* Last rev: $Date: 2008-04-28 23:02:32 $,$Author: vsc $ *
* $Log: not supported by cvs2svn $
* Revision 1.115 2008/04/11 16:30:27 ricroc
* *** empty log message ***
*
* Revision 1.114 2008/04/04 13:35:41 vsc
* fix duplicate dependency frame at entry
*
@@ -1305,6 +1308,8 @@ run_emulator(YAP_dogoalinfo *dgi)
ASP = (CELL *)(B+1);
B = B->cp_b;
HB = B->cp_h;
} else {
Yap_StartSlots();
}
P = dgi->p;
RECOVER_MACHINE_REGS();