X-Git-Url: http://nitlanguage.org diff --git a/c_src/string_search._sep.c b/c_src/string_search._sep.c index fe1aebe..8d3bc0b 100644 --- a/c_src/string_search._sep.c +++ b/c_src/string_search._sep.c @@ -1,856 +1,1867 @@ /* This C file is generated by NIT to compile module string_search. */ #include "string_search._sep.h" -val_t string_search___Pattern___search_index_in(val_t self, val_t param0, val_t param1) { - struct trace_t trace = {NULL, NULL, 21, LOCATE_string_search___Pattern___search_index_in}; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - fprintf(stderr, "Deferred method %s called"); - fprintf(stderr, " (%s:%d)\n", LOCATE_string_search, 21); - nit_exit(1); - tracehead = trace.prev; +val_t string_search___Pattern___search_index_in(val_t p0, val_t p1, val_t p2){ + struct {struct stack_frame_t me;} fra; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 21; + fra.me.meth = LOCATE_string_search___Pattern___search_index_in; + fra.me.has_broke = 0; + fra.me.REG_size = 0; + /* ./../lib/standard//string_search.nit:21 */ + nit_abort("Deferred method called", NULL, LOCATE_string_search, 21); + stack_frame_head = fra.me.prev; return NIT_NULL; } -val_t string_search___Pattern___search_in(val_t self, val_t param0, val_t param1) { - struct trace_t trace = {NULL, NULL, 26, LOCATE_string_search___Pattern___search_in}; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - fprintf(stderr, "Deferred method %s called"); - fprintf(stderr, " (%s:%d)\n", LOCATE_string_search, 26); - nit_exit(1); - tracehead = trace.prev; +val_t string_search___Pattern___search_in(val_t p0, val_t p1, val_t p2){ + struct {struct stack_frame_t me;} fra; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 26; + fra.me.meth = LOCATE_string_search___Pattern___search_in; + fra.me.has_broke = 0; + fra.me.REG_size = 0; + /* ./../lib/standard//string_search.nit:26 */ + nit_abort("Deferred method called", NULL, LOCATE_string_search, 26); + stack_frame_head = fra.me.prev; return NIT_NULL; } -val_t string_search___Pattern___search_all_in(val_t self, val_t param0) { - struct trace_t trace = {NULL, NULL, 30, LOCATE_string_search___Pattern___search_all_in}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable2 = NEW_Array_array___Array___init(); /*new Array[Match]*/ - variable1 = variable2; - variable3 = ((string_search___Pattern___search_in_t)CALL( self,COLOR_string_search___Pattern___search_in))( self, variable0 /*s*/, TAG_Int(0)) /*Pattern::search_in*/; - variable2 = variable3; - while (true) { /*while*/ - variable3 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable2 /*match*/ == NIT_NULL /*null*/) || (( variable2 /*match*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable2 /*match*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable2 /*match*/, NIT_NULL /*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable2 /*match*/,COLOR_kernel___Object_____eqeq))( variable2 /*match*/, NIT_NULL /*null*/) /*Object::==*/))))))); - if (!UNTAG_Bool(variable3)) break; /* while*/ - ((array___AbstractArray___add_t)CALL( variable1 /*res*/,COLOR_abstract_collection___SimpleCollection___add))( variable1 /*res*/, variable2 /*match*/) /*AbstractArray::add*/; - variable3 = ((string_search___Match___after_t)CALL( variable2 /*match*/,COLOR_string_search___Match___after))( variable2 /*match*/) /*Match::after*/; - variable3 = ((string_search___Pattern___search_in_t)CALL( self,COLOR_string_search___Pattern___search_in))( self, variable0 /*s*/, variable3) /*Pattern::search_in*/; - variable2 = variable3 /*match=*/; - continue_1: while(0); - } - break_1: while(0); - variable1 = variable1 /*res*/; - goto return_label0; - return_label0: while(false); - tracehead = trace.prev; - return variable1; +val_t string_search___Pattern___search_all_in(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_string_search; + fra.me.line = 30; + fra.me.meth = LOCATE_string_search___Pattern___search_all_in; + fra.me.has_broke = 0; + fra.me.REG_size = 5; + 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; + /* ./../lib/standard//string_search.nit:33 */ + fra.me.REG[2] = NEW_Array_array___Array___init(); + /* ./../lib/standard//string_search.nit:34 */ + REGB0 = TAG_Int(0); + fra.me.REG[3] = CALL_string_search___Pattern___search_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0); + /* ./../lib/standard//string_search.nit:35 */ + while(1) { + 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(false); + REGB0 = REGB1; + } else { + REGB1 = CALL_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)) { + /* ./../lib/standard//string_search.nit:36 */ + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); + /* ./../lib/standard//string_search.nit:37 */ + REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL); + if (UNTAG_Bool(REGB0)) { + nit_abort("Reciever is null", NULL, LOCATE_string_search, 37); + } + REGB0 = CALL_string_search___Match___after(fra.me.REG[3])(fra.me.REG[3]); + fra.me.REG[4] = CALL_string_search___Pattern___search_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0); + fra.me.REG[3] = fra.me.REG[4]; + } else { + /* ./../lib/standard//string_search.nit:35 */ + goto label1; + } + } + label1: while(0); + /* ./../lib/standard//string_search.nit:39 */ + goto label2; + label2: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[2]; } -val_t string_search___Pattern___split_in(val_t self, val_t param0) { - struct trace_t trace = {NULL, NULL, 42, LOCATE_string_search___Pattern___split_in}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - val_t variable4; - val_t variable5; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable2 = NEW_Array_array___Array___init(); /*new Array[Match]*/ - variable1 = variable2; - variable2 = TAG_Int(0); - variable4 = ((string_search___Pattern___search_in_t)CALL( self,COLOR_string_search___Pattern___search_in))( self, variable0 /*s*/, TAG_Int(0)) /*Pattern::search_in*/; - variable3 = variable4; - while (true) { /*while*/ - variable4 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable3 /*match*/ == NIT_NULL /*null*/) || (( variable3 /*match*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable3 /*match*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable3 /*match*/, NIT_NULL /*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable3 /*match*/,COLOR_kernel___Object_____eqeq))( variable3 /*match*/, NIT_NULL /*null*/) /*Object::==*/))))))); - if (!UNTAG_Bool(variable4)) break; /* while*/ - variable5 = ((string_search___Match___from_t)CALL( variable3 /*match*/,COLOR_string_search___Match___from))( variable3 /*match*/) /*Match::from*/; - variable5 = TAG_Int(UNTAG_Int(variable5)-UNTAG_Int( variable2 /*i*/)); - variable4 = variable5; - variable5 = NEW_Match_string_search___Match___init( variable0 /*s*/, variable2 /*i*/, variable4 /*len*/); /*new Match*/ - ((array___AbstractArray___add_t)CALL( variable1 /*res*/,COLOR_abstract_collection___SimpleCollection___add))( variable1 /*res*/, variable5) /*AbstractArray::add*/; - variable5 = ((string_search___Match___after_t)CALL( variable3 /*match*/,COLOR_string_search___Match___after))( variable3 /*match*/) /*Match::after*/; - variable2 = variable5 /*i=*/; - variable5 = ((string_search___Pattern___search_in_t)CALL( self,COLOR_string_search___Pattern___search_in))( self, variable0 /*s*/, variable2 /*i*/) /*Pattern::search_in*/; - variable3 = variable5 /*match=*/; - continue_3: while(0); - } - break_3: while(0); - variable4 = ((array___AbstractArray___length_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Collection___length))( variable0 /*s*/) /*AbstractArray::length*/; - variable4 = TAG_Int(UNTAG_Int(variable4)-UNTAG_Int( variable2 /*i*/)); - variable5 = NEW_Match_string_search___Match___init( variable0 /*s*/, variable2 /*i*/, variable4); /*new Match*/ - variable4 = variable5; - ((array___AbstractArray___add_t)CALL( variable1 /*res*/,COLOR_abstract_collection___SimpleCollection___add))( variable1 /*res*/, variable4) /*AbstractArray::add*/; - variable1 = variable1 /*res*/; - goto return_label2; - return_label2: while(false); - tracehead = trace.prev; - return variable1; +val_t string_search___Pattern___split_in(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 REGB2; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 42; + fra.me.meth = LOCATE_string_search___Pattern___split_in; + fra.me.has_broke = 0; + fra.me.REG_size = 5; + 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; + /* ./../lib/standard//string_search.nit:45 */ + fra.me.REG[2] = NEW_Array_array___Array___init(); + /* ./../lib/standard//string_search.nit:46 */ + REGB0 = TAG_Int(0); + /* ./../lib/standard//string_search.nit:47 */ + REGB1 = TAG_Int(0); + fra.me.REG[3] = CALL_string_search___Pattern___search_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB1); + /* ./../lib/standard//string_search.nit:48 */ + while(1) { + REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); + if (UNTAG_Bool(REGB1)) { + } else { + REGB2 = TAG_Bool(fra.me.REG[3]==NIT_NULL); + if (UNTAG_Bool(REGB2)) { + REGB2 = TAG_Bool(false); + REGB1 = REGB2; + } else { + REGB2 = CALL_kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], NIT_NULL); + REGB1 = REGB2; + } + } + REGB1 = TAG_Bool(!UNTAG_Bool(REGB1)); + if (UNTAG_Bool(REGB1)) { + /* ./../lib/standard//string_search.nit:50 */ + REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); + if (UNTAG_Bool(REGB1)) { + nit_abort("Reciever is null", NULL, LOCATE_string_search, 50); + } + REGB1 = CALL_string_search___Match___from(fra.me.REG[3])(fra.me.REG[3]); + /* ./../lib/standard//kernel.nit:217 */ + REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:51 */ + fra.me.REG[4] = NEW_Match_string_search___Match___init(fra.me.REG[1], REGB0, REGB1); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); + /* ./../lib/standard//string_search.nit:52 */ + REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL); + if (UNTAG_Bool(REGB1)) { + nit_abort("Reciever is null", NULL, LOCATE_string_search, 52); + } + REGB1 = CALL_string_search___Match___after(fra.me.REG[3])(fra.me.REG[3]); + REGB0 = REGB1; + /* ./../lib/standard//string_search.nit:53 */ + fra.me.REG[4] = CALL_string_search___Pattern___search_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0); + fra.me.REG[3] = fra.me.REG[4]; + } else { + /* ./../lib/standard//string_search.nit:48 */ + goto label1; + } + } + label1: while(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:217 */ + REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:56 */ + fra.me.REG[1] = NEW_Match_string_search___Match___init(fra.me.REG[1], REGB0, REGB1); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); + /* ./../lib/standard//string_search.nit:57 */ + goto label2; + label2: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[2]; } -void string_search___Pattern___init(val_t self, int* init_table) { - struct trace_t trace = {NULL, NULL, 0, LOCATE_string_search___Pattern___init}; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - tracehead = trace.prev; +void string_search___Pattern___init(val_t p0, int* init_table){ + int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_Pattern].i; + struct {struct stack_frame_t me;} fra; + val_t tmp; + if (init_table[itpos0]) return; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 0; + fra.me.meth = LOCATE_string_search___Pattern___init; + fra.me.has_broke = 0; + fra.me.REG_size = 0; + stack_frame_head = fra.me.prev; + init_table[itpos0] = 1; return; } -val_t string_search___BM_Pattern___to_s(val_t self) { - struct trace_t trace = {NULL, NULL, 67, LOCATE_string_search___BM_Pattern___to_s}; - val_t variable0; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = ATTR_string_search___BM_Pattern____motif( self) /*BM_Pattern::_motif*/; - goto return_label4; - return_label4: while(false); - tracehead = trace.prev; - return variable0; +val_t string_search___BM_Pattern___to_s(val_t p0){ + struct {struct stack_frame_t me;} fra; + val_t REGB0; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 67; + fra.me.meth = LOCATE_string_search___BM_Pattern___to_s; + fra.me.has_broke = 0; + fra.me.REG_size = 1; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:67 */ + REGB0 = TAG_Bool(ATTR_string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_motif", LOCATE_string_search, 67); + } + fra.me.REG[0] = ATTR_string_search___BM_Pattern____motif(fra.me.REG[0]); + goto label1; + label1: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[0]; } -val_t string_search___BM_Pattern___search_index_in(val_t self, val_t param0, val_t param1) { - struct trace_t trace = {NULL, NULL, 69, LOCATE_string_search___BM_Pattern___search_index_in}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - val_t variable4; - val_t variable5; - val_t variable6; - val_t variable7; - val_t variable8; - val_t variable9; - val_t variable10; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable1 = param1; - variable2 = TAG_Bool(UNTAG_Int( variable1 /*from*/)>=UNTAG_Int( TAG_Int(0))); - if (!UNTAG_Bool(variable2)) { fprintf(stderr, "Assert%s failed", ""); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_string_search___BM_Pattern___search_index_in, LOCATE_string_search, 72); nit_exit(1);} - variable3 = ((array___AbstractArray___length_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Collection___length))( variable0 /*s*/) /*AbstractArray::length*/; - variable2 = variable3; - variable4 = ATTR_string_search___BM_Pattern____length( self) /*BM_Pattern::_length*/; - variable3 = variable4; - variable4 = variable1 /*from*/; - while (true) { /*while*/ - variable5 = TAG_Int(UNTAG_Int( variable2 /*n*/)-UNTAG_Int( variable3 /*m*/)); - variable5 = TAG_Int(UNTAG_Int(variable5)+UNTAG_Int( TAG_Int(1))); - variable5 = TAG_Bool(UNTAG_Int( variable4 /*j*/)=UNTAG_Int( TAG_Int(0))); - variable7 = variable6; - if (UNTAG_Bool(variable7)) { /* and */ - variable7 = ATTR_string_search___BM_Pattern____motif( self) /*BM_Pattern::_motif*/; - variable7 = ((string___String_____bra_t)CALL(variable7,COLOR_abstract_collection___Map_____bra))(variable7, variable5 /*i*/) /*String::[]*/; - variable8 = TAG_Int(UNTAG_Int( variable5 /*i*/)+UNTAG_Int( variable4 /*j*/)); - variable8 = ((string___String_____bra_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Map_____bra))( variable0 /*s*/, variable8) /*String::[]*/; - variable7 = TAG_Bool((variable7)==(variable8)); - } - variable6 = variable7; - if (!UNTAG_Bool(variable6)) break; /* while*/ - variable5 = TAG_Int(UNTAG_Int(variable5)-UNTAG_Int( TAG_Int(1))) /*i*/; - continue_7: while(0); - } - break_7: while(0); - variable6 = TAG_Bool(UNTAG_Int( variable5 /*i*/)=UNTAG_Int( TAG_Int(0))); - variable10 = variable9; - if (UNTAG_Bool(variable10)) { /* and */ - variable10 = variable7; - variable10 = ATTR_array___AbstractArray____length(variable10) /*AbstractArray::_length*/; - variable10 = TAG_Bool(UNTAG_Int( variable8 /*index*/)=UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:72 */ + if (UNTAG_Bool(REGB1)) { + } else { + nit_abort("Assert failed", NULL, LOCATE_string_search, 72); + } + /* ./../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//string_search.nit:74 */ + REGB2 = TAG_Bool(ATTR_string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB2)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_string_search, 74); + } + REGB2 = ATTR_string_search___BM_Pattern____length(fra.me.REG[0]); + /* ./../lib/standard//string_search.nit:77 */ + while(1) { + /* ./../lib/standard//kernel.nit:217 */ + REGB3 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:77 */ + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB4)); + /* ./../lib/standard//kernel.nit:212 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB0)=UNTAG_Int(REGB3)); + /* ./../lib/standard//string_search.nit:79 */ + if (UNTAG_Bool(REGB3)) { + REGB3 = TAG_Bool(ATTR_string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB3)) { + } else { + nit_abort("Uninitialized attribute %s", "_motif", LOCATE_string_search, 79); + } + fra.me.REG[2] = ATTR_string_search___BM_Pattern____motif(fra.me.REG[0]); + REGB3 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB4); + /* ./../lib/standard//kernel.nit:215 */ + REGB5 = TAG_Int(UNTAG_Int(REGB4)+UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:79 */ + REGB5 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB5); + REGB6 = TAG_Bool(IS_EQUAL_OO(REGB3,REGB5)); + if (UNTAG_Bool(REGB6)) { + } else { + /* ./../lib/standard//kernel.nit:347 */ + REGB5 = TAG_Bool((REGB3)==(REGB5)); + /* ./../lib/standard//string_search.nit:79 */ + REGB6 = REGB5; + } + } else { + REGB5 = TAG_Bool(false); + REGB6 = REGB5; + } + if (UNTAG_Bool(REGB6)) { + REGB6 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB6 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB6)); + /* ./../lib/standard//string_search.nit:79 */ + REGB4 = REGB6; + } else { + goto label1; + } } - variable9 = variable10; - if (!UNTAG_Bool(variable9)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_string_search, 229); nit_exit(1);} - variable9 = variable7; - variable9 = ATTR_array___Array____items(variable9) /*Array::_items*/; - variable9 = UNBOX_NativeArray(variable9)[UNTAG_Int( variable8 /*index*/)]; - goto return_label8; - return_label8: while(false); - variable7 = variable9; - variable6 = variable7; - variable8 = TAG_Int(UNTAG_Int( variable5 /*i*/)+UNTAG_Int( variable4 /*j*/)); - variable8 = ((string___String_____bra_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Map_____bra))( variable0 /*s*/, variable8) /*String::[]*/; - variable8 = ((string_search___BM_Pattern___bc_t)CALL( self,COLOR_string_search___BM_Pattern___bc))( self, variable8) /*BM_Pattern::bc*/; - variable8 = TAG_Int(UNTAG_Int(variable8)-UNTAG_Int( variable3 /*m*/)); - variable8 = TAG_Int(UNTAG_Int(variable8)+UNTAG_Int( TAG_Int(1))); - variable8 = TAG_Int(UNTAG_Int(variable8)+UNTAG_Int( variable5 /*i*/)); - variable7 = variable8; - variable8 = TAG_Bool(UNTAG_Int( variable6 /*gs*/)>UNTAG_Int( variable7 /*bc*/)); - if (UNTAG_Bool(variable8)) { /*if*/ - variable4 = TAG_Int(UNTAG_Int(variable4)+UNTAG_Int( variable6 /*gs*/)) /*j*/; - } else { /*if*/ - variable4 = TAG_Int(UNTAG_Int(variable4)+UNTAG_Int( variable7 /*bc*/)) /*j*/; + label1: while(0); + /* ./../lib/standard//string_search.nit:80 */ + REGB6 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:212 */ + REGB6 = TAG_Bool(UNTAG_Int(REGB4)=UNTAG_Int(REGB3)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB3)) { + REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL); + if (UNTAG_Bool(REGB3)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); + } + REGB3 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]); + /* ./../lib/standard//kernel.nit:212 */ + REGB3 = TAG_Bool(UNTAG_Int(REGB5)val[UNTAG_Int(REGB5)]; + /* ./../lib/standard//collection//array.nit:246 */ + goto label3; + label3: while(0); + /* ./../lib/standard//string_search.nit:83 */ + REGB5 = fra.me.REG[2]; + /* ./../lib/standard//kernel.nit:215 */ + REGB3 = TAG_Int(UNTAG_Int(REGB4)+UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:84 */ + REGB3 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB3); + REGB3 = CALL_string_search___BM_Pattern___bc(fra.me.REG[0])(fra.me.REG[0], REGB3); + /* ./../lib/standard//kernel.nit:217 */ + REGB3 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:84 */ + REGB7 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB7 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB7)); + REGB4 = TAG_Int(UNTAG_Int(REGB7)+UNTAG_Int(REGB4)); + /* ./../lib/standard//kernel.nit:214 */ + REGB7 = TAG_Bool(UNTAG_Int(REGB5)>UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:86 */ + if (UNTAG_Bool(REGB7)) { + /* ./../lib/standard//kernel.nit:215 */ + REGB5 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB5)); + /* ./../lib/standard//string_search.nit:87 */ + REGB0 = REGB5; + } else { + /* ./../lib/standard//kernel.nit:215 */ + REGB4 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:89 */ + REGB0 = REGB4; + } } + } else { + /* ./../lib/standard//string_search.nit:77 */ + goto label4; } - continue_6: while(0); - } - break_6: while(0); - variable5 = TAG_Int(-UNTAG_Int( TAG_Int(1))); - variable2 = variable5; - goto return_label5; - return_label5: while(false); - tracehead = trace.prev; - return variable2; + } + label4: while(0); + /* ./../lib/standard//string_search.nit:93 */ + REGB0 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:216 */ + REGB0 = TAG_Int(-UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:93 */ + REGB6 = REGB0; + goto label2; + label2: while(0); + stack_frame_head = fra.me.prev; + return REGB6; } -val_t string_search___BM_Pattern___search_in(val_t self, val_t param0, val_t param1) { - struct trace_t trace = {NULL, NULL, 96, LOCATE_string_search___BM_Pattern___search_in}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - val_t variable4; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable1 = param1; - variable3 = ((string_search___BM_Pattern___search_index_in_t)CALL( self,COLOR_string_search___Pattern___search_index_in))( self, variable0 /*s*/, variable1 /*from*/) /*BM_Pattern::search_index_in*/; - variable2 = variable3; - variable3 = TAG_Bool(UNTAG_Int( variable2 /*to*/)vft[INIT_TABLE_POS_BM_Pattern].i]) return; - ATTR_string_search___BM_Pattern____motif( self) /*BM_Pattern::_motif*/ = variable0 /*motif*/; - variable1 = ((array___AbstractArray___length_t)CALL( variable0 /*motif*/,COLOR_abstract_collection___Collection___length))( variable0 /*motif*/) /*AbstractArray::length*/; - ATTR_string_search___BM_Pattern____length( self) /*BM_Pattern::_length*/ = variable1; - variable1 = ATTR_string_search___BM_Pattern____length( self) /*BM_Pattern::_length*/; - variable2 = NEW_Array_array___Array___with_capacity(variable1); /*new Array[Int]*/ - variable1 = variable2; - ATTR_string_search___BM_Pattern____gs( self) /*BM_Pattern::_gs*/ = variable1; - variable1 = NEW_ArrayMap_array___ArrayMap___init(); /*new ArrayMap[Char, Int]*/ - ATTR_string_search___BM_Pattern____bc_table( self) /*BM_Pattern::_bc_table*/ = variable1; - ((string_search___BM_Pattern___compute_gs_t)CALL( self,COLOR_string_search___BM_Pattern___compute_gs))( self) /*BM_Pattern::compute_gs*/; - ((string_search___BM_Pattern___compute_bc_t)CALL( self,COLOR_string_search___BM_Pattern___compute_bc))( self) /*BM_Pattern::compute_bc*/; - init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_BM_Pattern].i] = 1; - tracehead = trace.prev; +void string_search___BM_Pattern___init(val_t p0, val_t p1, int* init_table){ + int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_BM_Pattern].i; + struct {struct stack_frame_t me; val_t MORE_REG[2];} fra; + val_t REGB0; + val_t tmp; + if (init_table[itpos1]) return; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 107; + fra.me.meth = LOCATE_string_search___BM_Pattern___init; + fra.me.has_broke = 0; + fra.me.REG_size = 3; + 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//string_search.nit:107 */ + fra.me.REG[2] = fra.me.REG[0]; + CALL_string_search___Pattern___init(fra.me.REG[0])(fra.me.REG[0], init_table); + /* ./../lib/standard//string_search.nit:110 */ + ATTR_string_search___BM_Pattern____motif(fra.me.REG[2]) = 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]); + /* ./../lib/standard//string_search.nit:111 */ + ATTR_string_search___BM_Pattern____length(fra.me.REG[2]) = REGB0; + /* ./../lib/standard//string_search.nit:112 */ + REGB0 = TAG_Bool(ATTR_string_search___BM_Pattern____length(fra.me.REG[2])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_string_search, 112); + } + REGB0 = ATTR_string_search___BM_Pattern____length(fra.me.REG[2]); + fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0); + ATTR_string_search___BM_Pattern____gs(fra.me.REG[2]) = fra.me.REG[1]; + /* ./../lib/standard//string_search.nit:113 */ + fra.me.REG[1] = NEW_ArrayMap_array___ArrayMap___init(); + ATTR_string_search___BM_Pattern____bc_table(fra.me.REG[2]) = fra.me.REG[1]; + /* ./../lib/standard//string_search.nit:114 */ + CALL_string_search___BM_Pattern___compute_gs(fra.me.REG[2])(fra.me.REG[2]); + /* ./../lib/standard//string_search.nit:115 */ + CALL_string_search___BM_Pattern___compute_bc(fra.me.REG[2])(fra.me.REG[2]); + stack_frame_head = fra.me.prev; + init_table[itpos1] = 1; return; } -val_t string_search___BM_Pattern___bc(val_t self, val_t param0) { - struct trace_t trace = {NULL, NULL, 124, LOCATE_string_search___BM_Pattern___bc}; - val_t variable0; - val_t variable1; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable1 = ATTR_string_search___BM_Pattern____bc_table( self) /*BM_Pattern::_bc_table*/; - variable1 = ((abstract_collection___Map___has_key_t)CALL(variable1,COLOR_abstract_collection___Map___has_key))(variable1, variable0 /*e*/) /*Map::has_key*/; - if (UNTAG_Bool(variable1)) { /*if*/ - variable1 = ATTR_string_search___BM_Pattern____bc_table( self) /*BM_Pattern::_bc_table*/; - variable1 = ((abstract_collection___Map_____bra_t)CALL(variable1,COLOR_abstract_collection___Map_____bra))(variable1, variable0 /*e*/) /*Map::[]*/; - goto return_label11; - } else { /*if*/ - variable1 = ATTR_string_search___BM_Pattern____length( self) /*BM_Pattern::_length*/; - goto return_label11; - } - return_label11: while(false); - tracehead = trace.prev; - return variable1; -} -void string_search___BM_Pattern___compute_bc(val_t self) { - struct trace_t trace = {NULL, NULL, 139, LOCATE_string_search___BM_Pattern___compute_bc}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - val_t variable4; - val_t variable5; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable1 = ATTR_string_search___BM_Pattern____motif( self) /*BM_Pattern::_motif*/; - variable0 = variable1; - variable2 = ATTR_string_search___BM_Pattern____length( self) /*BM_Pattern::_length*/; - variable1 = variable2; - variable2 = TAG_Int(0); - while (true) { /*while*/ - variable3 = TAG_Int(UNTAG_Int( variable1 /*m*/)-UNTAG_Int( TAG_Int(1))); - variable3 = TAG_Bool(UNTAG_Int( variable2 /*i*/)=UNTAG_Int( TAG_Int(0))); - if (!UNTAG_Bool(variable6)) break; /* while*/ - variable6 = TAG_Bool(UNTAG_Int( variable5 /*i*/)>UNTAG_Int( variable4 /*g*/)); - variable7 = variable6; - if (UNTAG_Bool(variable7)) { /* and */ - variable7 = TAG_Int(UNTAG_Int( variable5 /*i*/)+UNTAG_Int( variable1 /*m*/)); - variable7 = TAG_Int(UNTAG_Int(variable7)-UNTAG_Int( TAG_Int(1))); - variable7 = TAG_Int(UNTAG_Int(variable7)-UNTAG_Int( variable3 /*f*/)); - variable8 = variable7; - variable9 = TAG_Bool(UNTAG_Int( variable8 /*index*/)>=UNTAG_Int( TAG_Int(0))); - variable10 = variable9; - if (UNTAG_Bool(variable10)) { /* and */ - variable10 = ATTR_array___AbstractArray____length( variable2 /*suff*/) /*AbstractArray::_length*/; - variable10 = TAG_Bool(UNTAG_Int( variable8 /*index*/)=UNTAG_Int( TAG_Int(0))); - variable9 = variable8; - if (UNTAG_Bool(variable9)) { /* and */ - variable9 = ATTR_array___AbstractArray____length( variable2 /*suff*/) /*AbstractArray::_length*/; - variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)=UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:159 */ + if (UNTAG_Bool(REGB4)) { + /* ./../lib/standard//kernel.nit:214 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB3)>UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:160 */ + if (UNTAG_Bool(REGB4)) { + /* ./../lib/standard//kernel.nit:215 */ + REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:160 */ + REGB5 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB5 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB5)); + REGB5 = TAG_Int(UNTAG_Int(REGB5)-UNTAG_Int(REGB1)); + /* ./../lib/standard//collection//array.nit:243 */ + fra.me.REG[2] = fra.me.REG[0]; + /* ./../lib/standard//collection//array.nit:245 */ + REGB4 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB5)>=UNTAG_Int(REGB4)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB4)) { + REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL); + if (UNTAG_Bool(REGB4)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); + } + REGB4 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]); + /* ./../lib/standard//kernel.nit:212 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB5)val[UNTAG_Int(REGB5)]; + /* ./../lib/standard//collection//array.nit:246 */ + goto label1; + label1: while(0); + /* ./../lib/standard//kernel.nit:217 */ + REGB5 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:160 */ + REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL); + if (UNTAG_Bool(REGB4)) { + nit_abort("Reciever is null", NULL, LOCATE_string_search, 160); + } + /* ./../lib/standard//kernel.nit:212 */ + REGB5 = TAG_Bool(UNTAG_Int(fra.me.REG[2])=UNTAG_Int( TAG_Int(0))); - variable7 = variable6; - if (UNTAG_Bool(variable7)) { /* and */ - variable7 = ((string___String_____bra_t)CALL( variable0 /*x*/,COLOR_abstract_collection___Map_____bra))( variable0 /*x*/, variable4 /*g*/) /*String::[]*/; - variable8 = TAG_Int(UNTAG_Int( variable4 /*g*/)+UNTAG_Int( variable1 /*m*/)); - variable8 = TAG_Int(UNTAG_Int(variable8)-UNTAG_Int( TAG_Int(1))); - variable8 = TAG_Int(UNTAG_Int(variable8)-UNTAG_Int( variable3 /*f*/)); - variable8 = ((string___String_____bra_t)CALL( variable0 /*x*/,COLOR_abstract_collection___Map_____bra))( variable0 /*x*/, variable8) /*String::[]*/; - variable7 = TAG_Bool((variable7)==(variable8)); + if (UNTAG_Bool(REGB5)) { + /* ./../lib/standard//kernel.nit:215 */ + REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:161 */ + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB4 = TAG_Int(UNTAG_Int(REGB5)-UNTAG_Int(REGB4)); + REGB4 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB1)); + /* ./../lib/standard//collection//array.nit:243 */ + fra.me.REG[2] = fra.me.REG[0]; + /* ./../lib/standard//collection//array.nit:245 */ + REGB5 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL); + if (UNTAG_Bool(REGB5)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); + } + REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]); + /* ./../lib/standard//kernel.nit:212 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB4)val[UNTAG_Int(REGB4)]; + /* ./../lib/standard//collection//array.nit:246 */ + goto label2; + label2: while(0); + /* ./../lib/standard//string_search.nit:161 */ + CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, fra.me.REG[2]); + } else { + /* ./../lib/standard//kernel.nit:212 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB3)=UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:165 */ + if (UNTAG_Bool(REGB4)) { + REGB4 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB2); + /* ./../lib/standard//kernel.nit:215 */ + REGB5 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:165 */ + REGB6 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB6 = TAG_Int(UNTAG_Int(REGB5)-UNTAG_Int(REGB6)); + REGB6 = TAG_Int(UNTAG_Int(REGB6)-UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:165 */ + REGB6 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB6); + REGB5 = TAG_Bool(IS_EQUAL_OO(REGB4,REGB6)); + if (UNTAG_Bool(REGB5)) { + } else { + /* ./../lib/standard//kernel.nit:347 */ + REGB6 = TAG_Bool((REGB4)==(REGB6)); + /* ./../lib/standard//string_search.nit:165 */ + REGB5 = REGB6; + } + } else { + REGB6 = TAG_Bool(false); + REGB5 = REGB6; + } + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB5 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB5)); + /* ./../lib/standard//string_search.nit:165 */ + REGB2 = REGB5; + } else { + goto label3; + } + } + label3: while(0); + /* ./../lib/standard//kernel.nit:217 */ + REGB5 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:166 */ + CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, REGB5); } - break_18: while(0); - variable6 = TAG_Int(UNTAG_Int( variable3 /*f*/)-UNTAG_Int( variable4 /*g*/)); - ((array___Array_____braeq_t)CALL( variable2 /*suff*/,COLOR_abstract_collection___Map_____braeq))( variable2 /*suff*/, variable5 /*i*/, variable6) /*Array::[]=*/; + /* ./../lib/standard//string_search.nit:168 */ + REGB5 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB5 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB5)); + /* ./../lib/standard//string_search.nit:168 */ + REGB3 = REGB5; + } else { + /* ./../lib/standard//string_search.nit:159 */ + goto label4; } - variable5 = TAG_Int(UNTAG_Int(variable5)-UNTAG_Int( TAG_Int(1))) /*i*/; - continue_15: while(0); - } - break_15: while(0); - variable0 = variable2 /*suff*/; - goto return_label14; - return_label14: while(false); - tracehead = trace.prev; - return variable0; + } + label4: while(0); + /* ./../lib/standard//string_search.nit:170 */ + goto label5; + label5: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[0]; } -void string_search___BM_Pattern___compute_gs(val_t self) { - struct trace_t trace = {NULL, NULL, 173, LOCATE_string_search___BM_Pattern___compute_gs}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - val_t variable4; - val_t variable5; - val_t variable6; - val_t variable7; - val_t variable8; - val_t variable9; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable1 = ATTR_string_search___BM_Pattern____motif( self) /*BM_Pattern::_motif*/; - variable0 = variable1; - variable2 = ATTR_string_search___BM_Pattern____length( self) /*BM_Pattern::_length*/; - variable1 = variable2; - variable3 = ((string_search___BM_Pattern___suffixes_t)CALL( self,COLOR_string_search___BM_Pattern___suffixes))( self) /*BM_Pattern::suffixes*/; - variable2 = variable3; - variable3 = TAG_Int(0); - while (true) { /*while*/ - variable4 = TAG_Bool(UNTAG_Int( variable3 /*i*/)=UNTAG_Int(variable5)); - if (!UNTAG_Bool(variable5)) break; /* while*/ - variable5 = TAG_Int(-UNTAG_Int( TAG_Int(1))); - variable5 = TAG_Bool(( variable3 /*i*/)==(variable5)); - variable6 = variable5; - if (!UNTAG_Bool(variable6)) { /* or */ - variable6 = variable3 /*i*/; - variable7 = TAG_Bool(UNTAG_Int( variable6 /*index*/)>=UNTAG_Int( TAG_Int(0))); - variable8 = variable7; - if (UNTAG_Bool(variable8)) { /* and */ - variable8 = ATTR_array___AbstractArray____length( variable2 /*suff*/) /*AbstractArray::_length*/; - variable8 = TAG_Bool(UNTAG_Int( variable6 /*index*/)=UNTAG_Int( TAG_Int(0))); - variable8 = variable7; - if (UNTAG_Bool(variable8)) { /* and */ - variable8 = variable5; - variable8 = ATTR_array___AbstractArray____length(variable8) /*AbstractArray::_length*/; - variable8 = TAG_Bool(UNTAG_Int( variable6 /*index*/)=UNTAG_Int(REGB3)); + /* ./../lib/standard//string_search.nit:185 */ + if (UNTAG_Bool(REGB3)) { + /* ./../lib/standard//string_search.nit:186 */ + REGB3 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:216 */ + REGB3 = TAG_Int(-UNTAG_Int(REGB3)); + /* ./../lib/standard//string_search.nit:186 */ + REGB4 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB3)); + if (UNTAG_Bool(REGB4)) { + } else { + /* ./../lib/standard//kernel.nit:207 */ + REGB3 = TAG_Bool((REGB1)==(REGB3)); + /* ./../lib/standard//string_search.nit:186 */ + REGB4 = REGB3; + } + if (UNTAG_Bool(REGB4)) { + REGB4 = TAG_Bool(true); + } else { + /* ./../lib/standard//collection//array.nit:243 */ + fra.me.REG[2] = fra.me.REG[1]; + REGB3 = REGB1; + /* ./../lib/standard//collection//array.nit:245 */ + REGB5 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB5)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL); + if (UNTAG_Bool(REGB5)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); + } + REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]); + /* ./../lib/standard//kernel.nit:212 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB3)val[UNTAG_Int(REGB3)]; + /* ./../lib/standard//collection//array.nit:246 */ + goto label2; + label2: while(0); + /* ./../lib/standard//string_search.nit:186 */ + REGB3 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3)); + /* ./../lib/standard//string_search.nit:186 */ + REGB5 = TAG_Bool(IS_EQUAL_ON(REGB3,fra.me.REG[2])); + if (UNTAG_Bool(REGB5)) { + } else { + REGB6 = TAG_Bool(fra.me.REG[2]==NIT_NULL); + if (UNTAG_Bool(REGB6)) { + REGB6 = TAG_Bool(false); + REGB5 = REGB6; + } else { + /* ./../lib/standard//kernel.nit:207 */ + REGB3 = TAG_Bool((fra.me.REG[2])==(REGB3)); + /* ./../lib/standard//string_search.nit:186 */ + REGB5 = REGB3; + } + } + REGB4 = REGB5; + } + if (UNTAG_Bool(REGB4)) { + /* ./../lib/standard//string_search.nit:187 */ + while(1) { + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB4 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB4)); + REGB4 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB1)); + /* ./../lib/standard//kernel.nit:212 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB2)=UNTAG_Int(REGB5)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL); + if (UNTAG_Bool(REGB5)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); + } + REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]); + /* ./../lib/standard//kernel.nit:212 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB4)val[UNTAG_Int(REGB4)]; + /* ./../lib/standard//collection//array.nit:246 */ + goto label3; + label3: while(0); + /* ./../lib/standard//string_search.nit:188 */ + REGB4 = TAG_Bool(IS_EQUAL_ON(REGB0,fra.me.REG[2])); + if (UNTAG_Bool(REGB4)) { + } else { + REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL); + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Bool(false); + REGB4 = REGB5; + } else { + /* ./../lib/standard//kernel.nit:207 */ + REGB5 = TAG_Bool((fra.me.REG[2])==(REGB0)); + /* ./../lib/standard//string_search.nit:188 */ + REGB4 = REGB5; + } + } + if (UNTAG_Bool(REGB4)) { + REGB4 = TAG_Bool(ATTR_string_search___BM_Pattern____gs(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB4)) { + } else { + nit_abort("Uninitialized attribute %s", "_gs", LOCATE_string_search, 188); + } + fra.me.REG[2] = ATTR_string_search___BM_Pattern____gs(fra.me.REG[0]); + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB4 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB4)); + REGB4 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:188 */ + CALL_abstract_collection___Map_____braeq(fra.me.REG[2])(fra.me.REG[2], REGB2, REGB4); + } + /* ./../lib/standard//string_search.nit:189 */ + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB4 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:189 */ + REGB2 = REGB4; + } else { + /* ./../lib/standard//string_search.nit:187 */ + goto label4; + } + } + label4: while(0); } - break_23: while(0); + /* ./../lib/standard//string_search.nit:192 */ + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB4 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:192 */ + REGB1 = REGB4; + } else { + /* ./../lib/standard//string_search.nit:185 */ + goto label5; } - variable3 = TAG_Int(UNTAG_Int(variable3)-UNTAG_Int( TAG_Int(1))) /*i*/; - continue_21: while(0); - } - break_21: while(0); - variable3 = TAG_Int(0) /*i=*/; - while (true) { /*while*/ - variable5 = TAG_Int(UNTAG_Int( variable1 /*m*/)-UNTAG_Int( TAG_Int(1))); - variable5 = TAG_Bool(UNTAG_Int( variable3 /*i*/)=UNTAG_Int( TAG_Int(0))); - variable9 = variable8; - if (UNTAG_Bool(variable9)) { /* and */ - variable9 = ATTR_array___AbstractArray____length( variable2 /*suff*/) /*AbstractArray::_length*/; - variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)=UNTAG_Int(REGB5)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL); + if (UNTAG_Bool(REGB5)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); + } + REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[3]); + /* ./../lib/standard//kernel.nit:212 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB4)val[UNTAG_Int(REGB4)]; + /* ./../lib/standard//collection//array.nit:246 */ + goto label6; + label6: while(0); + /* ./../lib/standard//kernel.nit:217 */ + REGB2 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(fra.me.REG[3])); + /* ./../lib/standard//string_search.nit:196 */ + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB4 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB4)); + REGB4 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:196 */ + CALL_abstract_collection___Map_____braeq(fra.me.REG[2])(fra.me.REG[2], REGB2, REGB4); + /* ./../lib/standard//string_search.nit:197 */ + REGB4 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB4 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB4)); + /* ./../lib/standard//string_search.nit:197 */ + REGB1 = REGB4; + } else { + /* ./../lib/standard//string_search.nit:195 */ + goto label7; } - variable8 = variable9; - if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_string_search, 229); nit_exit(1);} - variable8 = ATTR_array___Array____items( variable2 /*suff*/) /*Array::_items*/; - variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)]; - goto return_label26; - return_label26: while(false); - variable7 = variable8; - variable6 = TAG_Int(UNTAG_Int(variable6)-UNTAG_Int(variable7)); - variable7 = TAG_Int(UNTAG_Int( variable1 /*m*/)-UNTAG_Int( TAG_Int(1))); - variable7 = TAG_Int(UNTAG_Int(variable7)-UNTAG_Int( variable3 /*i*/)); - ((array___Array_____braeq_t)CALL(variable5,COLOR_abstract_collection___Map_____braeq))(variable5, variable6, variable7) /*Array::[]=*/; - variable3 = TAG_Int(UNTAG_Int(variable3)+UNTAG_Int( TAG_Int(1))) /*i*/; - continue_25: while(0); - } - break_25: while(0); - tracehead = trace.prev; + } + label7: while(0); + stack_frame_head = fra.me.prev; return; } -val_t string_search___Match___string(val_t self) { - struct trace_t trace = {NULL, NULL, 204, LOCATE_string_search___Match___string}; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - tracehead = trace.prev; - return ATTR_string_search___Match____string( self) /*Match::_string*/; +val_t string_search___Match___string(val_t p0){ + struct {struct stack_frame_t me;} fra; + val_t REGB0; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 204; + fra.me.meth = LOCATE_string_search___Match___string; + fra.me.has_broke = 0; + fra.me.REG_size = 1; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:204 */ + REGB0 = TAG_Bool(ATTR_string_search___Match____string(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_string", LOCATE_string_search, 204); + } + fra.me.REG[0] = ATTR_string_search___Match____string(fra.me.REG[0]); + stack_frame_head = fra.me.prev; + return fra.me.REG[0]; } -val_t string_search___Match___from(val_t self) { - struct trace_t trace = {NULL, NULL, 207, LOCATE_string_search___Match___from}; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - tracehead = trace.prev; - return ATTR_string_search___Match____from( self) /*Match::_from*/; +val_t string_search___Match___from(val_t p0){ + struct {struct stack_frame_t me;} fra; + val_t REGB0; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 207; + fra.me.meth = LOCATE_string_search___Match___from; + fra.me.has_broke = 0; + fra.me.REG_size = 1; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:207 */ + REGB0 = TAG_Bool(ATTR_string_search___Match____from(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_from", LOCATE_string_search, 207); + } + REGB0 = ATTR_string_search___Match____from(fra.me.REG[0]); + stack_frame_head = fra.me.prev; + return REGB0; } -val_t string_search___Match___length(val_t self) { - struct trace_t trace = {NULL, NULL, 210, LOCATE_string_search___Match___length}; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - tracehead = trace.prev; - return ATTR_string_search___Match____length( self) /*Match::_length*/; +val_t string_search___Match___length(val_t p0){ + struct {struct stack_frame_t me;} fra; + val_t REGB0; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 210; + fra.me.meth = LOCATE_string_search___Match___length; + fra.me.has_broke = 0; + fra.me.REG_size = 1; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:210 */ + REGB0 = TAG_Bool(ATTR_string_search___Match____length(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_string_search, 210); + } + REGB0 = ATTR_string_search___Match____length(fra.me.REG[0]); + stack_frame_head = fra.me.prev; + return REGB0; } -val_t string_search___Match___after(val_t self) { - struct trace_t trace = {NULL, NULL, 213, LOCATE_string_search___Match___after}; - val_t variable0; - val_t variable1; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = ATTR_string_search___Match____from( self) /*Match::_from*/; - variable1 = ATTR_string_search___Match____length( self) /*Match::_length*/; - variable0 = TAG_Int(UNTAG_Int(variable0)+UNTAG_Int(variable1)); - goto return_label27; - return_label27: while(false); - tracehead = trace.prev; - return variable0; +val_t string_search___Match___after(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_string_search; + fra.me.line = 213; + fra.me.meth = LOCATE_string_search___Match___after; + fra.me.has_broke = 0; + fra.me.REG_size = 1; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:215 */ + REGB0 = TAG_Bool(ATTR_string_search___Match____from(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_from", LOCATE_string_search, 215); + } + REGB0 = ATTR_string_search___Match____from(fra.me.REG[0]); + REGB1 = TAG_Bool(ATTR_string_search___Match____length(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB1)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_string_search, 215); + } + REGB1 = ATTR_string_search___Match____length(fra.me.REG[0]); + /* ./../lib/standard//kernel.nit:215 */ + REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:215 */ + goto label1; + label1: while(0); + stack_frame_head = fra.me.prev; + return REGB1; } -val_t string_search___Match___to_s(val_t self) { - struct trace_t trace = {NULL, NULL, 217, LOCATE_string_search___Match___to_s}; - val_t variable0; - val_t variable1; - val_t variable2; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = ATTR_string_search___Match____string( self) /*Match::_string*/; - variable1 = ATTR_string_search___Match____from( self) /*Match::_from*/; - variable2 = ATTR_string_search___Match____length( self) /*Match::_length*/; - variable0 = ((string___String___substring_t)CALL(variable0,COLOR_string___String___substring))(variable0, variable1, variable2) /*String::substring*/; - goto return_label28; - return_label28: while(false); - tracehead = trace.prev; - return variable0; +val_t string_search___Match___to_s(val_t p0){ + 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_string_search; + fra.me.line = 217; + fra.me.meth = LOCATE_string_search___Match___to_s; + fra.me.has_broke = 0; + fra.me.REG_size = 2; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[1] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:218 */ + REGB0 = TAG_Bool(ATTR_string_search___Match____string(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_string", LOCATE_string_search, 218); + } + fra.me.REG[1] = ATTR_string_search___Match____string(fra.me.REG[0]); + REGB0 = TAG_Bool(ATTR_string_search___Match____from(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB0)) { + } else { + nit_abort("Uninitialized attribute %s", "_from", LOCATE_string_search, 218); + } + REGB0 = ATTR_string_search___Match____from(fra.me.REG[0]); + REGB1 = TAG_Bool(ATTR_string_search___Match____length(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB1)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_string_search, 218); + } + REGB1 = ATTR_string_search___Match____length(fra.me.REG[0]); + fra.me.REG[1] = CALL_string___AbstractString___substring(fra.me.REG[1])(fra.me.REG[1], REGB0, REGB1); + goto label1; + label1: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[1]; } -void string_search___Match___init(val_t self, val_t param0, val_t param1, val_t param2, int* init_table) { - struct trace_t trace = {NULL, NULL, 220, LOCATE_string_search___Match___init}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - val_t variable4; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable1 = param1; - variable2 = param2; - if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Match].i]) return; - variable3 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable0 /*s*/ == NIT_NULL /*null*/) || (( variable0 /*s*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable0 /*s*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable0 /*s*/, NIT_NULL /*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable0 /*s*/,COLOR_kernel___Object_____eqeq))( variable0 /*s*/, NIT_NULL /*null*/) /*Object::==*/))))))); - if (!UNTAG_Bool(variable3)) { fprintf(stderr, "Assert%s failed", " 'non_null_string' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_string_search___Match___init, LOCATE_string_search, 223); nit_exit(1);} - variable3 = TAG_Bool(UNTAG_Int( variable2 /*len*/)>=UNTAG_Int( TAG_Int(0))); - if (!UNTAG_Bool(variable3)) { fprintf(stderr, "Assert%s failed", " 'positive_length' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_string_search___Match___init, LOCATE_string_search, 224); nit_exit(1);} - variable3 = TAG_Bool(UNTAG_Int( variable1 /*f*/)>=UNTAG_Int( TAG_Int(0))); - if (!UNTAG_Bool(variable3)) { fprintf(stderr, "Assert%s failed", " 'valid_from' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_string_search___Match___init, LOCATE_string_search, 225); nit_exit(1);} - variable3 = TAG_Int(UNTAG_Int( variable1 /*f*/)+UNTAG_Int( variable2 /*len*/)); - variable4 = ((array___AbstractArray___length_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Collection___length))( variable0 /*s*/) /*AbstractArray::length*/; - variable3 = TAG_Bool(UNTAG_Int(variable3)<=UNTAG_Int(variable4)); - if (!UNTAG_Bool(variable3)) { fprintf(stderr, "Assert%s failed", " 'valid_after' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_string_search___Match___init, LOCATE_string_search, 226); nit_exit(1);} - ATTR_string_search___Match____string( self) /*Match::_string*/ = variable0 /*s*/; - ATTR_string_search___Match____from( self) /*Match::_from*/ = variable1 /*f*/; - ATTR_string_search___Match____length( self) /*Match::_length*/ = variable2 /*len*/; - init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Match].i] = 1; - tracehead = trace.prev; +void string_search___Match___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){ + int itpos2 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_Match].i; + struct {struct stack_frame_t me; val_t MORE_REG[1];} fra; + val_t REGB0; + val_t REGB1; + val_t REGB2; + val_t REGB3; + val_t tmp; + if (init_table[itpos2]) return; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 220; + fra.me.meth = LOCATE_string_search___Match___init; + fra.me.has_broke = 0; + fra.me.REG_size = 2; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[1] = NIT_NULL; + fra.me.REG[0] = p0; + fra.me.REG[1] = p1; + REGB0 = p2; + REGB1 = p3; + /* ./../lib/standard//string_search.nit:223 */ + REGB2 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB2 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:223 */ + if (UNTAG_Bool(REGB2)) { + } else { + nit_abort("Assert %s failed", "'positive_length'", LOCATE_string_search, 223); + } + /* ./../lib/standard//string_search.nit:224 */ + REGB2 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:224 */ + if (UNTAG_Bool(REGB2)) { + } else { + nit_abort("Assert %s failed", "'valid_from'", LOCATE_string_search, 224); + } + /* ./../lib/standard//kernel.nit:215 */ + REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); + /* ./../lib/standard//collection//array.nit:23 */ + REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); + if (UNTAG_Bool(REGB3)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23); + } + REGB3 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]); + /* ./../lib/standard//kernel.nit:211 */ + REGB3 = TAG_Bool(UNTAG_Int(REGB2)<=UNTAG_Int(REGB3)); + /* ./../lib/standard//string_search.nit:225 */ + if (UNTAG_Bool(REGB3)) { + } else { + nit_abort("Assert %s failed", "'valid_after'", LOCATE_string_search, 225); + } + /* ./../lib/standard//string_search.nit:226 */ + ATTR_string_search___Match____string(fra.me.REG[0]) = fra.me.REG[1]; + /* ./../lib/standard//string_search.nit:227 */ + ATTR_string_search___Match____from(fra.me.REG[0]) = REGB0; + /* ./../lib/standard//string_search.nit:228 */ + ATTR_string_search___Match____length(fra.me.REG[0]) = REGB1; + stack_frame_head = fra.me.prev; + init_table[itpos2] = 1; return; } -val_t string_search___Char___search_index_in(val_t self, val_t param0, val_t param1) { - struct trace_t trace = {NULL, NULL, 235, LOCATE_string_search___Char___search_index_in}; - val_t variable0; - val_t variable1; - val_t variable2; - val_t variable3; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = param0; - variable1 = param1; - variable3 = ((array___AbstractArray___length_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Collection___length))( variable0 /*s*/) /*AbstractArray::length*/; - variable2 = variable3; - while (true) { /*while*/ - variable3 = TAG_Bool(UNTAG_Int( variable1 /*from*/)=UNTAG_Int( TAG_Int(0))); - if (!UNTAG_Bool(variable2)) { fprintf(stderr, "Assert%s failed", ""); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_string_search___String___search_index_in, LOCATE_string_search, 260); nit_exit(1);} - variable3 = ((array___AbstractArray___length_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Collection___length))( variable0 /*s*/) /*AbstractArray::length*/; - variable4 = ((array___AbstractArray___length_t)CALL( self,COLOR_abstract_collection___Collection___length))( self) /*AbstractArray::length*/; - variable3 = TAG_Int(UNTAG_Int(variable3)-UNTAG_Int(variable4)); - variable3 = TAG_Int(UNTAG_Int(variable3)+UNTAG_Int( TAG_Int(1))); - variable2 = variable3; - while (true) { /*while*/ - variable3 = TAG_Bool(UNTAG_Int( variable1 /*from*/)=UNTAG_Int( TAG_Int(0))); - variable5 = variable4; - if (UNTAG_Bool(variable5)) { /* and */ - variable5 = ((string___String_____bra_t)CALL( self,COLOR_abstract_collection___Map_____bra))( self, variable3 /*i*/) /*String::[]*/; - variable6 = TAG_Int(UNTAG_Int( variable3 /*i*/)+UNTAG_Int( variable1 /*from*/)); - variable6 = ((string___String_____bra_t)CALL( variable0 /*s*/,COLOR_abstract_collection___Map_____bra))( variable0 /*s*/, variable6) /*String::[]*/; - variable5 = TAG_Bool((variable5)==(variable6)); +val_t string_search___String___search_index_in(val_t p0, val_t p1, val_t p2){ + struct {struct stack_frame_t me; val_t MORE_REG[1];} fra; + val_t REGB0; + val_t REGB1; + val_t REGB2; + val_t REGB3; + val_t REGB4; + val_t REGB5; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 257; + fra.me.meth = LOCATE_string_search___String___search_index_in; + fra.me.has_broke = 0; + fra.me.REG_size = 2; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[1] = NIT_NULL; + fra.me.REG[0] = p0; + fra.me.REG[1] = p1; + REGB0 = p2; + /* ./../lib/standard//string_search.nit:259 */ + REGB1 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:259 */ + if (UNTAG_Bool(REGB1)) { + } else { + nit_abort("Assert failed", NULL, LOCATE_string_search, 259); + } + /* ./../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]); + REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL); + if (UNTAG_Bool(REGB2)) { + } else { + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23); + } + REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]); + /* ./../lib/standard//kernel.nit:217 */ + REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:260 */ + REGB1 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB1 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB1)); + /* ./../lib/standard//string_search.nit:261 */ + while(1) { + /* ./../lib/standard//kernel.nit:212 */ + REGB2 = TAG_Bool(UNTAG_Int(REGB0)=UNTAG_Int(REGB2)); + /* ./../lib/standard//string_search.nit:263 */ + if (UNTAG_Bool(REGB2)) { + REGB2 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB3); + /* ./../lib/standard//kernel.nit:215 */ + REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0)); + /* ./../lib/standard//string_search.nit:263 */ + REGB4 = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB4); + REGB5 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB4)); + if (UNTAG_Bool(REGB5)) { + } else { + /* ./../lib/standard//kernel.nit:347 */ + REGB4 = TAG_Bool((REGB2)==(REGB4)); + /* ./../lib/standard//string_search.nit:263 */ + REGB5 = REGB4; + } + } else { + REGB4 = TAG_Bool(false); + REGB5 = REGB4; + } + if (UNTAG_Bool(REGB5)) { + REGB5 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:217 */ + REGB5 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB5)); + /* ./../lib/standard//string_search.nit:263 */ + REGB3 = REGB5; + } else { + goto label1; + } + } + label1: while(0); + /* ./../lib/standard//string_search.nit:265 */ + REGB5 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:212 */ + REGB5 = TAG_Bool(UNTAG_Int(REGB3)val[UNTAG_Int(REGB0)]; + /* ./../lib/standard//string_search.nit:305 */ + fra.me.REG[3] = CALL_string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]); + /* ./../lib/standard//collection//array.nit:239 */ + REGB1 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); + /* ./../lib/standard//collection//array.nit:239 */ + REGB0 = REGB1; + } else { + /* ./../lib/standard//collection//array.nit:237 */ + goto label1; + } + } + label1: while(0); + /* ./../lib/standard//string_search.nit:306 */ + goto label2; + label2: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[1]; } -val_t string_search___String___split(val_t self) { - struct trace_t trace = {NULL, NULL, 310, LOCATE_string_search___String___split}; - val_t variable0; - trace.prev = tracehead; tracehead = &trace; - trace.file = LOCATE_string_search; - variable0 = ((string_search___String___split_with_t)CALL( self,COLOR_string_search___String___split_with))( self, TAG_Char('\n')) /*String::split_with*/; - goto return_label42; - return_label42: while(false); - tracehead = trace.prev; - return variable0; +val_t string_search___String___split(val_t p0){ + struct {struct stack_frame_t me;} fra; + val_t REGB0; + val_t tmp; + fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; + fra.me.file = LOCATE_string_search; + fra.me.line = 309; + fra.me.meth = LOCATE_string_search___String___split; + fra.me.has_broke = 0; + fra.me.REG_size = 1; + fra.me.REG[0] = NIT_NULL; + fra.me.REG[0] = p0; + /* ./../lib/standard//string_search.nit:311 */ + REGB0 = TAG_Char('\n'); + fra.me.REG[0] = CALL_string_search___String___split_with(fra.me.REG[0])(fra.me.REG[0], REGB0); + goto label1; + label1: while(0); + stack_frame_head = fra.me.prev; + return fra.me.REG[0]; }