diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

threads

Browse Source
This commit is contained in:
Vítor Santos Costa 2016-01-06 12:40:01 +00:00
parent 13f020ad25
commit 6d93c35c13
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
C/tracer.c
View File

@ -173,7 +173,7 @@ void low_level_trace(yap_low_level_port port, PredEntry *pred, CELL *args) {
#endif #endif
// if (!worker_id) return; // if (!worker_id) return;
LOCK(Yap_heap_regs->low_level_trace_lock); LOCK(Yap_low_level_trace_lock);
sc = Yap_heap_regs; sc = Yap_heap_regs;
// if (vsc_count == 161862) jmp_deb(1); // if (vsc_count == 161862) jmp_deb(1);
#ifdef THREADS #ifdef THREADS
@ -326,11 +326,11 @@ void low_level_trace(yap_low_level_port port, PredEntry *pred, CELL *args) {
#endif #endif
/* check_trail_consistency(); */ /* check_trail_consistency(); */
if (pred == NULL) { if (pred == NULL) {
UNLOCK(Yap_heap_regs->low_level_trace_lock); UNLOCK(Yap_low_level_trace_lock);
return; return;
} }
if (pred->ModuleOfPred == 0 && !LOCAL_do_trace_primitives) { if (pred->ModuleOfPred == 0 && !LOCAL_do_trace_primitives) {
UNLOCK(Yap_heap_regs->low_level_trace_lock); UNLOCK(Yap_low_level_trace_lock);
return; return;
} }
switch (port) { switch (port) {
@ -406,7 +406,7 @@ void low_level_trace(yap_low_level_port port, PredEntry *pred, CELL *args) {
break; break;
} }
fflush(NULL); fflush(NULL);
UNLOCK(Yap_heap_regs->low_level_trace_lock); UNLOCK(Yap_low_level_trace_lock);
} }
void toggle_low_level_trace(void) { void toggle_low_level_trace(void) {