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

fix bad tests for attributed variable, and use a better name for Quick Test.

Browse Source
This commit is contained in:
Vitor Santos Costa
2011-03-19 10:25:23 +00:00
parent 0d8aed7971
commit 2fb880b64a
6 changed files with 18 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
H/TermExt.h
View File

@@ -67,10 +67,11 @@ IsAttVar (CELL *pt)
return (pt)[-1] == (CELL)attvar_e && pt < H;
}
inline EXTERN int GlobalIsAttVar (CELL *pt);
inline EXTERN int
FastIsAttVar (CELL *pt)
GlobalIsAttVar (CELL *pt)
{
CACHE_REGS
return (pt)[-1] == (CELL)attvar_e;
}
@@ -517,9 +518,9 @@ IsAttachedTerm (Term t)
inline EXTERN Int IsAttachedTerm (Term);
inline EXTERN Int
FastIsAttachedTerm (Term t)
GlobalIsAttachedTerm (Term t)
{
return (Int) ((IsVarTerm (t) && FastIsAttVar(VarOfTerm(t))));
return (Int) ((IsVarTerm (t) && GlobalIsAttVar(VarOfTerm(t))));
}