fix glist_void_varx

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1777 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2007-01-24 09:57:25 +00:00
parent 0f9cb472c6
commit d2f974d292
2 changed files with 7 additions and 2 deletions

View File

@ -10,8 +10,12 @@
* * * *
* File: absmi.c * * File: absmi.c *
* comments: Portable abstract machine interpreter * * comments: Portable abstract machine interpreter *
* Last rev: $Date: 2006-12-31 01:50:34 $,$Author: vsc $ * * Last rev: $Date: 2007-01-24 09:57:25 $,$Author: vsc $ *
* $Log: not supported by cvs2svn $ * $Log: not supported by cvs2svn $
* Revision 1.218 2006/12/31 01:50:34 vsc
* fix some bugs in call_cleanup: the result of action should not matter,
* and !,fail would not wakeup the delayed goal.
*
* Revision 1.217 2006/12/30 03:25:44 vsc * Revision 1.217 2006/12/30 03:25:44 vsc
* call_cleanup/2 and 3 * call_cleanup/2 and 3
* *
@ -4682,7 +4686,7 @@ Yap_absmi(int inp)
/* enter write mode */ /* enter write mode */
BEGP(pt1); BEGP(pt1);
pt1 = H; pt1 = H;
d0 = AbsPair(SREG); d0 = AbsPair(pt1);
BIND(pt0, d0, bind_glist_void_valx_write); BIND(pt0, d0, bind_glist_void_valx_write);
#ifdef COROUTINING #ifdef COROUTINING
DO_TRAIL(pt0, d0); DO_TRAIL(pt0, d0);

View File

@ -16,6 +16,7 @@
<h2>Yap-5.1.2:</h2> <h2>Yap-5.1.2:</h2>
<ul> <ul>
<li> NEW: glist_void_varx was broken (obs from Marius Filip).</li>
<li> NEW: unify_with_occurs_check/2 was broken with extensions (obs from Aline Paes).</li> <li> NEW: unify_with_occurs_check/2 was broken with extensions (obs from Aline Paes).</li>
<li> NEW: stack_dump/0 from Trevor.</li> <li> NEW: stack_dump/0 from Trevor.</li>
<li> NEW: with_mutex/2.</li> <li> NEW: with_mutex/2.</li>