pike.git / src / program.c

version» Context lines:

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);