allow statistics on data base keys of integers.

change pred_entry not to fail on this case.
avoid using functor in this case.
This commit is contained in:
Vitor Santos Costa
2008-09-15 04:30:09 +01:00
parent e35af2a352
commit 821cc384a3
4 changed files with 24 additions and 7 deletions

View File

@@ -681,6 +681,8 @@ get_pred(Term t, Term tmod, char *pname)
return NULL;
} else if (IsAtomTerm(t)) {
return RepPredProp(Yap_GetPredPropByAtom(AtomOfTerm(t), tmod));
} else if (IsIntegerTerm(t) && tmod == IDB_MODULE) {
return Yap_FindLUIntKey(IntegerOfTerm(t));
} else if (IsApplTerm(t)) {
Functor fun = FunctorOfTerm(t);
if (fun == FunctorModule) {