pike.git / src / program.c

version» Context lines:

pike.git/src/program.c:10401:    add_ref(new_frame->current_program);    new_frame->context = compilation_program->inherits + inherit;    new_frame->current_storage = ce->storage + new_frame->context->storage_offset;   #ifdef PIKE_DEBUG    if (new_frame->context->prog != compilation_program) {    Pike_fatal("Invalid inherit for compilation context (%p != %p).\n",    new_frame->context->prog, compilation_program);    }   #endif /* PIKE_DEBUG */    new_frame->fun = new_frame->context->identifier_level + PC_COMPILE_FUN_NUM; -  new_frame->expendible = Pike_sp; +     new_frame->locals = Pike_sp; -  new_frame->save_sp = Pike_sp; +  new_frame->expendible_offset = 0; +  new_frame->save_sp_offset = 0;    new_frame->save_mark_sp = Pike_mark_sp;    new_frame->args = 0;    new_frame->num_args = 0;    new_frame->num_locals = 0;    new_frame->pc = 0;    new_frame->return_addr = 0;    new_frame->scope = 0; -  new_frame->save_sp = Pike_sp; +     Pike_fp = new_frame;   }      PMOD_EXPORT void enter_compiler(struct pike_string *filename,    INT_TYPE linenumber)   {    struct object *ce = parent_clone_object(compilation_program,    compilation_environment,    CE_PIKE_COMPILER_FUN_NUM, 0);    struct compilation *c;