FIX: in tabling mode _trust_me was being assembled as _retry_me (obs from Chris Mungali)

This commit is contained in:
Vitor Santos Costa 2008-09-26 18:52:29 +01:00
parent fb8648d7df
commit 09ccb295c2

View File

@ -4177,7 +4177,7 @@ emit_protection_choicepoint(int first, int clleft, UInt nxtlbl, struct intermedi
kinds of hell would follow, so we just keep it around: not nice,
but should work.
*/
Yap_emit(retryme_op, (CELL)TRUSTFAILCODE, 0, cint);
Yap_emit(trustme_op, 0, 0, cint);
#endif /* TABLING */
} else {
Yap_emit(trustme_op, 0, 0, cint);