diff options
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 11 |
1 files changed, 11 insertions, 0 deletions
@@ -66,6 +66,17 @@ evalquery(Term *query) name = prettyprint(goal, 0, 0, 0, nil); arity = 0; } + print("Didn't find predicate %S in module %S\n", prettyprint(goal, 0, 0, 0, nil), module->name); + Predicate *p; + for(p = module->predicates; p != nil; p = p->next) + print("Available in %S: %S/%d\n", module->name, p->name, p->arity); + Module *sysmod; + if(systemmoduleloaded) + sysmod = getmodule(L"system"); + else + sysmod = getmodule(L"user"); + for(p = sysmod->predicates; p != nil; p = p->next) + print("Available in %S: %S/%d\n", sysmod->name, p->name, p->arity); switch(flagunknown){ case UnknownError: procedure = mkatom(name); |