fix indexing of bignums (obs from Jos de Roo).

2010-05-14 12:42:30 +01:00
parent c2f84c9e28
commit fd9f4efe0b
8 changed files with 83 additions and 93 deletions
--- a/C/tracer.c
+++ b/C/tracer.c
@@ -172,7 +172,10 @@ 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++;
-  #ifdef THREADS
+  if (vsc_count == 7188) jmp_deb(1);
+  if (vsc_count < 7000)
+    return;
+#ifdef THREADS
  MY_ThreadHandle.thread_inst_count++;
 #endif  
 #ifdef COMMENTED