void OC_global___remove_out_of_init_get_test___Program___dump_out_of_init_information_4(struct stack_frame_t *closctx, val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[1];} fra; val_t REGB0; val_t tmp; /* global/remove_out_of_init_get_test.nit:44 */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_global___remove_out_of_init_get_test; fra.me.line = 44; fra.me.meth = LOCATE_global___remove_out_of_init_get_test___Program___dump_out_of_init_information; 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; /* global/remove_out_of_init_get_test.nit:45 */ fra.me.REG[1] = NEW_IssetCounter_icode___icode_tools___ICodeVisitor___init(); /* global/remove_out_of_init_get_test.nit:46 */ CALL_icode___icode_tools___ICodeVisitor___visit_iroutine(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); /* global/remove_out_of_init_get_test.nit:47 */ REGB0 = CALL_global___remove_out_of_init_get_test___IssetCounter___nb_isset(fra.me.REG[1])(fra.me.REG[1]); /* ../lib/standard/kernel.nit:238 */ REGB0 = TAG_Int(UNTAG_Int(closctx->REG[1])+UNTAG_Int(REGB0)); /* global/remove_out_of_init_get_test.nit:47 */ closctx->REG[1] = REGB0; stack_frame_head = fra.me.prev; return; }
val_t standard___collection___range___Range___length(val_t p0) { struct { struct stack_frame_t me; val_t MORE_REG[1]; } fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_standard___collection___range; fra.me.line = 56; fra.me.meth = LOCATE_standard___collection___range___Range___length; 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/collection/range.nit:58 */ 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, 58); } fra.me.REG[1] = ATTR_standard___collection___range___Range____first(fra.me.REG[0]); REGB0 = TAG_Bool(ATTR_standard___collection___range___Range____after(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Uninitialized attribute %s", "_after", LOCATE_standard___collection___range, 58); } fra.me.REG[0] = ATTR_standard___collection___range___Range____after(fra.me.REG[0]); REGB0 = CALL_standard___kernel___Discrete___distance(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); /* ../lib/standard/collection/range.nit:59 */ REGB1 = TAG_Int(0); 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:234 */ REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1)); /* ../lib/standard/collection/range.nit:59 */ if (UNTAG_Bool(REGB1)) { /* ../lib/standard/collection/range.nit:60 */ goto label1; } else { /* ../lib/standard/collection/range.nit:62 */ REGB1 = TAG_Int(0); REGB0 = REGB1; goto label1; } label1: while(0); stack_frame_head = fra.me.prev; return REGB0; }
/* out/indirect function for exec::Process::basic_exec_execute */ val_t Process_basic_exec_execute___out( val_t recv, val_t p, val_t av, val_t ac, val_t pf ) { bigint trans___ac; bigint trans___pf; void* orig_return; val_t trans_return; trans___ac = UNTAG_Int(ac); trans___pf = UNTAG_Int(pf); orig_return = exec_Process_Process_basic_exec_execute_4( NULL, UNBOX_NativeString(p), UNBOX_NativeString(av), trans___ac, trans___pf ); trans_return = BOX_NativeProcess(orig_return); nitni_local_ref_clean( ); return trans_return; }
/* friendly for array::AbstractArrayRead::(abstract_collection::Collection::length) */ bigint stream_Array_length( Array recv ) { val_t recv___nit; bigint result___nitni; val_t result___nit; recv___nit = recv->ref.val; result___nit = CALL_standard___collection___abstract_collection___Collection___length( recv___nit )( recv___nit ); result___nitni = UNTAG_Int(result___nit); return result___nitni; }
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; }
void OC_global___remove_out_of_init_get_test___Program___optimize_out_of_init_getters_1(struct stack_frame_t *closctx, 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; /* global/remove_out_of_init_get_test.nit:30 */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_global___remove_out_of_init_get_test; fra.me.line = 30; fra.me.meth = LOCATE_global___remove_out_of_init_get_test___Program___optimize_out_of_init_getters; 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; /* global/remove_out_of_init_get_test.nit:31 */ fra.me.REG[1] = CALL_global___reachable_from_init_method_analysis___Program___rfima(closctx->REG[0])(closctx->REG[0]); REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___remove_out_of_init_get_test, 31); } REGB0 = CALL_global___reachable_from_init_method_analysis___ReachableFromInitMethodAnalysis___is_iroutine_reachable_from_init(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { /* global/remove_out_of_init_get_test.nit:32 */ fra.me.REG[1] = NEW_GetterTestRemover_icode___icode_tools___ICodeVisitor___init(); /* global/remove_out_of_init_get_test.nit:33 */ CALL_icode___icode_tools___ICodeVisitor___visit_iroutine(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); /* global/remove_out_of_init_get_test.nit:34 */ REGB0 = CALL_global___remove_out_of_init_get_test___Program___nb_optimized_isset(closctx->REG[0])(closctx->REG[0]); REGB1 = CALL_global___remove_out_of_init_get_test___GetterTestRemover___nb_optimized_isset(fra.me.REG[1])(fra.me.REG[1]); /* ../lib/standard/kernel.nit:238 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* global/remove_out_of_init_get_test.nit:34 */ ATTR_global___remove_out_of_init_get_test___Program____nb_optimized_isset(closctx->REG[0]) = REGB1; } stack_frame_head = fra.me.prev; return; }
/* out/indirect function for stream::FDStream::native_write */ val_t FDStream_native_write___out( val_t recv, val_t i, val_t buf, val_t len ) { FDStream recv___nitni; bigint i___nitni; char * buf___nitni; bigint len___nitni; bigint return___nitni; val_t return___nit; recv___nitni = malloc( sizeof( struct s_FDStream ) ); recv___nitni->ref.val = NIT_NULL; recv___nitni->ref.count = 0; nitni_local_ref_add( (struct nitni_ref *)recv___nitni ); recv___nitni->ref.val = recv; i___nitni = UNTAG_Int(i); buf___nitni = UNBOX_NativeString(buf); len___nitni = UNTAG_Int(len); return___nitni = stream_FDStream_FDStream_native_write_3( recv___nitni, i___nitni, buf___nitni, len___nitni ); return___nit = TAG_Int(return___nitni); nitni_local_ref_clean( ); return return___nit; }
bigint stream_nullable_Object_as_Int( nullable_Object value ) { val_t temp; bigint out; temp = value->ref.val; if ( ISNULL(temp) ){ fprintf( stderr, "Casting from nullable Object to Int failed because value is null." ); abort(); }if ( ! ( ISOBJ( temp ) ? OBJISA( temp, standard___kernel___Int ): VALISA( temp, standard___kernel___Int ) ) ){ fprintf( stderr, "Casting to Int failed because value is not a Int." ); abort(); } out = UNTAG_Int(temp); return out; }
void global___remove_out_of_init_get_test___IssetCounter___visit_icode(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_global___remove_out_of_init_get_test; fra.me.line = 61; fra.me.meth = LOCATE_global___remove_out_of_init_get_test___IssetCounter___visit_icode; 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; /* global/remove_out_of_init_get_test.nit:61 */ fra.me.REG[2] = fra.me.REG[0]; fra.me.REG[3] = fra.me.REG[1]; /* global/remove_out_of_init_get_test.nit:63 */ REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___IAttrIsset, ID_icode___icode_base___IAttrIsset)) /*cast IAttrIsset*/; if (UNTAG_Bool(REGB0)) { /* global/remove_out_of_init_get_test.nit:64 */ REGB0 = CALL_global___remove_out_of_init_get_test___IssetCounter___nb_isset(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Int(1); /* ../lib/standard/kernel.nit:238 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* global/remove_out_of_init_get_test.nit:64 */ ATTR_global___remove_out_of_init_get_test___IssetCounter____nb_isset(fra.me.REG[2]) = REGB1; } /* global/remove_out_of_init_get_test.nit:67 */ CALL_SUPER_global___remove_out_of_init_get_test___IssetCounter___visit_icode(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); stack_frame_head = fra.me.prev; return; }
val_t hash___Object___hash(val_t p0){ struct {struct stack_frame_t me;} 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_hash; fra.me.line = 20; fra.me.meth = LOCATE_hash___Object___hash; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; /* ./../lib/standard//hash.nit:24 */ REGB0 = CALL_kernel___Object___object_id(fra.me.REG[0])(fra.me.REG[0]); REGB1 = TAG_Int(8); /* ./../lib/standard//kernel.nit:219 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)/UNTAG_Int(REGB1)); /* ./../lib/standard//hash.nit:24 */ goto label1; label1: while(0); stack_frame_head = fra.me.prev; return REGB1; }
/* out/indirect function for file::NativeFile::io_write */ val_t NativeFile_io_write___out( val_t recv, val_t buf, val_t len ) { NativeFile recv___nitni; char * buf___nitni; bigint len___nitni; bigint return___nitni; val_t return___nit; recv___nitni = UNBOX_NativeFile(recv); buf___nitni = UNBOX_NativeString(buf); len___nitni = UNTAG_Int(len); return___nitni = file_NativeFile_NativeFile_io_write_2( recv___nitni, buf___nitni, len___nitni ); return___nit = TAG_Int(return___nitni); nitni_local_ref_clean( ); return return___nit; }
/* out/indirect function for string::Sys::native_argv */ val_t Sys_native_argv___out( val_t recv, val_t i ) { Sys recv___nitni; bigint i___nitni; char * return___nitni; val_t return___nit; recv___nitni = malloc( sizeof( struct s_Sys ) ); recv___nitni->ref.val = NIT_NULL; recv___nitni->ref.count = 0; nitni_local_ref_add( (struct nitni_ref *)recv___nitni ); recv___nitni->ref.val = recv; i___nitni = UNTAG_Int(i); return___nitni = kernel_Sys_Sys_native_argv_1( recv___nitni, i___nitni ); return___nit = BOX_NativeString(return___nitni); nitni_local_ref_clean( ); return return___nit; }
/* out/indirect function for stream::FDStream::native_close */ val_t FDStream_native_close___out( val_t recv, val_t i ) { FDStream recv___nitni; bigint i___nitni; bigint return___nitni; val_t return___nit; recv___nitni = malloc( sizeof( struct s_FDStream ) ); recv___nitni->ref.val = NIT_NULL; recv___nitni->ref.count = 0; nitni_local_ref_add( (struct nitni_ref *)recv___nitni ); recv___nitni->ref.val = recv; i___nitni = UNTAG_Int(i); return___nitni = stream_FDStream_FDStream_native_close_1( recv___nitni, i___nitni ); return___nit = TAG_Int(return___nitni); nitni_local_ref_clean( ); return return___nit; }
void global___remove_out_of_init_get_test___GetterTestRemover___visit_icode(val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[4];} 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___remove_out_of_init_get_test; fra.me.line = 75; fra.me.meth = LOCATE_global___remove_out_of_init_get_test___GetterTestRemover___visit_icode; fra.me.has_broke = 0; fra.me.REG_size = 5; 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[0] = p0; fra.me.REG[1] = p1; /* global/remove_out_of_init_get_test.nit:75 */ fra.me.REG[2] = fra.me.REG[0]; fra.me.REG[3] = fra.me.REG[1]; /* global/remove_out_of_init_get_test.nit:78 */ REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_icode___icode_base___IAttrIsset, ID_icode___icode_base___IAttrIsset)) /*cast IAttrIsset*/; if (UNTAG_Bool(REGB0)) { /* global/remove_out_of_init_get_test.nit:79 */ REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___remove_out_of_init_get_test, 79); } fra.me.REG[3] = CALL_icode___icode_base___ICode___result(fra.me.REG[3])(fra.me.REG[3]); /* global/remove_out_of_init_get_test.nit:80 */ REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], NIT_NULL); REGB0 = REGB1; } } REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Assert failed", NULL, LOCATE_global___remove_out_of_init_get_test, 80); } /* global/remove_out_of_init_get_test.nit:81 */ REGB0 = TAG_Bool(1); fra.me.REG[4] = NEW_IBoolValue_icode___icode_base___IBoolValue___init(REGB0); /* global/remove_out_of_init_get_test.nit:82 */ CALL_icode___icode_base___ICode___result__eq(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]); /* global/remove_out_of_init_get_test.nit:83 */ fra.me.REG[3] = CALL_icode___icode_tools___ICodeVisitor___current_icode(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___remove_out_of_init_get_test, 83); } CALL_standard___collection___list___ListIterator___insert_before(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); /* global/remove_out_of_init_get_test.nit:84 */ fra.me.REG[4] = CALL_icode___icode_tools___ICodeVisitor___current_icode(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL); if (UNTAG_Bool(REGB0)) { nit_abort("Reciever is null", NULL, LOCATE_global___remove_out_of_init_get_test, 84); } CALL_standard___collection___list___ListIterator___delete(fra.me.REG[4])(fra.me.REG[4]); /* global/remove_out_of_init_get_test.nit:85 */ REGB0 = CALL_global___remove_out_of_init_get_test___GetterTestRemover___nb_optimized_isset(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Int(1); /* ../lib/standard/kernel.nit:238 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* global/remove_out_of_init_get_test.nit:85 */ ATTR_global___remove_out_of_init_get_test___GetterTestRemover____nb_optimized_isset(fra.me.REG[2]) = REGB1; } /* global/remove_out_of_init_get_test.nit:88 */ CALL_SUPER_global___remove_out_of_init_get_test___GetterTestRemover___visit_icode(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]); stack_frame_head = fra.me.prev; return; }
val_t syntax___SrcModuleLoader___parse_file(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4, val_t p5){ struct {struct stack_frame_t me; val_t MORE_REG[6];} fra; val_t REGB0; val_t REGB1; val_t tmp; static val_t once_value_4; /* Once value */ static val_t once_value_5; /* Once value */ static val_t once_value_6; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_syntax; fra.me.line = 33; fra.me.meth = LOCATE_syntax___SrcModuleLoader___parse_file; fra.me.has_broke = 0; fra.me.REG_size = 7; 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; fra.me.REG[2] = p2; fra.me.REG[3] = p3; fra.me.REG[4] = p4; fra.me.REG[5] = p5; /* ./syntax//syntax.nit:35 */ fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); /* ./../lib/standard//collection//array.nit:23 */ REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23); } REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]); /* ./syntax//syntax.nit:35 */ REGB1 = TAG_Int(0); /* ./../lib/standard//kernel.nit:214 */ REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1)); /* ./syntax//syntax.nit:35 */ if (UNTAG_Bool(REGB1)) { fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); REGB1 = TAG_Int(0); REGB1 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB1); REGB1 = CALL_kernel___Char___is_lower(REGB1)(REGB1); } else { REGB0 = TAG_Bool(false); REGB1 = REGB0; } fra.me.REG[0] = REGB1; /* ./syntax//syntax.nit:36 */ fra.me.REG[6] = CALL_string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); CALL_abstract_collection___Collection___iterate(fra.me.REG[6])(fra.me.REG[6], (&(fra.me)), ((fun_t)OC_syntax___SrcModuleLoader___parse_file_1)); switch ((&(fra.me))->has_broke) { case 0: break; case 1: (&(fra.me))->has_broke = 0; goto label3; } label3: while(0); /* ./syntax//syntax.nit:41 */ REGB1 = TAG_Bool(!UNTAG_Bool(fra.me.REG[0])); if (UNTAG_Bool(REGB1)) { /* ./syntax//syntax.nit:42 */ REGB1 = TAG_Int(5); fra.me.REG[0] = NEW_Array_array___Array___with_capacity(REGB1); if (!once_value_4) { fra.me.REG[6] = BOX_NativeString(""); REGB1 = TAG_Int(0); fra.me.REG[6] = NEW_String_string___String___with_native(fra.me.REG[6], REGB1); once_value_4 = fra.me.REG[6]; register_static_object(&once_value_4); } else fra.me.REG[6] = once_value_4; fra.me.REG[6] = fra.me.REG[6]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[6]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]); if (!once_value_5) { fra.me.REG[6] = BOX_NativeString(": Error module name \""); REGB1 = TAG_Int(21); fra.me.REG[6] = NEW_String_string___String___with_native(fra.me.REG[6], REGB1); once_value_5 = fra.me.REG[6]; register_static_object(&once_value_5); } else fra.me.REG[6] = once_value_5; fra.me.REG[6] = fra.me.REG[6]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[6]); fra.me.REG[6] = CALL_string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); CALL_abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[6]); if (!once_value_6) { fra.me.REG[6] = BOX_NativeString("\", must start with a lower case letter and contain only letters, digits and '_'."); REGB1 = TAG_Int(80); fra.me.REG[6] = NEW_String_string___String___with_native(fra.me.REG[6], REGB1); once_value_6 = fra.me.REG[6]; register_static_object(&once_value_6); } else fra.me.REG[6] = once_value_6; fra.me.REG[6] = fra.me.REG[6]; CALL_abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[6]); fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); CALL_mmloader___ToolContext___error(fra.me.REG[1])(fra.me.REG[1], NIT_NULL, fra.me.REG[0]); } /* ./syntax//syntax.nit:45 */ fra.me.REG[2] = NEW_Lexer_lexer___Lexer___init(fra.me.REG[2], fra.me.REG[3]); /* ./syntax//syntax.nit:46 */ fra.me.REG[2] = NEW_Parser_parser___Parser___init(fra.me.REG[2]); /* ./syntax//syntax.nit:47 */ fra.me.REG[2] = CALL_parser___Parser___parse(fra.me.REG[2])(fra.me.REG[2]); /* ./syntax//syntax.nit:48 */ fra.me.REG[0] = CALL_parser_nodes___Start___n_base(fra.me.REG[2])(fra.me.REG[2]); REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB1)) { } else { REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(false); REGB1 = REGB0; } else { REGB0 = CALL_kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL); REGB1 = REGB0; } } if (UNTAG_Bool(REGB1)) { /* ./syntax//syntax.nit:49 */ fra.me.REG[0] = CALL_parser_nodes___Start___n_eof(fra.me.REG[2])(fra.me.REG[2]); /* ./syntax//syntax.nit:50 */ REGB1 = TAG_Bool(VAL_ISA(fra.me.REG[0], COLOR_AError, ID_AError)) /*cast AError*/; if (UNTAG_Bool(REGB1)) { } else { nit_abort("Assert failed", NULL, LOCATE_syntax, 50); } /* ./syntax//syntax.nit:51 */ fra.me.REG[6] = CALL_parser_nodes___ANode___location(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_lexer___AError___message(fra.me.REG[0])(fra.me.REG[0]); CALL_mmloader___ToolContext___fatal_error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[6], fra.me.REG[0]); } /* ./syntax//syntax.nit:53 */ fra.me.REG[2] = CALL_parser_nodes___Start___n_base(fra.me.REG[2])(fra.me.REG[2]); /* ./syntax//syntax.nit:54 */ REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB1)) { } else { REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(false); REGB1 = REGB0; } else { REGB0 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL); REGB1 = REGB0; } } REGB1 = TAG_Bool(!UNTAG_Bool(REGB1)); if (UNTAG_Bool(REGB1)) { } else { nit_abort("Assert failed", NULL, LOCATE_syntax, 54); } /* ./syntax//syntax.nit:55 */ fra.me.REG[3] = NEW_Location_location___Location___with_file(fra.me.REG[3]); /* ./syntax//syntax.nit:56 */ fra.me.REG[3] = NEW_MMSrcModule_syntax_base___MMSrcModule___init(fra.me.REG[1], fra.me.REG[2], fra.me.REG[5], fra.me.REG[4], fra.me.REG[3]); /* ./syntax//syntax.nit:57 */ goto label7; label7: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[3]; }
val_t utils___Object___cmangle(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 REGB2; val_t tmp; static val_t once_value_1; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_utils; fra.me.line = 23; fra.me.meth = LOCATE_utils___Object___cmangle; 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; /* utils.nit:23 */ fra.me.REG[2] = fra.me.REG[0]; REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[1], COLOR_standard___collection___array___Array, ID_standard___collection___array___Array)) /*cast Array[Symbol]*/; if (UNTAG_Bool(REGB0)) { } else { nit_abort("Cast failed", NULL, LOCATE_utils, 23); } /* utils.nit:26 */ if (!once_value_1) { fra.me.REG[2] = CALL_utils___Object___cmangle_table(fra.me.REG[2])(fra.me.REG[2]); 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]; /* utils.nit:27 */ fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___init(); /* ../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[1])!=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[1]); /* ../lib/standard/collection/array.nit:271 */ fra.me.REG[3] = ATTR_standard___collection___array___Array____items(fra.me.REG[1]); /* ../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[1])!=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[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: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[3]==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[4] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB0)]; /* utils.nit:29 */ REGB1 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]); REGB1 = TAG_Bool(!UNTAG_Bool(REGB1)); if (UNTAG_Bool(REGB1)) { /* utils.nit:30 */ REGB1 = TAG_Char('_'); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1); /* utils.nit:31 */ REGB1 = TAG_Char('_'); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1); /* utils.nit:32 */ REGB1 = TAG_Char('_'); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1); } /* utils.nit:34 */ REGB1 = TAG_Bool(0); fra.me.REG[5] = REGB1; /* utils.nit:35 */ REGB1 = TAG_Bool(1); fra.me.REG[6] = REGB1; /* utils.nit:36 */ fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[4])(fra.me.REG[4], (&(fra.me)), ((fun_t)OC_utils___Object___cmangle_2)); /* ../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 label3; } } label3: while(0); /* utils.nit:57 */ fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); goto label4; label4: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[0]; }
val_t compiling___compiling_writer___Writer___add_all(val_t p0, val_t p1, val_t p2){ struct {struct stack_frame_t me; val_t MORE_REG[4];} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t REGB3; val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_compiling___compiling_writer; fra.me.line = 38; fra.me.meth = LOCATE_compiling___compiling_writer___Writer___add_all; fra.me.has_broke = 0; fra.me.REG_size = 5; 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[0] = p0; fra.me.REG[1] = p1; fra.me.REG[2] = p2; /* compiling/compiling_writer.nit:41 */ REGB0 = CALL_compiling___compiling_writer___Writer___is_frozen(fra.me.REG[0])(fra.me.REG[0]); REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { } else { nit_abort("Assert failed", NULL, LOCATE_compiling___compiling_writer, 41); } /* compiling/compiling_writer.nit:42 */ REGB0 = TAG_Bool(true); /* ../lib/standard/collection/array.nit:269 */ REGB1 = TAG_Int(0); /* ../lib/standard/collection/array.nit:270 */ REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); if (UNTAG_Bool(REGB2)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 270); } REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]); /* ../lib/standard/collection/array.nit:271 */ fra.me.REG[3] = ATTR_standard___collection___array___Array____items(fra.me.REG[1]); /* ../lib/standard/collection/array.nit:272 */ while(1) { /* ../lib/standard/collection/array.nit:24 */ REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); if (UNTAG_Bool(REGB2)) { } else { nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24); } REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]); REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/; if (UNTAG_Bool(REGB3)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } /* ../lib/standard/kernel.nit:232 */ REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2)); /* ../lib/standard/collection/array.nit:272 */ if (UNTAG_Bool(REGB2)) { /* ../lib/standard/collection/array.nit:273 */ REGB2 = TAG_Bool(fra.me.REG[3]==NIT_NULL); if (UNTAG_Bool(REGB2)) { nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273); } /* ../lib/standard/collection/array.nit:718 */ fra.me.REG[4] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB1)]; /* compiling/compiling_writer.nit:44 */ if (UNTAG_Bool(REGB0)) { REGB2 = TAG_Bool(false); REGB0 = REGB2; } else { CALL_compiling___compiling_writer___Writer___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); } /* compiling/compiling_writer.nit:45 */ CALL_compiling___compiling_writer___Writer___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[4]); /* ../lib/standard/collection/array.nit:274 */ REGB2 = TAG_Int(1); /* ../lib/standard/kernel.nit:235 */ REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2)); /* ../lib/standard/collection/array.nit:274 */ REGB1 = REGB2; } else { /* ../lib/standard/collection/array.nit:272 */ goto label1; } } label1: while(0); /* compiling/compiling_writer.nit:47 */ goto label2; label2: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[0]; }
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; }
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]; }