CompiledCode* create_compiled_code() { CompiledCode* code = CompiledCode::create(state); code->iseq(state, InstructionSequence::create(state, 1)); code->iseq()->opcodes()->put(state, 0, Fixnum::from(InstructionSequence::insn_ret)); code->stack_size(state, Fixnum::from(10)); code->total_args(state, Fixnum::from(0)); code->required_args(state, code->total_args()); code->formalize(state); return code; }
CompiledCode* UnMarshaller::get_compiled_code() { size_t ver; stream >> ver; CompiledCode* code = CompiledCode::create(state); code->metadata(state, unmarshal()); code->primitive(state, force_as<Symbol>(unmarshal())); code->name(state, force_as<Symbol>(unmarshal())); code->iseq(state, force_as<InstructionSequence>(unmarshal())); code->stack_size(state, force_as<Fixnum>(unmarshal())); code->local_count(state, force_as<Fixnum>(unmarshal())); code->required_args(state, force_as<Fixnum>(unmarshal())); code->post_args(state, force_as<Fixnum>(unmarshal())); code->total_args(state, force_as<Fixnum>(unmarshal())); code->splat(state, force_as<Fixnum>(unmarshal())); code->literals(state, force_as<Tuple>(unmarshal())); code->lines(state, force_as<Tuple>(unmarshal())); code->file(state, force_as<Symbol>(unmarshal())); code->local_names(state, force_as<Tuple>(unmarshal())); code->post_marshal(state); return code; }
CompiledCode* UnMarshaller::get_cmethod() { size_t ver; stream >> ver; CompiledCode* cm = CompiledCode::create(state); cm->metadata(state, unmarshal()); cm->primitive(state, (Symbol*)unmarshal()); cm->name(state, (Symbol*)unmarshal()); cm->iseq(state, (InstructionSequence*)unmarshal()); cm->stack_size(state, (Fixnum*)unmarshal()); cm->local_count(state, (Fixnum*)unmarshal()); cm->required_args(state, (Fixnum*)unmarshal()); cm->post_args(state, (Fixnum*)unmarshal()); cm->total_args(state, (Fixnum*)unmarshal()); cm->splat(state, unmarshal()); cm->literals(state, (Tuple*)unmarshal()); cm->lines(state, (Tuple*)unmarshal()); cm->file(state, (Symbol*)unmarshal()); cm->local_names(state, (Tuple*)unmarshal()); cm->post_marshal(state); return cm; }
void CompiledCode::Info::show(STATE, Object* self, int level) { CompiledCode* code = as<CompiledCode>(self); class_header(state, self); indent_attribute(++level, "file"); code->file()->show(state, level); indent_attribute(level, "iseq"); code->iseq()->show(state, level); indent_attribute(level, "lines"); code->lines()->show_simple(state, level); indent_attribute(level, "literals"); code->literals()->show_simple(state, level); indent_attribute(level, "local_count"); code->local_count()->show(state, level); indent_attribute(level, "local_names"); code->local_names()->show_simple(state, level); indent_attribute(level, "name"); code->name()->show(state, level); indent_attribute(level, "required_args"); code->required_args()->show(state, level); indent_attribute(level, "scope"); code->scope()->show(state, level); indent_attribute(level, "splat"); code->splat()->show(state, level); indent_attribute(level, "stack_size"); code->stack_size()->show(state, level); indent_attribute(level, "total_args"); code->total_args()->show(state, level); indent_attribute(level, "internalized"); if(!code->machine_code_) { std::cout << "no\n"; } else { std::cout << "yes\n"; #ifdef ENABLE_LLVM MachineCode* v = code->machine_code(); for(int i = 0; i < MachineCode::cMaxSpecializations; i++) { if(!v->specializations[i].jit_data) continue; llvm::Function* func = v->specializations[i].jit_data->llvm_function(); llvm::outs() << "<LLVM>\n" << *func << "</LLVM>\n<MachineCode>\n"; LLVMState::show_machine_code( v->specializations[i].jit_data->native_func(), v->specializations[i].jit_data->native_size()); llvm::outs() << "</MachineCode>\n"; } #endif } close_body(level); }