debugging msh
This commit is contained in:
parent
9fca32c7ac
commit
81909565bc
@ -645,8 +645,6 @@ PredEntry *YAPPredicate::getPred( Term &t, Term* &outp ) {
|
|||||||
ts[0] = t;
|
ts[0] = t;
|
||||||
ts[1] = m;
|
ts[1] = m;
|
||||||
t = Yap_MkApplTerm(FunctorCsult, 2, ts);
|
t = Yap_MkApplTerm(FunctorCsult, 2, ts);
|
||||||
Yap_DebugPlWrite(m);
|
|
||||||
Yap_DebugPlWrite(t);
|
|
||||||
}
|
}
|
||||||
Functor f = FunctorOfTerm(t);
|
Functor f = FunctorOfTerm(t);
|
||||||
if (IsExtensionFunctor(f)) {
|
if (IsExtensionFunctor(f)) {
|
||||||
|
Reference in New Issue
Block a user