diff --git a/C/adtdefs.c b/C/adtdefs.c
index e3861002b..557803253 100755
--- a/C/adtdefs.c
+++ b/C/adtdefs.c
@@ -393,6 +393,7 @@ Atom Yap_LookupAtomWithLength(const char *atom,
     }
     info = (OpEntry *)Yap_AllocAtomSpace(sizeof(OpEntry));
     info->KindOfPE = Ord(OpProperty);
+    info->NextOfPE = NULL;
     info->OpModule = mod;
     info->OpName = a;
     LOCK(OpListLock);
diff --git a/C/modules.c b/C/modules.c
index aec2f26dc..7aa224dc9 100644
--- a/C/modules.c
+++ b/C/modules.c
@@ -50,6 +50,7 @@ static ModEntry *initMod(AtomEntry *toname, AtomEntry *ae) {
   INIT_RWLOCK(n->ModRWLock);
   n->KindOfPE = ModProperty;
   n->PredForME = NULL;
+  n->OpForME = NULL;
   n->NextME = CurrentModules;
   CurrentModules = n;
   n->AtomOfME = ae;