improve CLP(BN)/BNT interface

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1918 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2007-08-06 14:55:43 +00:00
parent ba761e7a47
commit 66d14116dd
12 changed files with 351 additions and 41 deletions
--- a/C/globals.c
+++ b/C/globals.c
@@ -1151,9 +1151,9 @@ RecoverDelayArena(Term delay_arena)
 {
  attvar_record *pt = DelayArenaPt(delay_arena),
    *max = DelayTop();
-  
-  if (max == pt-DelayArenaSz(delay_arena))
+  if (max == pt-DelayArenaSz(delay_arena)) {
      SetDelayTop(pt);
+  }
 }
 #endif