pike.git / src / program.c

version» Context lines:

pike.git/src/program.c:3264:    if (pass == COMPILER_PASS_FIRST) {    if(c->compilation_depth >= 1) {    add_ref(p->parent = Pike_compiler->new_program);    debug_malloc_touch (p);    }    }    p->flags &=~ PROGRAM_VIRGIN;    if(idp) *idp=id;       CDFPRINTF("th(%ld) %p low_start_new_program() %s " -  "pass=%d: lock_depth:%d, compilation_depth:%d\n", +  "pass=%d: compilation_depth:%d\n",    (long)th_self(), p, name ? name->str : "-",    Pike_compiler->compiler_pass, -  lock_depth, c->compilation_depth); +  c->compilation_depth);       init_type_stack();      #define PUSH   #include "compilation.h"       ba_init(&Pike_compiler->node_allocator, sizeof(struct node_s), 512);       Pike_compiler->parent_identifier=id;    Pike_compiler->compiler_pass = pass;
pike.git/src/program.c:3493:    { /* Trim off the leading path of the compilation environment. */    const char *p = DEFINETOSTR(PIKE_SRC_ROOT), *f = file;    while (*p && *p == *f) p++, f++;    while (*f == '/' || *f == '\\') f++;       c->lex.current_file = make_shared_string(f);    c->lex.current_line = line;    }       CDFPRINTF("th(%ld) start_new_program(%ld, %s): " -  "lock_depth:%d, compilation_depth:%d\n", +  "compilation_depth:%d\n",    (long)th_self(), (long)line, file, -  lock_depth, c->compilation_depth); +  c->compilation_depth);       low_start_new_program(0, COMPILER_PASS_FIRST, 0, 0, 0);    store_linenumber(line,c->lex.current_file);    debug_malloc_name(Pike_compiler->new_program, file, line);       free_string(c->lex.current_file);    c->lex.current_file = dmalloc_touch(struct pike_string *, save_file);    c->lex.current_line = save_line;   }   
pike.git/src/program.c:4682:    c->resolve_cache=0;    }      #define POP   #include "compilation.h"       exit_type_stack();          CDFPRINTF("th(%ld) %p end_first_pass(%d): " -  "lock_depth:%d, compilation_depth:%d\n", +  "compilation_depth:%d\n",    (long)th_self(), prog, finish, -  lock_depth, c->compilation_depth); +  c->compilation_depth);       c->compilation_depth--;       unlock_pike_compiler();      #if 0   #ifdef PIKE_USE_MACHINE_CODE    if (prog &&    (((unsigned long long *)prog->program)[-1] != 0xdeadfeedf00dfaddLL)) {    Pike_fatal("Bad mexec magic!\n");