BlockEnvironment* BlockEnvironment::dup(STATE) { BlockEnvironment* be = state->new_object<BlockEnvironment>(G(blokenv)); be->scope(state, scope_); be->top_scope(state, top_scope_); be->code(state, code_); return be; }
void BlockEnvironment::Info::show(STATE, Object* self, int level) { BlockEnvironment* be = as<BlockEnvironment>(self); class_header(state, self); //indent_attribute(++level, "scope"); be->scope()->show(state, level); // indent_attribute(level, "top_scope"); be->top_scope()->show(state, level); indent_attribute(level, "code"); be->code()->show(state, level); close_body(level); }
BlockEnvironment* BlockEnvironment::under_call_frame(STATE, CompiledMethod* cm, VMMethod* caller, CallFrame* call_frame, size_t index) { BlockEnvironment* be = state->new_object<BlockEnvironment>(G(blokenv)); VMMethod* vmm = cm->internalize(state); if(!vmm) { Exception::internal_error(state, call_frame, "invalid bytecode method"); return 0; } vmm->set_parent(caller); be->scope(state, call_frame->promote_scope(state)); be->top_scope(state, call_frame->top_scope(state)); be->code(state, cm); be->module(state, call_frame->module()); return be; }