void OC_ffi___ffi_base___MMModule___accept_ffi_visitor_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){ struct {struct stack_frame_t me; val_t MORE_REG[1];} fra; val_t REGB0; val_t REGB1; fun_t CREG[1]; val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_ffi___ffi_base; fra.me.line = 0; fra.me.meth = LOCATE_ffi___ffi_base___MMModule___accept_ffi_visitor; fra.me.has_broke = 0; fra.me.REG_size = 2; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[1] = NIT_NULL; fra.me.closure_ctx = closctx_param; fra.me.closure_funs = CREG; fra.me.REG[0] = p0; CREG[0] = clos_fun0; /* ffi/ffi_base.nit:99 */ fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[0])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { /* ffi/ffi_base.nit:100 */ fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); REGB0 = CALL_metamodel___abstractmetamodel___MMGlobalClass___is_extern(fra.me.REG[1])(fra.me.REG[1]); } else { /* ffi/ffi_base.nit:99 */ REGB1 = TAG_Bool(0); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { /* ffi/ffi_base.nit:101 */ CALL_ffi___ffi_base___FFIVisited___accept_ffi_visitor(fra.me.REG[0])(fra.me.REG[0], closctx->REG[1]); } /* ffi/ffi_base.nit:104 */ fra.me.REG[0] = CALL_metamodel___abstractmetamodel___MMLocalClass___local_local_properties(fra.me.REG[0])(fra.me.REG[0]); CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[0])(fra.me.REG[0], closctx, ((fun_t)OC_ffi___ffi_base___MMModule___accept_ffi_visitor_2)); stack_frame_head = fra.me.prev; return; }
void global___cha_analysis___ChaVisitor___visit_icode(val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[6];} fra; val_t REGB0; val_t REGB1; val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_global___cha_analysis; fra.me.line = 94; fra.me.meth = LOCATE_global___cha_analysis___ChaVisitor___visit_icode; fra.me.has_broke = 0; fra.me.REG_size = 7; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[1] = NIT_NULL; fra.me.REG[2] = NIT_NULL; fra.me.REG[3] = NIT_NULL; fra.me.REG[4] = NIT_NULL; fra.me.REG[5] = NIT_NULL; fra.me.REG[6] = NIT_NULL; fra.me.REG[0] = p0; fra.me.REG[1] = p1; /* global/cha_analysis.nit:94 */ fra.me.REG[2] = fra.me.REG[0]; fra.me.REG[3] = fra.me.REG[1]; /* global/cha_analysis.nit:96 */ REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___IStaticCall, ID_icode___icode_base___IStaticCall)) /*cast IStaticCall*/; if (UNTAG_Bool(REGB0)) { /* global/cha_analysis.nit:98 */ fra.me.REG[4] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 98); } fra.me.REG[5] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 98); } fra.me.REG[6] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[6] = CALL_icode___icode_base___MMMethod___iroutine(fra.me.REG[6])(fra.me.REG[6]); REGB0 = TAG_Bool(true); REGB1 = TAG_Bool(false); CALL_global___cha_analysis___ChaBuilder___add_search(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[5], fra.me.REG[6], REGB0, REGB1); } else { /* global/cha_analysis.nit:99 */ REGB1 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___INew, ID_icode___icode_base___INew)) /*cast INew*/; if (UNTAG_Bool(REGB1)) { /* global/cha_analysis.nit:101 */ REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 101); } fra.me.REG[6] = CALL_icode___icode_base___INew___stype(fra.me.REG[3])(fra.me.REG[3]); /* global/cha_analysis.nit:102 */ fra.me.REG[5] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[5] = CALL_global___cha_analysis___ChaBuilder___program(fra.me.REG[5])(fra.me.REG[5]); fra.me.REG[5] = CALL_program___Program___main_module(fra.me.REG[5])(fra.me.REG[5]); fra.me.REG[5] = CALL_metamodel___static_type___MMType___for_module(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[5]); fra.me.REG[5] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[5])(fra.me.REG[5]); /* global/cha_analysis.nit:103 */ fra.me.REG[6] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[5])(fra.me.REG[5]); REGB1 = CALL_metamodel___abstractmetamodel___MMGlobalClass___is_extern(fra.me.REG[6])(fra.me.REG[6]); REGB1 = TAG_Bool(!UNTAG_Bool(REGB1)); if (UNTAG_Bool(REGB1)) { /* global/cha_analysis.nit:104 */ REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 104); } fra.me.REG[6] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[6] = CALL_metamodel___abstractmetamodel___MMLocalProperty___global(fra.me.REG[6])(fra.me.REG[6]); fra.me.REG[6] = CALL_metamodel___abstractmetamodel___MMLocalClass_____bra(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]); REGB1 = TAG_Bool(VAL_ISA(fra.me.REG[6], COLOR_metamodel___abstractmetamodel___MMMethod, ID_metamodel___abstractmetamodel___MMMethod)) /*cast MMMethod*/; if (UNTAG_Bool(REGB1)) { } else { nit_abort("Cast failed", NULL, LOCATE_global___cha_analysis, 104); } /* global/cha_analysis.nit:105 */ fra.me.REG[5] = CALL_program___MMLocalClass___new_instance_iroutine(fra.me.REG[5])(fra.me.REG[5]); fra.me.REG[6] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]); /* global/cha_analysis.nit:106 */ fra.me.REG[5] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 106); } fra.me.REG[4] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); REGB1 = TAG_Bool(false); REGB0 = TAG_Bool(false); CALL_global___cha_analysis___ChaBuilder___add_search(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[4], fra.me.REG[6], REGB1, REGB0); } } else { /* global/cha_analysis.nit:108 */ REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___ISuper, ID_icode___icode_base___ISuper)) /*cast ISuper*/; if (UNTAG_Bool(REGB0)) { /* global/cha_analysis.nit:109 */ fra.me.REG[6] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 109); } fra.me.REG[4] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 109); } fra.me.REG[5] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[5] = CALL_icode___icode_base___MMMethod___iroutine(fra.me.REG[5])(fra.me.REG[5]); REGB0 = TAG_Bool(false); REGB1 = TAG_Bool(true); CALL_global___cha_analysis___ChaBuilder___add_search(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[4], fra.me.REG[5], REGB0, REGB1); } else { /* global/cha_analysis.nit:110 */ REGB1 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___ICall, ID_icode___icode_base___ICall)) /*cast ICall*/; if (UNTAG_Bool(REGB1)) { /* global/cha_analysis.nit:111 */ fra.me.REG[5] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 111); } fra.me.REG[4] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 111); } fra.me.REG[6] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[6] = CALL_icode___icode_base___MMMethod___iroutine(fra.me.REG[6])(fra.me.REG[6]); REGB1 = TAG_Bool(false); REGB0 = TAG_Bool(false); CALL_global___cha_analysis___ChaBuilder___add_search(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[4], fra.me.REG[6], REGB1, REGB0); } else { /* global/cha_analysis.nit:112 */ REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___ICheckInstance, ID_icode___icode_base___ICheckInstance)) /*cast ICheckInstance*/; if (UNTAG_Bool(REGB0)) { /* global/cha_analysis.nit:113 */ REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 113); } fra.me.REG[6] = CALL_icode___icode_base___ICheckInstance___stype(fra.me.REG[3])(fra.me.REG[3]); /* global/cha_analysis.nit:114 */ fra.me.REG[4] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[4] = CALL_global___cha_analysis___ChaBuilder___program(fra.me.REG[4])(fra.me.REG[4]); fra.me.REG[4] = CALL_program___Program___main_module(fra.me.REG[4])(fra.me.REG[4]); fra.me.REG[4] = CALL_metamodel___static_type___MMType___for_module(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[4]); fra.me.REG[4] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[4])(fra.me.REG[4]); /* global/cha_analysis.nit:115 */ fra.me.REG[4] = CALL_program___MMLocalClass___checknew_iroutine(fra.me.REG[4])(fra.me.REG[4]); /* global/cha_analysis.nit:116 */ fra.me.REG[6] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(true); REGB1 = TAG_Bool(false); CALL_global___cha_analysis___ChaBuilder___add_search(fra.me.REG[6])(fra.me.REG[6], NIT_NULL, fra.me.REG[4], REGB0, REGB1); } else { /* global/cha_analysis.nit:117 */ REGB1 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___IInitAttributes, ID_icode___icode_base___IInitAttributes)) /*cast IInitAttributes*/; if (UNTAG_Bool(REGB1)) { /* global/cha_analysis.nit:118 */ REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_global___cha_analysis, 118); } fra.me.REG[3] = CALL_icode___icode_base___IInitAttributes___stype(fra.me.REG[3])(fra.me.REG[3]); /* global/cha_analysis.nit:119 */ fra.me.REG[4] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[4] = CALL_global___cha_analysis___ChaBuilder___program(fra.me.REG[4])(fra.me.REG[4]); fra.me.REG[4] = CALL_program___Program___main_module(fra.me.REG[4])(fra.me.REG[4]); fra.me.REG[4] = CALL_metamodel___static_type___MMType___for_module(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); fra.me.REG[4] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[4])(fra.me.REG[4]); /* global/cha_analysis.nit:120 */ fra.me.REG[4] = CALL_program___MMLocalClass___init_var_iroutine(fra.me.REG[4])(fra.me.REG[4]); /* global/cha_analysis.nit:121 */ fra.me.REG[2] = CALL_global___cha_analysis___ChaVisitor___builder(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Bool(true); REGB0 = TAG_Bool(false); CALL_global___cha_analysis___ChaBuilder___add_search(fra.me.REG[2])(fra.me.REG[2], NIT_NULL, fra.me.REG[4], REGB1, REGB0); } } } } } } /* global/cha_analysis.nit:123 */ CALL_SUPER_global___cha_analysis___ChaVisitor___visit_icode(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); stack_frame_head = fra.me.prev; return; }
val_t syntax___extern_type_inheritance___MMLocalClass___extern_type(val_t p0){ struct {struct stack_frame_t me; val_t MORE_REG[6];} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t tmp; static val_t once_value_2; /* Once value */ static val_t once_value_3; /* Once value */ static val_t once_value_4; /* Once value */ static val_t once_value_5; /* Once value */ static val_t once_value_7; /* Once value */ static val_t once_value_8; /* Once value */ static val_t once_value_9; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_syntax___extern_type_inheritance; fra.me.line = 41; fra.me.meth = LOCATE_syntax___extern_type_inheritance___MMLocalClass___extern_type; fra.me.has_broke = 0; fra.me.REG_size = 7; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[1] = NIT_NULL; fra.me.REG[2] = NIT_NULL; fra.me.REG[3] = NIT_NULL; fra.me.REG[4] = NIT_NULL; fra.me.REG[5] = NIT_NULL; fra.me.REG[6] = NIT_NULL; fra.me.REG[0] = p0; /* syntax/extern_type_inheritance.nit:43 */ fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); REGB0 = CALL_metamodel___abstractmetamodel___MMGlobalClass___is_extern(fra.me.REG[1])(fra.me.REG[1]); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Assert failed", NULL, LOCATE_syntax___extern_type_inheritance, 43); } /* syntax/extern_type_inheritance.nit:45 */ fra.me.REG[1] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[0])(fra.me.REG[0]); REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL); if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL); REGB0 = REGB1; } } REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { fra.me.REG[1] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[0])(fra.me.REG[0]); goto label1; } /* syntax/extern_type_inheritance.nit:47 */ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[0])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); REGB0 = REGB1; } REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { /* syntax/extern_type_inheritance.nit:48 */ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[2] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL); REGB0 = REGB1; } } REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { /* syntax/extern_type_inheritance.nit:49 */ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[2] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[2])(fra.me.REG[2]); CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache__eq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); /* syntax/extern_type_inheritance.nit:50 */ CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_origin_cache__eq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[0]); /* syntax/extern_type_inheritance.nit:51 */ fra.me.REG[2] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = fra.me.REG[2]; goto label1; } } /* syntax/extern_type_inheritance.nit:55 */ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); if (!once_value_2) { if (!once_value_3) { fra.me.REG[3] = BOX_NativeString("Pointer"); REGB0 = TAG_Int(7); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); once_value_3 = fra.me.REG[3]; register_static_object(&once_value_3); } else fra.me.REG[3] = once_value_3; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_2 = fra.me.REG[3]; register_static_object(&once_value_2); } else fra.me.REG[3] = once_value_2; fra.me.REG[3] = fra.me.REG[3]; REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[3])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { /* syntax/extern_type_inheritance.nit:56 */ if (!once_value_4) { fra.me.REG[3] = BOX_NativeString("C"); REGB0 = TAG_Int(1); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); once_value_4 = fra.me.REG[3]; register_static_object(&once_value_4); } else fra.me.REG[3] = once_value_4; fra.me.REG[3] = fra.me.REG[3]; if (!once_value_5) { fra.me.REG[2] = BOX_NativeString("void*"); REGB0 = TAG_Int(5); fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0); once_value_5 = fra.me.REG[2]; register_static_object(&once_value_5); } else fra.me.REG[2] = once_value_5; fra.me.REG[2] = fra.me.REG[2]; fra.me.REG[2] = NEW_ExternCode_syntax___extern_inline___ExternCode___init(fra.me.REG[3], fra.me.REG[2], NIT_NULL); CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache__eq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); /* syntax/extern_type_inheritance.nit:57 */ CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_origin_cache__eq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[0]); /* syntax/extern_type_inheritance.nit:58 */ fra.me.REG[2] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = fra.me.REG[2]; goto label1; } /* syntax/extern_type_inheritance.nit:62 */ fra.me.REG[2] = NEW_HashSet_standard___collection___hash_collection___HashSet___init(); /* syntax/extern_type_inheritance.nit:63 */ fra.me.REG[3] = fra.me.REG[0]; /* syntax/extern_type_inheritance.nit:64 */ fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[3] = CALL_metamodel___partial_order___PartialOrderElement___direct_greaters(fra.me.REG[3])(fra.me.REG[3]); /* ../lib/standard/collection/array.nit:269 */ REGB0 = TAG_Int(0); /* ../lib/standard/collection/array.nit:270 */ REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL); if (UNTAG_Bool(REGB1)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 270); } REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3]); /* ../lib/standard/collection/array.nit:271 */ fra.me.REG[4] = ATTR_standard___collection___array___Array____items(fra.me.REG[3]); /* ../lib/standard/collection/array.nit:272 */ while(1) { /* ../lib/standard/collection/array.nit:24 */ REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL); if (UNTAG_Bool(REGB1)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24); } REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3]); REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB2)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:235 */ REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1)); /* ../lib/standard/collection/array.nit:272 */ if (UNTAG_Bool(REGB1)) { /* ../lib/standard/collection/array.nit:273 */ REGB1 = TAG_Bool(fra.me.REG[4]==NIT_NULL); if (UNTAG_Bool(REGB1)) { nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273); } /* ../lib/standard/collection/array.nit:718 */ fra.me.REG[5] = ((Nit_NativeArray)fra.me.REG[4])->val[UNTAG_Int(REGB0)]; /* syntax/extern_type_inheritance.nit:65 */ fra.me.REG[6] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[5])(fra.me.REG[5]); REGB1 = CALL_metamodel___abstractmetamodel___MMGlobalClass___is_extern(fra.me.REG[6])(fra.me.REG[6]); if (UNTAG_Bool(REGB1)) { /* syntax/extern_type_inheritance.nit:66 */ fra.me.REG[5] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_origin(fra.me.REG[5])(fra.me.REG[5]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[5]); } /* ../lib/standard/collection/array.nit:274 */ REGB1 = TAG_Int(1); /* ../lib/standard/kernel.nit:238 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* ../lib/standard/collection/array.nit:274 */ REGB0 = REGB1; } else { /* ../lib/standard/collection/array.nit:272 */ goto label6; } } label6: while(0); /* syntax/extern_type_inheritance.nit:71 */ REGB0 = CALL_standard___collection___abstract_collection___Collection___length(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Int(1); REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB2)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:237 */ REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1)); /* syntax/extern_type_inheritance.nit:71 */ if (UNTAG_Bool(REGB1)) { /* syntax/extern_type_inheritance.nit:72 */ fra.me.REG[4] = CALL_standard___file___Object___stderr(fra.me.REG[0])(fra.me.REG[0]); REGB1 = TAG_Int(5); fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1); if (!once_value_7) { fra.me.REG[5] = BOX_NativeString("Error: Extern class "); REGB1 = TAG_Int(20); fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB1); once_value_7 = fra.me.REG[5]; register_static_object(&once_value_7); } else fra.me.REG[5] = once_value_7; fra.me.REG[5] = fra.me.REG[5]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]); fra.me.REG[5] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[5])(fra.me.REG[5]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]); if (!once_value_8) { fra.me.REG[5] = BOX_NativeString("::"); REGB1 = TAG_Int(2); fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB1); once_value_8 = fra.me.REG[5]; register_static_object(&once_value_8); } else fra.me.REG[5] = once_value_8; fra.me.REG[5] = fra.me.REG[5]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]); fra.me.REG[5] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[5])(fra.me.REG[5]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]); if (!once_value_9) { fra.me.REG[5] = BOX_NativeString(" has ambiguous extern type, found in super classes: \n"); REGB1 = TAG_Int(53); fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB1); once_value_9 = fra.me.REG[5]; register_static_object(&once_value_9); } else fra.me.REG[5] = once_value_9; fra.me.REG[5] = fra.me.REG[5]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]); fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]); CALL_standard___stream___OStream___write(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]); CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[2])(fra.me.REG[2], (&(fra.me)), ((fun_t)OC_syntax___extern_type_inheritance___MMLocalClass___extern_type_10)); /* syntax/extern_type_inheritance.nit:74 */ REGB1 = TAG_Int(1); CALL_standard___kernel___Object___exit(fra.me.REG[0])(fra.me.REG[0], REGB1); } else { /* syntax/extern_type_inheritance.nit:75 */ REGB1 = CALL_standard___collection___abstract_collection___Collection___length(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Int(1); REGB2 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB0)); if (UNTAG_Bool(REGB2)) { } else { /* ../lib/standard/kernel.nit:230 */ REGB0 = TAG_Bool((REGB1)==(REGB0)); /* syntax/extern_type_inheritance.nit:75 */ REGB2 = REGB0; } if (UNTAG_Bool(REGB2)) { /* syntax/extern_type_inheritance.nit:76 */ fra.me.REG[2] = CALL_standard___collection___abstract_collection___Collection___first(fra.me.REG[2])(fra.me.REG[2]); /* syntax/extern_type_inheritance.nit:77 */ fra.me.REG[3] = CALL_syntax___extern_inline___MMLocalClass___extern_type(fra.me.REG[2])(fra.me.REG[2]); CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache__eq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]); /* syntax/extern_type_inheritance.nit:78 */ CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_origin_cache__eq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); } else { /* syntax/extern_type_inheritance.nit:81 */ nit_abort("Aborted", NULL, LOCATE_syntax___extern_type_inheritance, 81); } } /* syntax/extern_type_inheritance.nit:84 */ fra.me.REG[0] = CALL_syntax___extern_type_inheritance___MMLocalClass___extern_type_cache(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = fra.me.REG[0]; goto label1; label1: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[1]; }