moe changes to support atomic generation of atoms

support automatic generation of code walker (to find P's predicate and clause)
This commit is contained in:
Vitor Santos Costa
2008-12-24 09:04:44 +00:00
parent f679f21a71
commit b1cf60cafb
14 changed files with 1157 additions and 774 deletions

View File

@@ -837,7 +837,7 @@ static Int
p_swi_all_atts(void) {
/* receive a variable in ARG1 */
Term inp = Deref(ARG1);
Functor attf = Yap_MkFunctor(AtomAtt1,3);
Functor attf = FunctorAtt1;
/* if this is unbound, ok */
if (IsVarTerm(inp)) {
@@ -962,7 +962,7 @@ p_is_attvar(void)
static Int
p_attvar_bound(void)
{
return FALSE;
b return FALSE;
}
#endif /* COROUTINING */