fix warning.

This commit is contained in:
Vitor Santos Costa 2011-10-13 16:46:29 +01:00
parent d4ea15811e
commit 98cc029b66

View File

@ -756,6 +756,8 @@ ReadHash(IOSTREAM *stream)
if (omod) {
mod = MkAtomTerm(AtomAdjust(omod));
if (mod == TermProlog) mod = 0;
} else {
mod = TermProlog;
}
if (mod != IDB_MODULE) {