+++ /dev/null
-/* This C file is generated by NIT to compile module standard___string_search. */
-#include "standard___string_search._sep.h"
-static const char LOCATE_standard___string_search___Pattern___search_index_in[] = "string_search::Pattern::search_index_in";
-val_t standard___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_standard___string_search;
- fra.me.line = 20;
- fra.me.meth = LOCATE_standard___string_search___Pattern___search_index_in;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* ../lib/standard/string_search.nit:20 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___string_search, 20);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_standard___string_search___Pattern___search_in[] = "string_search::Pattern::search_in";
-val_t standard___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_standard___string_search;
- fra.me.line = 25;
- fra.me.meth = LOCATE_standard___string_search___Pattern___search_in;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* ../lib/standard/string_search.nit:25 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___string_search, 25);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_standard___string_search___Pattern___search_all_in[] = "string_search::Pattern::search_all_in";
-val_t standard___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_standard___string_search;
- fra.me.line = 29;
- fra.me.meth = LOCATE_standard___string_search___Pattern___search_all_in;
- 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;
- /* ../lib/standard/string_search.nit:32 */
- fra.me.REG[2] = NEW_Array_standard___collection___array___Array___init();
- /* ../lib/standard/string_search.nit:33 */
- REGB0 = TAG_Int(0);
- fra.me.REG[3] = CALL_standard___string_search___Pattern___search_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
- /* ../lib/standard/string_search.nit:34 */
- 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(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)) {
- /* ../lib/standard/string_search.nit:35 */
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
- /* ../lib/standard/string_search.nit:36 */
- REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___string_search, 36);
- }
- REGB0 = CALL_standard___string_search___Match___after(fra.me.REG[3])(fra.me.REG[3]);
- fra.me.REG[4] = CALL_standard___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:34 */
- goto label1;
- }
- }
- label1: while(0);
- /* ../lib/standard/string_search.nit:38 */
- goto label2;
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_standard___string_search___Pattern___split_in[] = "string_search::Pattern::split_in";
-val_t standard___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_standard___string_search;
- fra.me.line = 41;
- fra.me.meth = LOCATE_standard___string_search___Pattern___split_in;
- 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;
- /* ../lib/standard/string_search.nit:44 */
- fra.me.REG[2] = NEW_Array_standard___collection___array___Array___init();
- /* ../lib/standard/string_search.nit:45 */
- REGB0 = TAG_Int(0);
- /* ../lib/standard/string_search.nit:46 */
- REGB1 = TAG_Int(0);
- fra.me.REG[3] = CALL_standard___string_search___Pattern___search_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB1);
- /* ../lib/standard/string_search.nit:47 */
- 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(0);
- REGB1 = REGB2;
- } else {
- REGB2 = CALL_standard___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:49 */
- REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___string_search, 49);
- }
- REGB1 = CALL_standard___string_search___Match___from(fra.me.REG[3])(fra.me.REG[3]);
- /* ../lib/standard/kernel.nit:247 */
- REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:50 */
- fra.me.REG[4] = NEW_Match_standard___string_search___Match___init(fra.me.REG[1], REGB0, REGB1);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
- /* ../lib/standard/string_search.nit:51 */
- REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___string_search, 51);
- }
- REGB1 = CALL_standard___string_search___Match___after(fra.me.REG[3])(fra.me.REG[3]);
- REGB0 = REGB1;
- /* ../lib/standard/string_search.nit:52 */
- fra.me.REG[4] = CALL_standard___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:47 */
- goto label1;
- }
- }
- label1: while(0);
- /* ../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]);
- /* ../lib/standard/kernel.nit:247 */
- REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:55 */
- fra.me.REG[1] = NEW_Match_standard___string_search___Match___init(fra.me.REG[1], REGB0, REGB1);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- /* ../lib/standard/string_search.nit:56 */
- goto label2;
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_standard___string_search___BM_Pattern___to_s[] = "string_search::BM_Pattern::(string::Object::to_s)";
-val_t standard___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_standard___string_search;
- fra.me.line = 67;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___to_s;
- 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/string_search.nit:67 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 67);
- }
- fra.me.REG[0] = ATTR_standard___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];
-}
-static const char LOCATE_standard___string_search___BM_Pattern___search_index_in[] = "string_search::BM_Pattern::(string_search::Pattern::search_index_in)";
-val_t standard___string_search___BM_Pattern___search_index_in(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t REGB4;
- val_t REGB5;
- val_t REGB6;
- val_t REGB7;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 69;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___search_index_in;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- REGB0 = p2;
- /* ../lib/standard/string_search.nit:72 */
- 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:243 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:72 */
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_standard___string_search, 72);
- }
- /* ../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]);
- /* ../lib/standard/string_search.nit:74 */
- REGB2 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 74);
- }
- REGB2 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:77 */
- while(1) {
- /* ../lib/standard/kernel.nit:247 */
- REGB3 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:77 */
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB4));
- REGB3 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:77 */
- if (UNTAG_Bool(REGB4)) {
- /* ../lib/standard/string_search.nit:78 */
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB4 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:79 */
- while(1) {
- REGB3 = TAG_Int(0);
- REGB5 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:79 */
- if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 79);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]);
- REGB3 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB4);
- /* ../lib/standard/kernel.nit:245 */
- REGB5 = TAG_Int(UNTAG_Int(REGB4)+UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:79 */
- REGB5 = CALL_standard___collection___abstract_collection___SequenceRead_____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:434 */
- REGB5 = TAG_Bool((REGB3)==(REGB5));
- /* ../lib/standard/string_search.nit:79 */
- REGB6 = REGB5;
- }
- } else {
- REGB5 = TAG_Bool(0);
- REGB6 = REGB5;
- }
- if (UNTAG_Bool(REGB6)) {
- REGB6 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB6 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB6));
- /* ../lib/standard/string_search.nit:79 */
- REGB4 = REGB6;
- } else {
- goto label1;
- }
- }
- label1: while(0);
- /* ../lib/standard/string_search.nit:80 */
- REGB6 = TAG_Int(0);
- REGB5 = TAG_Bool(VAL_ISA(REGB6, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB6 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB6));
- /* ../lib/standard/string_search.nit:80 */
- if (UNTAG_Bool(REGB6)) {
- /* ../lib/standard/string_search.nit:81 */
- REGB6 = REGB0;
- goto label2;
- } else {
- /* ../lib/standard/string_search.nit:83 */
- REGB5 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_gs", LOCATE_standard___string_search, 83);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0]);
- /* ../lib/standard/collection/array.nit:279 */
- REGB5 = REGB4;
- /* ../lib/standard/collection/array.nit:281 */
- REGB3 = TAG_Int(0);
- REGB7 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB5), VTID_standard___kernel___Comparable___OTHER(REGB5))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB7)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB5)>=UNTAG_Int(REGB3));
- /* ../lib/standard/collection/array.nit:281 */
- if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
- }
- REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- REGB7 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB5), VTID_standard___kernel___Comparable___OTHER(REGB5))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB7)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB5)<UNTAG_Int(REGB3));
- } else {
- /* ../lib/standard/collection/array.nit:281 */
- REGB7 = TAG_Bool(0);
- REGB3 = REGB7;
- }
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
- }
- /* ../lib/standard/collection/array.nit:282 */
- fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
- REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB5)];
- /* ../lib/standard/collection/array.nit:282 */
- goto label3;
- label3: while(0);
- /* ../lib/standard/string_search.nit:83 */
- REGB5 = fra.me.REG[2];
- /* ../lib/standard/kernel.nit:245 */
- REGB3 = TAG_Int(UNTAG_Int(REGB4)+UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:84 */
- REGB3 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB3);
- REGB3 = CALL_standard___string_search___BM_Pattern___bc(fra.me.REG[0])(fra.me.REG[0], REGB3);
- /* ../lib/standard/kernel.nit:247 */
- REGB3 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:84 */
- REGB7 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB7 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB7));
- REGB4 = TAG_Int(UNTAG_Int(REGB7)+UNTAG_Int(REGB4));
- REGB7 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB5), VTID_standard___kernel___Comparable___OTHER(REGB5))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB7)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:244 */
- REGB7 = TAG_Bool(UNTAG_Int(REGB5)>UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:86 */
- if (UNTAG_Bool(REGB7)) {
- /* ../lib/standard/kernel.nit:245 */
- REGB5 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB5));
- /* ../lib/standard/string_search.nit:87 */
- REGB0 = REGB5;
- } else {
- /* ../lib/standard/kernel.nit:245 */
- 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;
- }
- }
- label4: while(0);
- /* ../lib/standard/string_search.nit:93 */
- REGB0 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:246 */
- 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;
-}
-static const char LOCATE_standard___string_search___BM_Pattern___search_in[] = "string_search::BM_Pattern::(string_search::Pattern::search_in)";
-val_t standard___string_search___BM_Pattern___search_in(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} 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___string_search;
- fra.me.line = 96;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___search_in;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- REGB0 = p2;
- /* ../lib/standard/string_search.nit:99 */
- REGB0 = CALL_standard___string_search___Pattern___search_index_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
- /* ../lib/standard/string_search.nit:100 */
- 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:242 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:100 */
- if (UNTAG_Bool(REGB1)) {
- /* ../lib/standard/string_search.nit:101 */
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- } else {
- /* ../lib/standard/string_search.nit:103 */
- REGB1 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 103);
- }
- REGB1 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- fra.me.REG[1] = NEW_Match_standard___string_search___Match___init(fra.me.REG[1], REGB0, REGB1);
- fra.me.REG[2] = fra.me.REG[1];
- goto label1;
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_standard___string_search___BM_Pattern___init[] = "string_search::BM_Pattern::init";
-void standard___string_search___BM_Pattern___init(val_t p0, val_t p1, int* init_table){
- int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string_search___BM_Pattern].i;
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- if (init_table[itpos0]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 107;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___init;
- 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;
- /* ../lib/standard/string_search.nit:110 */
- ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]) = fra.me.REG[1];
- /* ../lib/standard/collection/array.nit:24 */
- REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
- }
- REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ../lib/standard/string_search.nit:111 */
- ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]) = REGB0;
- /* ../lib/standard/string_search.nit:112 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 112);
- }
- REGB0 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0]) = fra.me.REG[1];
- /* ../lib/standard/string_search.nit:113 */
- fra.me.REG[1] = NEW_ArrayMap_standard___collection___array___ArrayMap___init();
- ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0]) = fra.me.REG[1];
- /* ../lib/standard/string_search.nit:114 */
- CALL_standard___string_search___BM_Pattern___compute_gs(fra.me.REG[0])(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:115 */
- CALL_standard___string_search___BM_Pattern___compute_bc(fra.me.REG[0])(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- init_table[itpos0] = 1;
- return;
-}
-static const char LOCATE_standard___string_search___BM_Pattern___bc[] = "string_search::BM_Pattern::bc";
-val_t standard___string_search___BM_Pattern___bc(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 124;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___bc;
- 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;
- REGB0 = p1;
- /* ../lib/standard/string_search.nit:126 */
- REGB1 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_bc_table", LOCATE_standard___string_search, 126);
- }
- fra.me.REG[1] = ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0]);
- REGB1 = CALL_standard___collection___abstract_collection___MapRead___has_key(fra.me.REG[1])(fra.me.REG[1], REGB0);
- if (UNTAG_Bool(REGB1)) {
- /* ../lib/standard/string_search.nit:127 */
- REGB1 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_bc_table", LOCATE_standard___string_search, 127);
- }
- fra.me.REG[1] = ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0]);
- fra.me.REG[1] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB0);
- REGB0 = fra.me.REG[1];
- goto label1;
- } else {
- /* ../lib/standard/string_search.nit:129 */
- REGB1 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 129);
- }
- REGB1 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- REGB0 = REGB1;
- goto label1;
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_standard___string_search___BM_Pattern___compute_bc[] = "string_search::BM_Pattern::compute_bc";
-void standard___string_search___BM_Pattern___compute_bc(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t REGB4;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 139;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___compute_bc;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ../lib/standard/string_search.nit:141 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 141);
- }
- fra.me.REG[1] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:142 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 142);
- }
- REGB0 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:143 */
- REGB1 = TAG_Int(0);
- /* ../lib/standard/string_search.nit:144 */
- while(1) {
- REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
- 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:242 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:144 */
- if (UNTAG_Bool(REGB2)) {
- /* ../lib/standard/string_search.nit:145 */
- REGB2 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_bc_table", LOCATE_standard___string_search, 145);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____bc_table(fra.me.REG[0]);
- REGB2 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB1);
- /* ../lib/standard/kernel.nit:247 */
- REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:145 */
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB4 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:145 */
- CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[2])(fra.me.REG[2], REGB2, REGB4);
- /* ../lib/standard/string_search.nit:146 */
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB4 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:146 */
- REGB1 = REGB4;
- } else {
- /* ../lib/standard/string_search.nit:144 */
- goto label1;
- }
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_standard___string_search___BM_Pattern___suffixes[] = "string_search::BM_Pattern::suffixes";
-val_t standard___string_search___BM_Pattern___suffixes(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t REGB4;
- val_t REGB5;
- val_t REGB6;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 150;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___suffixes;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ../lib/standard/string_search.nit:152 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 152);
- }
- fra.me.REG[1] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:153 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 153);
- }
- REGB0 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:154 */
- fra.me.REG[0] = NEW_Array_standard___collection___array___Array___filled_with(REGB0, REGB0);
- /* ../lib/standard/string_search.nit:156 */
- REGB1 = TAG_Int(0);
- /* ../lib/standard/string_search.nit:157 */
- REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:158 */
- REGB3 = TAG_Int(2);
- /* ../lib/standard/kernel.nit:247 */
- REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:159 */
- while(1) {
- REGB4 = TAG_Int(0);
- REGB5 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:159 */
- if (UNTAG_Bool(REGB4)) {
- REGB4 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:244 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB3)>UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:160 */
- if (UNTAG_Bool(REGB4)) {
- /* ../lib/standard/kernel.nit:245 */
- REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:160 */
- REGB5 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB5 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB5));
- REGB5 = TAG_Int(UNTAG_Int(REGB5)-UNTAG_Int(REGB1));
- /* ../lib/standard/collection/array.nit:279 */
- fra.me.REG[2] = fra.me.REG[0];
- /* ../lib/standard/collection/array.nit:281 */
- REGB4 = TAG_Int(0);
- REGB6 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB5), VTID_standard___kernel___Comparable___OTHER(REGB5))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB6)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB5)>=UNTAG_Int(REGB4));
- /* ../lib/standard/collection/array.nit:281 */
- if (UNTAG_Bool(REGB4)) {
- REGB4 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
- }
- REGB4 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- REGB6 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB5), VTID_standard___kernel___Comparable___OTHER(REGB5))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB6)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB5)<UNTAG_Int(REGB4));
- } else {
- /* ../lib/standard/collection/array.nit:281 */
- REGB6 = TAG_Bool(0);
- REGB4 = REGB6;
- }
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
- }
- /* ../lib/standard/collection/array.nit:282 */
- fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
- REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB4)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB5)];
- /* ../lib/standard/collection/array.nit:282 */
- goto label1;
- label1: while(0);
- /* ../lib/standard/kernel.nit:247 */
- 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_standard___string_search, 160);
- }
- REGB4 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(fra.me.REG[2]), VTID_standard___kernel___Comparable___OTHER(fra.me.REG[2]))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB5 = TAG_Bool(UNTAG_Int(fra.me.REG[2])<UNTAG_Int(REGB5));
- } else {
- /* ../lib/standard/string_search.nit:160 */
- REGB4 = TAG_Bool(0);
- REGB5 = REGB4;
- }
- if (UNTAG_Bool(REGB5)) {
- /* ../lib/standard/kernel.nit:245 */
- REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:161 */
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB4 = TAG_Int(UNTAG_Int(REGB5)-UNTAG_Int(REGB4));
- REGB4 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB1));
- /* ../lib/standard/collection/array.nit:279 */
- fra.me.REG[2] = fra.me.REG[0];
- /* ../lib/standard/collection/array.nit:281 */
- REGB5 = TAG_Int(0);
- REGB6 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB6)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
- /* ../lib/standard/collection/array.nit:281 */
- if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
- }
- REGB5 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- REGB6 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB6)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
- } else {
- /* ../lib/standard/collection/array.nit:281 */
- REGB6 = TAG_Bool(0);
- REGB5 = REGB6;
- }
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
- }
- /* ../lib/standard/collection/array.nit:282 */
- fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
- REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB4)];
- /* ../lib/standard/collection/array.nit:282 */
- goto label2;
- label2: while(0);
- /* ../lib/standard/string_search.nit:161 */
- CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, fra.me.REG[2]);
- } else {
- REGB4 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:163 */
- if (UNTAG_Bool(REGB4)) {
- REGB2 = REGB3;
- }
- /* ../lib/standard/string_search.nit:164 */
- REGB1 = REGB3;
- /* ../lib/standard/string_search.nit:165 */
- while(1) {
- REGB4 = TAG_Int(0);
- REGB5 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:165 */
- if (UNTAG_Bool(REGB4)) {
- REGB4 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB2);
- /* ../lib/standard/kernel.nit:245 */
- REGB5 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:165 */
- REGB6 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- 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_standard___collection___abstract_collection___SequenceRead_____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:434 */
- REGB6 = TAG_Bool((REGB4)==(REGB6));
- /* ../lib/standard/string_search.nit:165 */
- REGB5 = REGB6;
- }
- } else {
- REGB6 = TAG_Bool(0);
- REGB5 = REGB6;
- }
- if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- 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:247 */
- REGB5 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:166 */
- CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, REGB5);
- }
- /* ../lib/standard/string_search.nit:168 */
- REGB5 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- 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;
- }
- }
- 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];
-}
-static const char LOCATE_standard___string_search___BM_Pattern___compute_gs[] = "string_search::BM_Pattern::compute_gs";
-void standard___string_search___BM_Pattern___compute_gs(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 REGB5;
- val_t REGB6;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 173;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___compute_gs;
- 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;
- /* ../lib/standard/string_search.nit:175 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 175);
- }
- fra.me.REG[1] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:176 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 176);
- }
- REGB0 = ATTR_standard___string_search___BM_Pattern____length(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:177 */
- fra.me.REG[1] = CALL_standard___string_search___BM_Pattern___suffixes(fra.me.REG[0])(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:178 */
- REGB1 = TAG_Int(0);
- /* ../lib/standard/string_search.nit:179 */
- while(1) {
- REGB2 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:179 */
- if (UNTAG_Bool(REGB2)) {
- /* ../lib/standard/string_search.nit:180 */
- REGB2 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_gs", LOCATE_standard___string_search, 180);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0]);
- CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[2])(fra.me.REG[2], REGB1, REGB0);
- /* ../lib/standard/string_search.nit:181 */
- REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:181 */
- REGB1 = REGB2;
- } else {
- /* ../lib/standard/string_search.nit:179 */
- goto label1;
- }
- }
- label1: while(0);
- /* ../lib/standard/string_search.nit:183 */
- REGB2 = TAG_Int(0);
- /* ../lib/standard/string_search.nit:184 */
- REGB3 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:184 */
- REGB1 = REGB3;
- /* ../lib/standard/string_search.nit:185 */
- while(1) {
- REGB3 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:246 */
- REGB3 = TAG_Int(-UNTAG_Int(REGB3));
- REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB1)>=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:246 */
- 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:237 */
- REGB3 = TAG_Bool((REGB1)==(REGB3));
- /* ../lib/standard/string_search.nit:186 */
- REGB4 = REGB3;
- }
- if (UNTAG_Bool(REGB4)) {
- REGB4 = TAG_Bool(1);
- } else {
- /* ../lib/standard/collection/array.nit:279 */
- fra.me.REG[2] = fra.me.REG[1];
- REGB3 = REGB1;
- /* ../lib/standard/collection/array.nit:281 */
- REGB5 = TAG_Int(0);
- REGB6 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB6)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB5));
- /* ../lib/standard/collection/array.nit:281 */
- if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
- }
- REGB5 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- REGB6 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB6)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB5));
- } else {
- /* ../lib/standard/collection/array.nit:281 */
- REGB6 = TAG_Bool(0);
- REGB5 = REGB6;
- }
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
- }
- /* ../lib/standard/collection/array.nit:282 */
- fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
- REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB3)];
- /* ../lib/standard/collection/array.nit:282 */
- goto label2;
- label2: while(0);
- /* ../lib/standard/string_search.nit:186 */
- REGB3 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- 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(0);
- REGB5 = REGB6;
- } else {
- /* ../lib/standard/kernel.nit:237 */
- 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:247 */
- REGB4 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB4));
- REGB4 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB1));
- REGB5 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB4));
- /* ../lib/standard/string_search.nit:187 */
- if (UNTAG_Bool(REGB4)) {
- /* ../lib/standard/string_search.nit:188 */
- REGB4 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_gs", LOCATE_standard___string_search, 188);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0]);
- /* ../lib/standard/collection/array.nit:279 */
- REGB4 = REGB2;
- /* ../lib/standard/collection/array.nit:281 */
- REGB5 = TAG_Int(0);
- REGB3 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
- /* ../lib/standard/collection/array.nit:281 */
- if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
- }
- REGB5 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- REGB3 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
- } else {
- /* ../lib/standard/collection/array.nit:281 */
- REGB3 = TAG_Bool(0);
- REGB5 = REGB3;
- }
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
- }
- /* ../lib/standard/collection/array.nit:282 */
- fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
- REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB4)];
- /* ../lib/standard/collection/array.nit:282 */
- 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(0);
- REGB4 = REGB5;
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB5 = TAG_Bool((fra.me.REG[2])==(REGB0));
- /* ../lib/standard/string_search.nit:188 */
- REGB4 = REGB5;
- }
- }
- if (UNTAG_Bool(REGB4)) {
- REGB4 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_gs", LOCATE_standard___string_search, 188);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0]);
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- 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_standard___collection___abstract_collection___Sequence_____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:245 */
- 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);
- }
- /* ../lib/standard/string_search.nit:192 */
- REGB4 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- 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;
- }
- }
- label5: while(0);
- /* ../lib/standard/string_search.nit:194 */
- REGB2 = TAG_Int(0);
- REGB1 = REGB2;
- /* ../lib/standard/string_search.nit:195 */
- while(1) {
- REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
- REGB4 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:195 */
- if (UNTAG_Bool(REGB2)) {
- /* ../lib/standard/string_search.nit:196 */
- REGB2 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_gs", LOCATE_standard___string_search, 196);
- }
- fra.me.REG[2] = ATTR_standard___string_search___BM_Pattern____gs(fra.me.REG[0]);
- REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
- /* ../lib/standard/collection/array.nit:279 */
- fra.me.REG[3] = fra.me.REG[1];
- REGB4 = REGB1;
- /* ../lib/standard/collection/array.nit:281 */
- REGB5 = TAG_Int(0);
- REGB3 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
- /* ../lib/standard/collection/array.nit:281 */
- if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
- }
- REGB5 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3]);
- REGB3 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
- } else {
- /* ../lib/standard/collection/array.nit:281 */
- REGB3 = TAG_Bool(0);
- REGB5 = REGB3;
- }
- if (UNTAG_Bool(REGB5)) {
- } else {
- nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
- }
- /* ../lib/standard/collection/array.nit:282 */
- fra.me.REG[3] = ATTR_standard___collection___array___Array____items(fra.me.REG[3]);
- REGB5 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB5)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB4)];
- /* ../lib/standard/collection/array.nit:282 */
- goto label6;
- label6: while(0);
- /* ../lib/standard/kernel.nit:247 */
- 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:247 */
- 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_standard___collection___abstract_collection___Sequence_____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:245 */
- 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;
- }
- }
- label7: while(0);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_standard___string_search___BM_Pattern___hash[] = "string_search::BM_Pattern::(hash::Object::hash)";
-val_t standard___string_search___BM_Pattern___hash(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_standard___string_search;
- fra.me.line = 201;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern___hash;
- 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/string_search.nit:201 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 201);
- }
- fra.me.REG[0] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]);
- REGB0 = CALL_standard___hash___Object___hash(fra.me.REG[0])(fra.me.REG[0]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_standard___string_search___BM_Pattern_____eqeq[] = "string_search::BM_Pattern::(kernel::Object::==)";
-val_t standard___string_search___BM_Pattern_____eqeq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 202;
- fra.me.meth = LOCATE_standard___string_search___BM_Pattern_____eqeq;
- 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;
- /* ../lib/standard/string_search.nit:202 */
- REGB0 = TAG_Bool((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_standard___string_search___BM_Pattern, ID_standard___string_search___BM_Pattern)) /*cast BM_Pattern*/;
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 202);
- }
- fra.me.REG[1] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[1]);
- REGB0 = TAG_Bool(ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_motif", LOCATE_standard___string_search, 202);
- }
- fra.me.REG[0] = ATTR_standard___string_search___BM_Pattern____motif(fra.me.REG[0]);
- REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[0]));
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
- REGB0 = REGB1;
- }
- } else {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_standard___string_search___Match___string[] = "string_search::Match::string";
-val_t standard___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_standard___string_search;
- fra.me.line = 207;
- fra.me.meth = LOCATE_standard___string_search___Match___string;
- 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/string_search.nit:207 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___Match____string(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_string", LOCATE_standard___string_search, 207);
- }
- fra.me.REG[0] = ATTR_standard___string_search___Match____string(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_standard___string_search___Match___from[] = "string_search::Match::from";
-val_t standard___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_standard___string_search;
- fra.me.line = 210;
- fra.me.meth = LOCATE_standard___string_search___Match___from;
- 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/string_search.nit:210 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___Match____from(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_from", LOCATE_standard___string_search, 210);
- }
- REGB0 = ATTR_standard___string_search___Match____from(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_standard___string_search___Match___length[] = "string_search::Match::length";
-val_t standard___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_standard___string_search;
- fra.me.line = 213;
- fra.me.meth = LOCATE_standard___string_search___Match___length;
- 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/string_search.nit:213 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___Match____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 213);
- }
- REGB0 = ATTR_standard___string_search___Match____length(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_standard___string_search___Match___after[] = "string_search::Match::after";
-val_t standard___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_standard___string_search;
- fra.me.line = 216;
- fra.me.meth = LOCATE_standard___string_search___Match___after;
- 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/string_search.nit:218 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___Match____from(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_from", LOCATE_standard___string_search, 218);
- }
- REGB0 = ATTR_standard___string_search___Match____from(fra.me.REG[0]);
- REGB1 = TAG_Bool(ATTR_standard___string_search___Match____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 218);
- }
- REGB1 = ATTR_standard___string_search___Match____length(fra.me.REG[0]);
- /* ../lib/standard/kernel.nit:245 */
- REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:218 */
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB1;
-}
-static const char LOCATE_standard___string_search___Match___to_s[] = "string_search::Match::(string::Object::to_s)";
-val_t standard___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_standard___string_search;
- fra.me.line = 220;
- fra.me.meth = LOCATE_standard___string_search___Match___to_s;
- 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/string_search.nit:221 */
- REGB0 = TAG_Bool(ATTR_standard___string_search___Match____string(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_string", LOCATE_standard___string_search, 221);
- }
- fra.me.REG[1] = ATTR_standard___string_search___Match____string(fra.me.REG[0]);
- REGB0 = TAG_Bool(ATTR_standard___string_search___Match____from(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_from", LOCATE_standard___string_search, 221);
- }
- REGB0 = ATTR_standard___string_search___Match____from(fra.me.REG[0]);
- REGB1 = TAG_Bool(ATTR_standard___string_search___Match____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string_search, 221);
- }
- REGB1 = ATTR_standard___string_search___Match____length(fra.me.REG[0]);
- fra.me.REG[1] = CALL_standard___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];
-}
-static const char LOCATE_standard___string_search___Match___init[] = "string_search::Match::init";
-void standard___string_search___Match___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string_search___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 REGB4;
- val_t tmp;
- if (init_table[itpos1]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 223;
- fra.me.meth = LOCATE_standard___string_search___Match___init;
- 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;
- REGB0 = p2;
- REGB1 = p3;
- /* ../lib/standard/string_search.nit:226 */
- REGB2 = TAG_Int(0);
- 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:243 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:226 */
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Assert '%s' failed", "positive_length", LOCATE_standard___string_search, 226);
- }
- /* ../lib/standard/string_search.nit:227 */
- REGB2 = TAG_Int(0);
- REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:227 */
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Assert '%s' failed", "valid_from", LOCATE_standard___string_search, 227);
- }
- /* ../lib/standard/kernel.nit:245 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
- /* ../lib/standard/collection/array.nit:24 */
- REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
- }
- REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:241 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB2)<=UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:228 */
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Assert '%s' failed", "valid_after", LOCATE_standard___string_search, 228);
- }
- /* ../lib/standard/string_search.nit:229 */
- ATTR_standard___string_search___Match____string(fra.me.REG[0]) = fra.me.REG[1];
- /* ../lib/standard/string_search.nit:230 */
- ATTR_standard___string_search___Match____from(fra.me.REG[0]) = REGB0;
- /* ../lib/standard/string_search.nit:231 */
- ATTR_standard___string_search___Match____length(fra.me.REG[0]) = REGB1;
- stack_frame_head = fra.me.prev;
- init_table[itpos1] = 1;
- return;
-}
-static const char LOCATE_standard___string_search___Char___search_index_in[] = "string_search::Char::(string_search::Pattern::search_index_in)";
-val_t standard___string_search___Char___search_index_in(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t REGB4;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 238;
- fra.me.meth = LOCATE_standard___string_search___Char___search_index_in;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- REGB0 = p0;
- fra.me.REG[0] = p1;
- REGB1 = p2;
- /* ../lib/standard/collection/array.nit:24 */
- REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=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[0]);
- /* ../lib/standard/string_search.nit:241 */
- while(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:242 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:241 */
- if (UNTAG_Bool(REGB3)) {
- /* ../lib/standard/string_search.nit:242 */
- REGB3 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB1);
- REGB4 = TAG_Bool(IS_EQUAL_OO(REGB3,REGB0));
- if (UNTAG_Bool(REGB4)) {
- } else {
- /* ../lib/standard/kernel.nit:434 */
- REGB3 = TAG_Bool((REGB3)==(REGB0));
- /* ../lib/standard/string_search.nit:242 */
- REGB4 = REGB3;
- }
- if (UNTAG_Bool(REGB4)) {
- REGB4 = REGB1;
- goto label1;
- }
- /* ../lib/standard/string_search.nit:243 */
- REGB3 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:243 */
- REGB1 = REGB3;
- } else {
- /* ../lib/standard/string_search.nit:241 */
- goto label2;
- }
- }
- label2: while(0);
- /* ../lib/standard/string_search.nit:245 */
- REGB1 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:246 */
- REGB1 = TAG_Int(-UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:245 */
- REGB4 = REGB1;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB4;
-}
-static const char LOCATE_standard___string_search___Char___search_in[] = "string_search::Char::(string_search::Pattern::search_in)";
-val_t standard___string_search___Char___search_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 tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 248;
- fra.me.meth = LOCATE_standard___string_search___Char___search_in;
- 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;
- REGB0 = p0;
- fra.me.REG[0] = p1;
- REGB1 = p2;
- /* ../lib/standard/string_search.nit:250 */
- REGB1 = CALL_standard___string_search___Pattern___search_index_in(REGB0)(REGB0, fra.me.REG[0], REGB1);
- /* ../lib/standard/string_search.nit:251 */
- REGB0 = TAG_Int(0);
- REGB2 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB0 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:251 */
- if (UNTAG_Bool(REGB0)) {
- /* ../lib/standard/string_search.nit:252 */
- fra.me.REG[1] = NIT_NULL;
- goto label1;
- } else {
- /* ../lib/standard/string_search.nit:254 */
- REGB0 = TAG_Int(1);
- fra.me.REG[0] = NEW_Match_standard___string_search___Match___init(fra.me.REG[0], REGB1, REGB0);
- fra.me.REG[1] = fra.me.REG[0];
- goto label1;
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_standard___string_search___String___search_index_in[] = "string_search::String::(string_search::Pattern::search_index_in)";
-val_t standard___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_standard___string_search;
- fra.me.line = 262;
- fra.me.meth = LOCATE_standard___string_search___String___search_index_in;
- 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;
- REGB0 = p2;
- /* ../lib/standard/string_search.nit:264 */
- 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:243 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:264 */
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_standard___string_search, 264);
- }
- /* ../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(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=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[0]);
- /* ../lib/standard/kernel.nit:247 */
- REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:265 */
- REGB1 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB1 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:266 */
- while(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:242 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:266 */
- if (UNTAG_Bool(REGB2)) {
- /* ../lib/standard/collection/array.nit:24 */
- REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=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[0]);
- /* ../lib/standard/string_search.nit:267 */
- REGB3 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:268 */
- while(1) {
- REGB2 = TAG_Int(0);
- REGB4 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB2));
- /* ../lib/standard/string_search.nit:268 */
- if (UNTAG_Bool(REGB2)) {
- REGB2 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB3);
- /* ../lib/standard/kernel.nit:245 */
- REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:268 */
- REGB4 = CALL_standard___collection___abstract_collection___SequenceRead_____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:434 */
- REGB4 = TAG_Bool((REGB2)==(REGB4));
- /* ../lib/standard/string_search.nit:268 */
- REGB5 = REGB4;
- }
- } else {
- REGB4 = TAG_Bool(0);
- REGB5 = REGB4;
- }
- if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:247 */
- REGB5 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB5));
- /* ../lib/standard/string_search.nit:268 */
- REGB3 = REGB5;
- } else {
- goto label1;
- }
- }
- label1: while(0);
- /* ../lib/standard/string_search.nit:270 */
- REGB5 = TAG_Int(0);
- REGB4 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB4)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB5 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB5));
- /* ../lib/standard/string_search.nit:270 */
- if (UNTAG_Bool(REGB5)) {
- REGB5 = REGB0;
- goto label2;
- }
- /* ../lib/standard/string_search.nit:272 */
- REGB3 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
- /* ../lib/standard/string_search.nit:272 */
- REGB0 = REGB3;
- } else {
- /* ../lib/standard/string_search.nit:266 */
- goto label3;
- }
- }
- label3: while(0);
- /* ../lib/standard/string_search.nit:274 */
- REGB0 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:246 */
- REGB0 = TAG_Int(-UNTAG_Int(REGB0));
- /* ../lib/standard/string_search.nit:274 */
- REGB5 = REGB0;
- goto label2;
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return REGB5;
-}
-static const char LOCATE_standard___string_search___String___search_in[] = "string_search::String::(string_search::Pattern::search_in)";
-val_t standard___string_search___String___search_in(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} 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___string_search;
- fra.me.line = 277;
- fra.me.meth = LOCATE_standard___string_search___String___search_in;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- REGB0 = p2;
- /* ../lib/standard/string_search.nit:279 */
- REGB0 = CALL_standard___string_search___Pattern___search_index_in(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
- /* ../lib/standard/string_search.nit:280 */
- 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:242 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ../lib/standard/string_search.nit:280 */
- if (UNTAG_Bool(REGB1)) {
- /* ../lib/standard/string_search.nit:281 */
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- } else {
- /* ../lib/standard/collection/array.nit:24 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=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[0]);
- /* ../lib/standard/string_search.nit:283 */
- fra.me.REG[1] = NEW_Match_standard___string_search___Match___init(fra.me.REG[1], REGB0, REGB1);
- fra.me.REG[2] = fra.me.REG[1];
- goto label1;
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_standard___string_search___String___search[] = "string_search::String::search";
-val_t standard___string_search___String___search(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 287;
- fra.me.meth = LOCATE_standard___string_search___String___search;
- 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;
- /* ../lib/standard/string_search.nit:288 */
- REGB0 = TAG_Int(0);
- fra.me.REG[0] = CALL_standard___string_search___Pattern___search_in(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], REGB0);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_standard___string_search___String___search_from[] = "string_search::String::search_from";
-val_t standard___string_search___String___search_from(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 tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 290;
- fra.me.meth = LOCATE_standard___string_search___String___search_from;
- 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;
- REGB0 = p2;
- /* ../lib/standard/string_search.nit:293 */
- fra.me.REG[0] = CALL_standard___string_search___Pattern___search_in(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], REGB0);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_standard___string_search___String___search_all[] = "string_search::String::search_all";
-val_t standard___string_search___String___search_all(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 295;
- fra.me.meth = LOCATE_standard___string_search___String___search_all;
- 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;
- /* ../lib/standard/string_search.nit:302 */
- fra.me.REG[0] = CALL_standard___string_search___Pattern___search_all_in(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_standard___string_search___String___split[] = "string_search::String::split";
-val_t standard___string_search___String___split(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 304;
- fra.me.meth = LOCATE_standard___string_search___String___split;
- 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;
- /* ../lib/standard/string_search.nit:309 */
- fra.me.REG[0] = CALL_standard___string_search___Pattern___split_in(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
- /* ../lib/standard/collection/array.nit:24 */
- REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
- }
- REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
- /* ../lib/standard/string_search.nit:310 */
- fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- /* ../lib/standard/collection/array.nit:270 */
- REGB0 = TAG_Int(0);
- /* ../lib/standard/collection/array.nit:271 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 271);
- }
- REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
- /* ../lib/standard/collection/array.nit:272 */
- fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[0]);
- /* ../lib/standard/collection/array.nit:273 */
- while(1) {
- /* ../lib/standard/collection/array.nit:24 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=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[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:242 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ../lib/standard/collection/array.nit:273 */
- if (UNTAG_Bool(REGB1)) {
- /* ../lib/standard/collection/array.nit:274 */
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 274);
- }
- /* ../lib/standard/collection/array.nit:725 */
- fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
- /* ../lib/standard/string_search.nit:311 */
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]);
- /* ../lib/standard/collection/array.nit:275 */
- REGB1 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
- /* ../lib/standard/collection/array.nit:275 */
- REGB0 = REGB1;
- } else {
- /* ../lib/standard/collection/array.nit:273 */
- goto label1;
- }
- }
- label1: while(0);
- /* ../lib/standard/string_search.nit:312 */
- goto label2;
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_standard___string_search___String___split_with[] = "string_search::String::split_with";
-val_t standard___string_search___String___split_with(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 315;
- fra.me.meth = LOCATE_standard___string_search___String___split_with;
- 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;
- /* ../lib/standard/string_search.nit:316 */
- fra.me.REG[1] = CALL_standard___string_search___String___split(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_standard___string_search___String___replace[] = "string_search::String::replace";
-val_t standard___string_search___String___replace(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 318;
- fra.me.meth = LOCATE_standard___string_search___String___replace;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* ../lib/standard/string_search.nit:324 */
- fra.me.REG[1] = CALL_standard___string_search___String___split_with(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- fra.me.REG[2] = CALL_standard___string___Collection___join(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_standard___string_search___String___html_escape[] = "string_search::String::html_escape";
-val_t standard___string_search___String___html_escape(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- static val_t once_value_1; /* Once value */
- static val_t once_value_2; /* Once value */
- static val_t once_value_3; /* Once value */
- static val_t once_value_4; /* Once value */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___string_search;
- fra.me.line = 327;
- fra.me.meth = LOCATE_standard___string_search___String___html_escape;
- 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/string_search.nit:333 */
- REGB0 = TAG_Char('&');
- REGB0 = CALL_standard___collection___abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], REGB0);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Char('&');
- if (!once_value_1) {
- fra.me.REG[1] = BOX_NativeString("&");
- REGB1 = TAG_Int(5);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
- once_value_1 = fra.me.REG[1];
- register_static_object(&once_value_1);
- } else fra.me.REG[1] = once_value_1;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_standard___string_search___String___replace(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
- fra.me.REG[0] = fra.me.REG[1];
- }
- /* ../lib/standard/string_search.nit:334 */
- REGB0 = TAG_Char('<');
- REGB0 = CALL_standard___collection___abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], REGB0);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Char('<');
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("<");
- REGB1 = TAG_Int(4);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_standard___string_search___String___replace(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
- fra.me.REG[0] = fra.me.REG[1];
- }
- /* ../lib/standard/string_search.nit:335 */
- REGB0 = TAG_Char('>');
- REGB0 = CALL_standard___collection___abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], REGB0);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Char('>');
- if (!once_value_3) {
- fra.me.REG[1] = BOX_NativeString(">");
- REGB1 = TAG_Int(4);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
- once_value_3 = fra.me.REG[1];
- register_static_object(&once_value_3);
- } else fra.me.REG[1] = once_value_3;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_standard___string_search___String___replace(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
- fra.me.REG[0] = fra.me.REG[1];
- }
- /* ../lib/standard/string_search.nit:336 */
- REGB0 = TAG_Char('"');
- REGB0 = CALL_standard___collection___abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], REGB0);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Char('"');
- if (!once_value_4) {
- fra.me.REG[1] = BOX_NativeString(""");
- REGB1 = TAG_Int(6);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
- once_value_4 = fra.me.REG[1];
- register_static_object(&once_value_4);
- } else fra.me.REG[1] = once_value_4;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_standard___string_search___String___replace(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
- fra.me.REG[0] = fra.me.REG[1];
- }
- /* ../lib/standard/string_search.nit:337 */
- goto label5;
- label5: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}