index.c implementation of trust_logical was decrementing the wrong

cp_tr git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1706 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2006-10-18 13:47:32 +00:00
parent 23e9f546fe
commit cb34dbdc88
4 changed files with 30 additions and 16 deletions
--- a/C/tracer.c
+++ b/C/tracer.c
@@ -161,6 +161,13 @@ low_level_trace(yap_low_level_port port, PredEntry *pred, CELL *args)
  LOCK(Yap_heap_regs->low_level_trace_lock);
  sc = Yap_heap_regs;
  vsc_count++;
+  if (B->cp_tr < B->cp_b->cp_tr || TR < B->cp_tr)
+    fprintf(stderr,"Here we go %lld\n", vsc_count);
+  if (vsc_count < 13600)
+    {
+      UNLOCK(Yap_heap_regs->low_level_trace_lock);
+      return;
+    }
 #ifdef COMMENTED
  if (worker_id != 04 || worker_id != 03) return;
  //  if (vsc_count == 218280)