val_t standard___collection___range___Range___has_only(val_t p0, val_t p1) { struct { struct stack_frame_t me; val_t MORE_REG[2]; } 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_standard___collection___range; fra.me.line = 32; fra.me.meth = LOCATE_standard___collection___range___Range___has_only; fra.me.has_broke = 0; fra.me.REG_size = 3; 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[0] = p0; fra.me.REG[1] = p1; /* ../lib/standard/collection/range.nit:32 */ REGB0 = TAG_Bool(ATTR_standard___collection___range___Range____first(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Uninitialized attribute %s", "_first", LOCATE_standard___collection___range, 32); } fra.me.REG[2] = ATTR_standard___collection___range___Range____first(fra.me.REG[0]); REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[1])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(ATTR_standard___collection___range___Range____last(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Uninitialized attribute %s", "_last", LOCATE_standard___collection___range, 32); } fra.me.REG[0] = ATTR_standard___collection___range___Range____last(fra.me.REG[0]); 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; } } else { REGB1 = TAG_Bool(false); REGB0 = REGB1; } goto label1; label1: while(0); stack_frame_head = fra.me.prev; return REGB0; }
val_t metamodel___type_formal___MMTypeFormal_____l(val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_metamodel___type_formal; fra.me.line = 42; fra.me.meth = LOCATE_metamodel___type_formal___MMTypeFormal_____l; 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.REG[0] = p0; fra.me.REG[1] = p1; /* metamodel/type_formal.nit:42 */ 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)) { REGB0 = TAG_Bool(1); } else { fra.me.REG[0] = CALL_metamodel___type_formal___MMTypeFormal___bound(fra.me.REG[0])(fra.me.REG[0]); REGB1 = CALL_metamodel___static_type___MMType___is_supertype(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); REGB0 = REGB1; } goto label1; label1: while(0); stack_frame_head = fra.me.prev; return REGB0; }
void OC_syntax___SrcModuleLoader___parse_file_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;} fra; val_t REGB0; val_t REGB1; val_t REGB2; fun_t CREG[1]; val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_syntax; fra.me.line = 0; fra.me.meth = LOCATE_syntax___SrcModuleLoader___parse_file; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.REG[0] = NIT_NULL; fra.me.closure_ctx = closctx_param; fra.me.closure_funs = CREG; fra.me.REG[0] = p0; CREG[0] = clos_fun0; REGB0 = fra.me.REG[0]; REGB1 = CALL_kernel___Char___is_digit(REGB0)(REGB0); REGB1 = TAG_Bool(!UNTAG_Bool(REGB1)); if (UNTAG_Bool(REGB1)) { REGB1 = CALL_kernel___Char___is_letter(REGB0)(REGB0); REGB1 = TAG_Bool(!UNTAG_Bool(REGB1)); } else { REGB2 = TAG_Bool(false); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Char('_'); REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1)); if (UNTAG_Bool(REGB2)) { } else { /* ./../lib/standard//kernel.nit:347 */ REGB1 = TAG_Bool((REGB0)==(REGB1)); /* ./syntax//syntax.nit:36 */ REGB2 = REGB1; } REGB2 = TAG_Bool(!UNTAG_Bool(REGB2)); } else { REGB1 = TAG_Bool(false); REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { /* ./syntax//syntax.nit:38 */ REGB2 = TAG_Bool(false); closctx->REG[0] = REGB2; /* ./syntax//syntax.nit:39 */ closctx->has_broke = 1; goto label2; } label2: while(0); stack_frame_head = fra.me.prev; return; }
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 OC_standard___math___Collection___rand_2(struct stack_frame_t *closctx, val_t p0){ struct {struct stack_frame_t me;} fra; val_t REGB0; val_t REGB1; val_t tmp; /* ../lib/standard/math.nit:49 */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_standard___math; fra.me.line = 49; fra.me.meth = LOCATE_standard___math___Collection___rand; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; /* ../lib/standard/math.nit:50 */ REGB0 = TAG_Int(0); REGB1 = TAG_Bool(IS_EQUAL_OO(closctx->REG[2],REGB0)); if (UNTAG_Bool(REGB1)) { } else { /* ../lib/standard/kernel.nit:227 */ REGB0 = TAG_Bool((closctx->REG[2])==(REGB0)); /* ../lib/standard/math.nit:50 */ REGB1 = REGB0; } if (UNTAG_Bool(REGB1)) { /* ../lib/standard/math.nit:52 */ closctx->REG[3] = fra.me.REG[0]; /* ../lib/standard/math.nit:53 */ closctx->has_broke = 1; goto label3; } else { /* ../lib/standard/math.nit:55 */ REGB1 = TAG_Int(1); /* ../lib/standard/kernel.nit:237 */ REGB1 = TAG_Int(UNTAG_Int(closctx->REG[2])-UNTAG_Int(REGB1)); /* ../lib/standard/math.nit:55 */ closctx->REG[2] = REGB1; } label3: while(0); stack_frame_head = fra.me.prev; return; }
val_t metamodel___virtualtype___MMVirtualType___for_module(val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[3];} 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_metamodel___virtualtype; fra.me.line = 73; fra.me.meth = LOCATE_metamodel___virtualtype___MMVirtualType___for_module; fra.me.has_broke = 0; fra.me.REG_size = 4; 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[0] = p0; fra.me.REG[1] = p1; /* metamodel/virtualtype.nit:75 */ fra.me.REG[2] = CALL_metamodel___static_type___MMType___mmmodule(fra.me.REG[0])(fra.me.REG[0]); REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[2])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { fra.me.REG[2] = fra.me.REG[0]; goto label1; } /* metamodel/virtualtype.nit:76 */ fra.me.REG[3] = CALL_metamodel___virtualtype___MMVirtualType___recv(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_metamodel___static_type___MMType___for_module(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]); fra.me.REG[1] = CALL_metamodel___static_type___MMType___adapt_to(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); fra.me.REG[2] = fra.me.REG[1]; goto label1; label1: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[2]; }
val_t standard___environ___String___environ(val_t p0){ struct {struct stack_frame_t me; val_t MORE_REG[1];} fra; val_t REGB0; val_t REGB1; val_t tmp; static val_t once_value_1; /* Once value */ static val_t once_value_2; /* Once value */ static val_t once_value_4; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_standard___environ; fra.me.line = 22; fra.me.meth = LOCATE_standard___environ___String___environ; 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.REG[0] = p0; /* ../lib/standard/environ.nit:26 */ fra.me.REG[0] = CALL_standard___string___String___to_cstring(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_standard___environ___NativeString___get_environ(fra.me.REG[0])(fra.me.REG[0]); /* ../lib/standard/environ.nit:28 */ if (!once_value_1) { if (!once_value_2) { fra.me.REG[1] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB0); once_value_2 = fra.me.REG[1]; register_static_object(&once_value_2); } else fra.me.REG[1] = once_value_2; fra.me.REG[1] = fra.me.REG[1]; fra.me.REG[1] = CALL_standard___string___String___to_cstring(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[1] = CALL_standard___environ___NativeString___get_environ(fra.me.REG[1])(fra.me.REG[1]); once_value_1 = fra.me.REG[1]; register_static_object(&once_value_1); } else fra.me.REG[1] = once_value_1; fra.me.REG[1] = fra.me.REG[1]; /* ../lib/standard/environ.nit:29 */ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[0],fra.me.REG[1])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); REGB0 = REGB1; } REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { /* ../lib/standard/environ.nit:30 */ fra.me.REG[0] = NEW_String_standard___string___String___from_cstring(fra.me.REG[0]); goto label3; } else { /* ../lib/standard/environ.nit:32 */ if (!once_value_4) { fra.me.REG[1] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB0); once_value_4 = fra.me.REG[1]; register_static_object(&once_value_4); } else fra.me.REG[1] = once_value_4; fra.me.REG[1] = fra.me.REG[1]; fra.me.REG[0] = fra.me.REG[1]; goto label3; } label3: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[0]; }
void abstracttool___MMLocalClass___dump_properties(val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[3];} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t tmp; static val_t once_value_1; /* Once value */ 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_9; /* Once value */ static val_t once_value_10; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_abstracttool; fra.me.line = 116; fra.me.meth = LOCATE_abstracttool___MMLocalClass___dump_properties; fra.me.has_broke = 0; fra.me.REG_size = 4; 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[0] = p0; fra.me.REG[1] = p1; /* ./abstracttool.nit:118 */ REGB0 = TAG_Int(3); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); if (!once_value_1) { fra.me.REG[3] = BOX_NativeString("class "); REGB0 = TAG_Int(6); fra.me.REG[3] = NEW_String_string___String___with_native(fra.me.REG[3], REGB0); once_value_1 = fra.me.REG[3]; register_static_object(&once_value_1); } else fra.me.REG[3] = once_value_1; fra.me.REG[3] = fra.me.REG[3]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[3] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); if (!once_value_2) { fra.me.REG[3] = BOX_NativeString("\n"); REGB0 = TAG_Int(1); fra.me.REG[3] = NEW_String_string___String___with_native(fra.me.REG[3], REGB0); 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]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[2] = CALL_string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); CALL_stream___OStream___write(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); /* ./abstracttool.nit:119 */ fra.me.REG[2] = CALL_abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); REGB0 = CALL_abstractmetamodel___MMGlobalClass___visibility_level(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Int(3); REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1)); if (UNTAG_Bool(REGB2)) { } else { /* ./../lib/standard//kernel.nit:207 */ REGB1 = TAG_Bool((REGB0)==(REGB1)); /* ./abstracttool.nit:119 */ REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { fra.me.REG[2] = CALL_abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_abstractmetamodel___MMGlobalClass___intro(fra.me.REG[2])(fra.me.REG[2]); REGB2 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[0],fra.me.REG[2])); if (UNTAG_Bool(REGB2)) { } else { REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); REGB2 = REGB1; } REGB2 = TAG_Bool(!UNTAG_Bool(REGB2)); } else { REGB1 = TAG_Bool(false); REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { /* ./abstracttool.nit:120 */ if (!once_value_3) { fra.me.REG[2] = BOX_NativeString("\tclass not visible in this module\n"); REGB2 = TAG_Int(34); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB2); once_value_3 = fra.me.REG[2]; register_static_object(&once_value_3); } else fra.me.REG[2] = once_value_3; fra.me.REG[2] = fra.me.REG[2]; CALL_stream___OStream___write(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); } else { /* ./abstracttool.nit:121 */ fra.me.REG[2] = CALL_abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[3] = CALL_abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[3] = CALL_abstractmetamodel___MMGlobalClass___mmmodule(fra.me.REG[3])(fra.me.REG[3]); REGB2 = CALL_abstractmetamodel___MMModule___visibility_for(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); REGB1 = TAG_Int(0); REGB0 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1)); if (UNTAG_Bool(REGB0)) { } else { /* ./../lib/standard//kernel.nit:207 */ REGB1 = TAG_Bool((REGB2)==(REGB1)); /* ./abstracttool.nit:121 */ REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { /* ./abstracttool.nit:122 */ if (!once_value_4) { fra.me.REG[3] = BOX_NativeString("\tclass is defined later in the hierarchy\n"); REGB0 = TAG_Int(41); fra.me.REG[3] = NEW_String_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]; CALL_stream___OStream___write(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); } else { /* ./abstracttool.nit:124 */ fra.me.REG[3] = CALL_abstractmetamodel___MMLocalClass___global_properties(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___Collection___iterate(fra.me.REG[3])(fra.me.REG[3], (&(fra.me)), ((fun_t)OC_abstracttool___MMLocalClass___dump_properties_5)); } } /* ./abstracttool.nit:129 */ REGB0 = TAG_Int(3); fra.me.REG[3] = NEW_Array_array___Array___with_capacity(REGB0); if (!once_value_9) { fra.me.REG[2] = BOX_NativeString("end # "); REGB0 = TAG_Int(6); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0); once_value_9 = fra.me.REG[2]; register_static_object(&once_value_9); } else fra.me.REG[2] = once_value_9; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[2]); fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[0]); if (!once_value_10) { fra.me.REG[0] = BOX_NativeString("\n"); REGB0 = TAG_Int(1); fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0); once_value_10 = fra.me.REG[0]; register_static_object(&once_value_10); } else fra.me.REG[0] = once_value_10; fra.me.REG[0] = fra.me.REG[0]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[0]); fra.me.REG[3] = CALL_string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]); CALL_stream___OStream___write(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); stack_frame_head = fra.me.prev; return; }
void abstracttool___AbstractCompiler___exec_cmd_line(val_t p0){ struct {struct stack_frame_t me; val_t MORE_REG[3];} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t REGB3; val_t REGB4; val_t tmp; static val_t once_value_1; /* Once value */ 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_6; /* Once value */ static val_t once_value_7; /* Once value */ static val_t once_value_8; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_abstracttool; fra.me.line = 40; fra.me.meth = LOCATE_abstracttool___AbstractCompiler___exec_cmd_line; fra.me.has_broke = 0; fra.me.REG_size = 4; 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[0] = p0; /* ./abstracttool.nit:42 */ CALL_mmloader___ToolContext___process_options(fra.me.REG[0])(fra.me.REG[0]); /* ./abstracttool.nit:44 */ fra.me.REG[1] = CALL_mmloader___ToolContext___opt_version(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___Option___value(fra.me.REG[1])(fra.me.REG[1]); if (UNTAG_Bool(fra.me.REG[1])) { /* ./abstracttool.nit:45 */ REGB0 = TAG_Int(5); fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0); if (!once_value_1) { fra.me.REG[2] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0); once_value_1 = fra.me.REG[2]; register_static_object(&once_value_1); } else fra.me.REG[2] = once_value_1; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[2] = CALL_abstracttool___AbstractCompiler___tool_name(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_2) { fra.me.REG[2] = BOX_NativeString(" version "); REGB0 = TAG_Int(9); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0); once_value_2 = fra.me.REG[2]; register_static_object(&once_value_2); } else fra.me.REG[2] = once_value_2; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[2] = CALL_nit_version___Object___nit_version(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_3) { fra.me.REG[2] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0); once_value_3 = fra.me.REG[2]; register_static_object(&once_value_3); } else fra.me.REG[2] = once_value_3; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]); CALL_file___Object___print(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); /* ./abstracttool.nit:46 */ REGB0 = TAG_Int(0); CALL_kernel___Object___exit(fra.me.REG[0])(fra.me.REG[0], REGB0); } /* ./abstracttool.nit:49 */ fra.me.REG[1] = CALL_mmloader___ToolContext___opt_help(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___Option___value(fra.me.REG[1])(fra.me.REG[1]); if (UNTAG_Bool(fra.me.REG[1])) { /* ./abstracttool.nit:50 */ REGB0 = TAG_Int(3); fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0); if (!once_value_4) { fra.me.REG[2] = BOX_NativeString("usage: "); REGB0 = TAG_Int(7); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0); once_value_4 = fra.me.REG[2]; register_static_object(&once_value_4); } else fra.me.REG[2] = once_value_4; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[2] = CALL_abstracttool___AbstractCompiler___tool_name(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_5) { fra.me.REG[2] = BOX_NativeString(" [options] file..."); REGB0 = TAG_Int(18); fra.me.REG[2] = NEW_String_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]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]); CALL_file___Object___print(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); /* ./abstracttool.nit:51 */ fra.me.REG[1] = CALL_mmloader___ToolContext___option_context(fra.me.REG[0])(fra.me.REG[0]); CALL_opts___OptionContext___usage(fra.me.REG[1])(fra.me.REG[1]); /* ./abstracttool.nit:52 */ REGB0 = TAG_Int(0); CALL_kernel___Object___exit(fra.me.REG[0])(fra.me.REG[0], REGB0); } /* ./abstracttool.nit:55 */ fra.me.REG[1] = CALL_mmloader___ToolContext___option_context(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___OptionContext___rest(fra.me.REG[1])(fra.me.REG[1]); /* ./../lib/standard//collection//array.nit:23 */ REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23); } REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]); /* ./abstracttool.nit:55 */ REGB1 = TAG_Int(0); REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1)); if (UNTAG_Bool(REGB2)) { } else { /* ./../lib/standard//kernel.nit:207 */ REGB1 = TAG_Bool((REGB0)==(REGB1)); /* ./abstracttool.nit:55 */ REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { /* ./abstracttool.nit:56 */ REGB2 = TAG_Int(3); fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB2); if (!once_value_6) { fra.me.REG[2] = BOX_NativeString("usage: "); REGB2 = TAG_Int(7); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB2); once_value_6 = fra.me.REG[2]; register_static_object(&once_value_6); } else fra.me.REG[2] = once_value_6; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[2] = CALL_abstracttool___AbstractCompiler___tool_name(fra.me.REG[0])(fra.me.REG[0]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_7) { fra.me.REG[2] = BOX_NativeString(" [options] file..."); REGB2 = TAG_Int(18); fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB2); once_value_7 = fra.me.REG[2]; register_static_object(&once_value_7); } else fra.me.REG[2] = once_value_7; fra.me.REG[2] = fra.me.REG[2]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]); CALL_file___Object___print(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); /* ./abstracttool.nit:57 */ fra.me.REG[1] = CALL_mmloader___ToolContext___option_context(fra.me.REG[0])(fra.me.REG[0]); CALL_opts___OptionContext___usage(fra.me.REG[1])(fra.me.REG[1]); /* ./abstracttool.nit:58 */ REGB2 = TAG_Int(1); CALL_kernel___Object___exit(fra.me.REG[0])(fra.me.REG[0], REGB2); } /* ./abstracttool.nit:61 */ fra.me.REG[1] = CALL_mmloader___ToolContext___option_context(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___OptionContext___rest(fra.me.REG[1])(fra.me.REG[1]); /* ./abstracttool.nit:62 */ fra.me.REG[2] = NEW_Array_array___Array___init(); /* ./abstracttool.nit:63 */ if (!once_value_8) { fra.me.REG[3] = BOX_NativeString("Syntax analysis"); REGB2 = TAG_Int(15); fra.me.REG[3] = NEW_String_string___String___with_native(fra.me.REG[3], REGB2); once_value_8 = fra.me.REG[3]; register_static_object(&once_value_8); } else fra.me.REG[3] = once_value_8; fra.me.REG[3] = fra.me.REG[3]; REGB2 = TAG_Int(1); CALL_mmloader___ToolContext___info(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3], REGB2); /* ./abstracttool.nit:64 */ REGB2 = TAG_Int(0); /* ./../lib/standard//collection//array.nit:23 */ REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); if (UNTAG_Bool(REGB1)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23); } REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]); /* ./../lib/standard//kernel.nit:332 */ while(1) { /* ./../lib/standard//kernel.nit:212 */ REGB0 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB1)); /* ./../lib/standard//kernel.nit:332 */ if (UNTAG_Bool(REGB0)) { /* ./abstracttool.nit:64 */ REGB0 = REGB2; /* ./../lib/standard//collection//array.nit:243 */ fra.me.REG[3] = fra.me.REG[1]; /* ./../lib/standard//collection//array.nit:245 */ REGB3 = TAG_Int(0); /* ./../lib/standard//kernel.nit:213 */ REGB3 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB3)); /* ./../lib/standard//collection//array.nit:245 */ if (UNTAG_Bool(REGB3)) { REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL); if (UNTAG_Bool(REGB3)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); } REGB3 = ATTR_array___AbstractArrayRead____length(fra.me.REG[3]); /* ./../lib/standard//kernel.nit:212 */ REGB3 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB3)); } else { /* ./../lib/standard//collection//array.nit:245 */ REGB4 = TAG_Bool(false); REGB3 = REGB4; } if (UNTAG_Bool(REGB3)) { } else { nit_abort("Assert %s failed", "'index'", LOCATE_array, 245); } /* ./../lib/standard//collection//array.nit:246 */ fra.me.REG[3] = ATTR_array___Array____items(fra.me.REG[3]); REGB3 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB3)) { nit_abort("Reciever is null", NULL, LOCATE_array, 246); } /* ./../lib/standard//collection//array.nit:654 */ fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB0)]; /* ./../lib/standard//collection//array.nit:246 */ goto label9; label9: while(0); /* ./abstracttool.nit:65 */ fra.me.REG[3] = CALL_mmloader___ToolContext___get_module_from_filename(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]); /* ./abstracttool.nit:66 */ CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); /* ./../lib/standard//kernel.nit:334 */ REGB0 = TAG_Int(1); /* ./../lib/standard//kernel.nit:215 */ REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0)); /* ./../lib/standard//kernel.nit:334 */ REGB2 = REGB0; } else { /* ./../lib/standard//kernel.nit:332 */ goto label10; } } label10: while(0); /* ./abstracttool.nit:68 */ fra.me.REG[1] = CALL_mmloader___ToolContext___opt_log(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___Option___value(fra.me.REG[1])(fra.me.REG[1]); if (UNTAG_Bool(fra.me.REG[1])) { /* ./abstracttool.nit:69 */ CALL_abstracttool___AbstractCompiler___dump_context_info(fra.me.REG[0])(fra.me.REG[0]); } /* ./abstracttool.nit:72 */ REGB2 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[2])(fra.me.REG[2]); REGB2 = TAG_Bool(!UNTAG_Bool(REGB2)); if (UNTAG_Bool(REGB2)) { fra.me.REG[1] = CALL_mmloader___ToolContext___opt_only_metamodel(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___Option___value(fra.me.REG[1])(fra.me.REG[1]); REGB2 = TAG_Bool(!UNTAG_Bool(fra.me.REG[1])); } else { REGB1 = TAG_Bool(false); REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { fra.me.REG[1] = CALL_mmloader___ToolContext___opt_only_parse(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_opts___Option___value(fra.me.REG[1])(fra.me.REG[1]); REGB2 = TAG_Bool(!UNTAG_Bool(fra.me.REG[1])); } else { REGB1 = TAG_Bool(false); REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { /* ./abstracttool.nit:73 */ CALL_abstracttool___AbstractCompiler___perform_work(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); } stack_frame_head = fra.me.prev; return; }
void OC_ffi___ffi_base___MMModule___accept_ffi_visitor_2(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:106 */ fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMLocalProperty___mmmodule(fra.me.REG[0])(fra.me.REG[0]); REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],closctx->REG[0])); if (UNTAG_Bool(REGB0)) { } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], closctx->REG[0]); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[0], COLOR_metamodel___abstractmetamodel___MMMethod, ID_metamodel___abstractmetamodel___MMMethod)) /*cast MMMethod*/; } else { REGB1 = TAG_Bool(0); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = CALL_metamodel___abstractmetamodel___MMMethod___is_extern(fra.me.REG[0])(fra.me.REG[0]); } else { REGB1 = TAG_Bool(0); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { /* ffi/ffi_base.nit:107 */ fra.me.REG[1] = CALL_syntax___extern_inline___MMMethod___extern_implementation(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)); } else { /* ffi/ffi_base.nit:106 */ REGB1 = TAG_Bool(0); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { /* ffi/ffi_base.nit:108 */ CALL_ffi___ffi_base___FFIVisited___accept_ffi_visitor(fra.me.REG[0])(fra.me.REG[0], closctx->REG[1]); } stack_frame_head = fra.me.prev; return; }
void OC_utils___Object___cmangle_2(struct stack_frame_t *closctx, val_t p0){ struct {struct stack_frame_t me;} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t REGB3; val_t tmp; /* utils.nit:37 */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_utils; fra.me.line = 0; fra.me.meth = LOCATE_utils___Object___cmangle; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; REGB0 = fra.me.REG[0]; /* utils.nit:38 */ REGB1 = TAG_Char('a'); 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:387 */ REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1)); /* utils.nit:38 */ if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Char('z'); 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:385 */ REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1)); } else { /* utils.nit:38 */ REGB2 = TAG_Bool(0); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(1); } else { REGB2 = TAG_Char('A'); REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB3)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:387 */ REGB2 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB2)); /* utils.nit:38 */ if (UNTAG_Bool(REGB2)) { REGB2 = TAG_Char('Z'); REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB3)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:385 */ REGB2 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB2)); } else { /* utils.nit:38 */ REGB3 = TAG_Bool(0); REGB2 = REGB3; } REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(1); } else { REGB2 = TAG_Char('0'); REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB3)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:387 */ REGB2 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB2)); /* utils.nit:38 */ if (UNTAG_Bool(REGB2)) { REGB2 = TAG_Char('9'); REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB3)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:385 */ REGB2 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB2)); } else { /* utils.nit:38 */ REGB3 = TAG_Bool(0); REGB2 = REGB3; } REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { /* utils.nit:39 */ CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB0); /* utils.nit:40 */ REGB1 = TAG_Bool(0); closctx->REG[5] = REGB1; /* utils.nit:41 */ REGB1 = TAG_Bool(1); closctx->REG[6] = REGB1; } else { /* utils.nit:42 */ REGB1 = TAG_Char('_'); REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1)); if (UNTAG_Bool(REGB2)) { } else { /* ../lib/standard/kernel.nit:381 */ REGB1 = TAG_Bool((REGB0)==(REGB1)); /* utils.nit:42 */ REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { REGB2 = TAG_Bool(!UNTAG_Bool(closctx->REG[5])); } else { REGB1 = TAG_Bool(0); REGB2 = REGB1; } if (UNTAG_Bool(REGB2)) { /* utils.nit:43 */ CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB0); /* utils.nit:44 */ REGB2 = TAG_Bool(1); closctx->REG[5] = REGB2; /* utils.nit:45 */ REGB2 = TAG_Bool(1); closctx->REG[6] = REGB2; } else { /* utils.nit:46 */ REGB2 = CALL_standard___collection___abstract_collection___MapRead___has_key(closctx->REG[2])(closctx->REG[2], REGB0); if (UNTAG_Bool(REGB2)) { /* utils.nit:47 */ if (UNTAG_Bool(closctx->REG[6])) { /* utils.nit:48 */ REGB2 = TAG_Char('_'); CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB2); /* utils.nit:49 */ REGB2 = TAG_Char('_'); CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB2); } /* utils.nit:51 */ fra.me.REG[0] = CALL_standard___collection___abstract_collection___MapRead_____bra(closctx->REG[2])(closctx->REG[2], REGB0); CALL_standard___collection___abstract_collection___Sequence___append(closctx->REG[0])(closctx->REG[0], fra.me.REG[0]); /* utils.nit:52 */ REGB0 = TAG_Bool(0); closctx->REG[6] = REGB0; /* utils.nit:53 */ REGB0 = TAG_Bool(0); closctx->REG[5] = REGB0; } } } 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]; }
val_t analysis___inline_methods___ICall___is_inlinable(val_t p0){ struct {struct stack_frame_t me; val_t MORE_REG[3];} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t REGB3; val_t tmp; static val_t once_value_1; /* Once value */ 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_6; /* 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 */ static val_t once_value_10; /* Once value */ static val_t once_value_11; /* Once value */ static val_t once_value_12; /* Once value */ static val_t once_value_13; /* Once value */ static val_t once_value_14; /* Once value */ static val_t once_value_15; /* Once value */ static val_t once_value_16; /* Once value */ static val_t once_value_17; /* Once value */ static val_t once_value_18; /* Once value */ static val_t once_value_19; /* Once value */ static val_t once_value_20; /* Once value */ static val_t once_value_21; /* Once value */ static val_t once_value_22; /* Once value */ static val_t once_value_23; /* Once value */ static val_t once_value_24; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_analysis___inline_methods; fra.me.line = 70; fra.me.meth = LOCATE_analysis___inline_methods___ICall___is_inlinable; fra.me.has_broke = 0; fra.me.REG_size = 4; 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[0] = p0; /* analysis/inline_methods.nit:72 */ fra.me.REG[0] = CALL_icode___icode_base___IAbsCall___property(fra.me.REG[0])(fra.me.REG[0]); /* analysis/inline_methods.nit:73 */ fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]); /* analysis/inline_methods.nit:74 */ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[2])(fra.me.REG[2]); /* analysis/inline_methods.nit:75 */ REGB0 = CALL_metamodel___abstractmetamodel___MMMethod___is_intern(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { if (!once_value_1) { if (!once_value_2) { fra.me.REG[3] = BOX_NativeString("Object"); REGB0 = TAG_Int(6); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); 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]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_1 = fra.me.REG[3]; register_static_object(&once_value_1); } else fra.me.REG[3] = once_value_1; 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; } REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); } else { REGB1 = TAG_Bool(false); REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(true); } else { /* analysis/inline_methods.nit:76 */ if (!once_value_3) { if (!once_value_4) { fra.me.REG[3] = BOX_NativeString("Int"); REGB1 = TAG_Int(3); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); 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]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); 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]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { if (!once_value_5) { if (!once_value_6) { fra.me.REG[3] = BOX_NativeString("enumerate_to"); REGB1 = TAG_Int(12); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); once_value_6 = fra.me.REG[3]; register_static_object(&once_value_6); } else fra.me.REG[3] = once_value_6; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_5 = fra.me.REG[3]; register_static_object(&once_value_5); } else fra.me.REG[3] = once_value_5; fra.me.REG[3] = fra.me.REG[3]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(true); } else { if (!once_value_7) { if (!once_value_8) { fra.me.REG[3] = BOX_NativeString("enumerate_before"); REGB2 = TAG_Int(16); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB2); once_value_8 = fra.me.REG[3]; register_static_object(&once_value_8); } else fra.me.REG[3] = once_value_8; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_7 = fra.me.REG[3]; register_static_object(&once_value_7); } else fra.me.REG[3] = once_value_7; fra.me.REG[3] = fra.me.REG[3]; REGB2 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB2)) { } else { REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB2 = REGB3; } REGB1 = REGB2; } } else { REGB2 = TAG_Bool(false); REGB1 = REGB2; } /* analysis/inline_methods.nit:75 */ REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(true); } else { /* analysis/inline_methods.nit:77 */ if (!once_value_9) { if (!once_value_10) { fra.me.REG[3] = BOX_NativeString("Array"); REGB1 = TAG_Int(5); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); once_value_10 = fra.me.REG[3]; register_static_object(&once_value_10); } else fra.me.REG[3] = once_value_10; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_9 = fra.me.REG[3]; register_static_object(&once_value_9); } else fra.me.REG[3] = once_value_9; fra.me.REG[3] = fra.me.REG[3]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { if (!once_value_11) { if (!once_value_12) { fra.me.REG[3] = BOX_NativeString("length"); REGB1 = TAG_Int(6); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); once_value_12 = fra.me.REG[3]; register_static_object(&once_value_12); } else fra.me.REG[3] = once_value_12; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_11 = fra.me.REG[3]; register_static_object(&once_value_11); } else fra.me.REG[3] = once_value_11; fra.me.REG[3] = fra.me.REG[3]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(true); } else { if (!once_value_13) { if (!once_value_14) { fra.me.REG[3] = BOX_NativeString("[]"); REGB2 = TAG_Int(2); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB2); once_value_14 = fra.me.REG[3]; register_static_object(&once_value_14); } else fra.me.REG[3] = once_value_14; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_13 = fra.me.REG[3]; register_static_object(&once_value_13); } else fra.me.REG[3] = once_value_13; fra.me.REG[3] = fra.me.REG[3]; REGB2 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB2)) { } else { REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB2 = REGB3; } REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(true); } else { if (!once_value_15) { if (!once_value_16) { fra.me.REG[3] = BOX_NativeString("iterate"); REGB2 = TAG_Int(7); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB2); once_value_16 = fra.me.REG[3]; register_static_object(&once_value_16); } else fra.me.REG[3] = once_value_16; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_15 = fra.me.REG[3]; register_static_object(&once_value_15); } else fra.me.REG[3] = once_value_15; fra.me.REG[3] = fra.me.REG[3]; REGB2 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB2)) { } else { REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB2 = REGB3; } REGB1 = REGB2; } } else { REGB2 = TAG_Bool(false); REGB1 = REGB2; } /* analysis/inline_methods.nit:75 */ REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(true); } else { /* analysis/inline_methods.nit:78 */ if (!once_value_17) { if (!once_value_18) { fra.me.REG[3] = BOX_NativeString("AbstractArrayRead"); REGB1 = TAG_Int(17); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); once_value_18 = fra.me.REG[3]; register_static_object(&once_value_18); } else fra.me.REG[3] = once_value_18; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_17 = fra.me.REG[3]; register_static_object(&once_value_17); } else fra.me.REG[3] = once_value_17; fra.me.REG[3] = fra.me.REG[3]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { if (!once_value_19) { if (!once_value_20) { fra.me.REG[3] = BOX_NativeString("length"); REGB1 = TAG_Int(6); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); once_value_20 = fra.me.REG[3]; register_static_object(&once_value_20); } else fra.me.REG[3] = once_value_20; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_19 = fra.me.REG[3]; register_static_object(&once_value_19); } else fra.me.REG[3] = once_value_19; fra.me.REG[3] = fra.me.REG[3]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB1 = REGB2; } if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(true); } else { if (!once_value_21) { if (!once_value_22) { fra.me.REG[3] = BOX_NativeString("[]"); REGB2 = TAG_Int(2); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB2); once_value_22 = fra.me.REG[3]; register_static_object(&once_value_22); } else fra.me.REG[3] = once_value_22; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_21 = fra.me.REG[3]; register_static_object(&once_value_21); } else fra.me.REG[3] = once_value_21; fra.me.REG[3] = fra.me.REG[3]; REGB2 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[3])); if (UNTAG_Bool(REGB2)) { } else { REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); REGB2 = REGB3; } REGB1 = REGB2; } } else { REGB2 = TAG_Bool(false); REGB1 = REGB2; } /* analysis/inline_methods.nit:75 */ REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(true); } else { /* analysis/inline_methods.nit:79 */ fra.me.REG[0] = CALL_metamodel___abstractmetamodel___MMLocalProperty___global(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_metamodel___abstractmetamodel___MMGlobalProperty___intro(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_metamodel___abstractmetamodel___MMLocalProperty___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); if (!once_value_23) { if (!once_value_24) { fra.me.REG[3] = BOX_NativeString("Inline__"); REGB1 = TAG_Int(8); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); once_value_24 = fra.me.REG[3]; register_static_object(&once_value_24); } else fra.me.REG[3] = once_value_24; fra.me.REG[3] = fra.me.REG[3]; fra.me.REG[3] = CALL_standard___symbol___String___to_symbol(fra.me.REG[3])(fra.me.REG[3]); once_value_23 = fra.me.REG[3]; register_static_object(&once_value_23); } else fra.me.REG[3] = once_value_23; fra.me.REG[3] = fra.me.REG[3]; REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[0],fra.me.REG[3])); if (UNTAG_Bool(REGB1)) { } else { REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]); REGB1 = REGB2; } /* analysis/inline_methods.nit:75 */ REGB0 = REGB1; } goto label25; label25: while(0); stack_frame_head = fra.me.prev; return REGB0; }