pike.git
/
src
/
program.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/program.c:75:
void free_all_program_blocks() { ba_destroy(&program_allocator); } /* #define COMPILER_DEBUG */ /* #define PROGRAM_BUILD_DEBUG */ #ifdef COMPILER_DEBUG #define CDFPRINTF(X) fprintf X
+
#ifndef PIKE_THREADS
+
/* The CDFPRINTF lines wants to print threads_disabled, so fake on of those */
+
static const int threads_disabled = 1;
+
#endif
#else /* !COMPILER_DEBUG */ #define CDFPRINTF(X) #endif /* COMPILER_DEBUG */ /* * These two values should probably be fine-tuned, but doing so * more or less requires running a predictable 'typical' application * and testing different hashsizes and tresholds. I tried to do it * mathematically by measuring the extremes (no cache hits, 100% * cache hits etc.) but it seems that the processor cache becomes
pike.git/src/program.c:8919:
c->p=debug_malloc_pass(end_program()); run_exit(c); } static void run_cleanup(struct compilation *c, int delayed) { debug_malloc_touch(c); debug_malloc_touch(c->placeholder); #if 0 /* FIXME */
+
#ifdef PIKE_THREADS
if (threads_disabled != c->saved_threads_disabled) { Pike_fatal("compile(): threads_disabled:%d saved_threads_disabled:%d\n", threads_disabled, c->saved_threads_disabled); }
-
+
#endif
#endif /* PIKE_DEBUG */ exit_threads_disable(NULL); CDFPRINTF((stderr, "th(%ld) %p run_cleanup(): " "threads_disabled:%d, compilation_depth:%d\n", (long)th_self(), c->target, threads_disabled, c->compilation_depth)); if (!c->p)
pike.git/src/program.c:9383:
return; } #ifdef PIKE_DEBUG SET_ONERROR(tmp, fatal_on_error,"Compiler exited with longjump!\n"); #endif c->flags |= COMPILER_BUSY; low_init_threads_disable();
+
#ifdef PIKE_THREADS
c->saved_threads_disabled = threads_disabled;
-
+
#endif
init_supporter(& c->supporter, (supporter_callback *) call_delayed_pass2, (void *)c); delay=run_pass1(c); dependants_ok = call_dependants(& c->supporter, !!c->p ); #ifdef PIKE_DEBUG /* FIXME */ UNSET_ONERROR(tmp);
pike.git/src/program.c:10341:
ref_push_mapping(get_builtin_constants()); } free_svalue(& c->default_module); move_svalue (&c->default_module, --Pike_sp); #ifdef PIKE_DEBUG SET_ONERROR(tmp, fatal_on_error,"Compiler exited with longjump!\n"); #endif low_init_threads_disable();
+
#ifdef PIKE_THREADS
c->saved_threads_disabled = threads_disabled;
-
+
#endif
init_supporter(& c->supporter, (supporter_callback *) call_delayed_pass2, (void *)c); delay=run_pass1(c); dependants_ok = call_dependants(& c->supporter, !!c->p ); #ifdef PIKE_DEBUG /* FIXME */ UNSET_ONERROR(tmp);