memory mgmt

2017-09-23 02:17:55 +01:00
parent 70f4f7adcf
commit a40fbe420f
24 changed files with 4238 additions and 4265 deletions
--- a/C/stdpreds.c
+++ b/C/stdpreds.c
@@ -948,9 +948,10 @@ static Int current_predicate(USES_REGS1) {

 static OpEntry *NextOp(Prop pp USES_REGS) {

-  while (!EndOfPAEntr(pp) && pp->KindOfPE != OpProperty &&
-         (RepOpProp(pp)->OpModule != PROLOG_MODULE
-	  || RepOpProp(pp)->OpModule != CurrentModule) )
+  while (!EndOfPAEntr(pp) && 
+    pp->KindOfPE != OpProperty &&
+    (RepOpProp(pp)->OpModule != PROLOG_MODULE || RepOpProp(pp)->OpModule != CurrentModule)
+   )
 	 pp = pp->NextOfPE;
  return RepOpProp(pp);
 }