diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

init

Browse Source
This commit is contained in:
Vitor Santos Costa 2017-10-28 03:19:39 +01:00
parent 9a211ac1d4
commit 29f0f88025
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
C/adtdefs.c
View File

@ -393,6 +393,7 @@ Atom Yap_LookupAtomWithLength(const char *atom,
} }
info = (OpEntry *)Yap_AllocAtomSpace(sizeof(OpEntry)); info = (OpEntry *)Yap_AllocAtomSpace(sizeof(OpEntry));
info->KindOfPE = Ord(OpProperty); info->KindOfPE = Ord(OpProperty);
info->NextOfPE = NULL;
info->OpModule = mod; info->OpModule = mod;
info->OpName = a; info->OpName = a;
LOCK(OpListLock); LOCK(OpListLock);

1
C/modules.c
View File

@ -50,6 +50,7 @@ static ModEntry *initMod(AtomEntry *toname, AtomEntry *ae) {
INIT_RWLOCK(n->ModRWLock); INIT_RWLOCK(n->ModRWLock);
n->KindOfPE = ModProperty; n->KindOfPE = ModProperty;
n->PredForME = NULL; n->PredForME = NULL;
n->OpForME = NULL;
n->NextME = CurrentModules; n->NextME = CurrentModules;
CurrentModules = n; CurrentModules = n;
n->AtomOfME = ae; n->AtomOfME = ae;