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

fix compatibility with swi: _PL_unify_atomic

Browse Source
This commit is contained in:
Vitor Santos Costa 2013-01-20 16:46:11 +00:00
parent 0865235c48
commit 00c47e0ecc
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

0
C/iopreds.c Normal file → Executable file
View File

2
C/pl-yap.c
View File

@ -301,6 +301,8 @@ int
_PL_unify_atomic(term_t t, PL_atomic_t a) _PL_unify_atomic(term_t t, PL_atomic_t a)
{ {
GET_LD GET_LD
if (IsApplTerm(a) || IsAtomTerm(a))
return Yap_unify(Yap_GetFromSlot(t PASS_REGS), a);
return PL_unify_atom(t, a); return PL_unify_atom(t, a);
} }