fix integer as DBRef

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@971 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2004-02-09 14:19:05 +00:00
parent 0df93ffc6e
commit cfd3683891
18 changed files with 182 additions and 108 deletions

View File

@@ -148,12 +148,18 @@ Yap_InitModulesC(void)
void
Yap_InitModules(void)
{
ModuleName[PrimitivesModule = 0] =
ModuleName[PROLOG_MODULE] =
MkAtomTerm(Yap_LookupAtom("prolog"));
ModuleName[1] =
ModuleName[USER_MODULE] =
MkAtomTerm(Yap_LookupAtom("user"));
ModuleName[2] =
ModuleName[IDB_MODULE] =
MkAtomTerm(Yap_LookupAtom("idb"));
NoOfModules = 3;
ModuleName[ATTRIBUTES_MODULE] =
MkAtomTerm(Yap_LookupAtom("attributes"));
ModuleName[CHARSIO_MODULE] =
MkAtomTerm(Yap_LookupAtom("charsio"));
ModuleName[TERMS_MODULE] =
MkAtomTerm(Yap_LookupAtom("terms"));
NoOfModules = 6;
CurrentModule = 0;
}