small compiler change

This commit is contained in:
Vitor Santos Costa
2017-05-02 03:34:56 +01:00
parent 70232133cc
commit 3cb343479e
6 changed files with 123 additions and 12 deletions

View File

@@ -213,6 +213,8 @@ struct pred_entry *Yap_ModulePred(Term mod) {
void Yap_NewModulePred(Term mod, struct pred_entry *ap) {
ModEntry *me;
if (mod == 0)
mod = TermProlog;
if (!(me = LookupModule(mod)))
return;
WRITE_LOCK(me->ModRWLock);