-val_t range___Range___first(val_t self) {
- struct trace_t trace = {NULL, NULL, 22, LOCATE_range___Range___first};
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- tracehead = trace.prev;
- return ATTR_range___Range____first( self) /*Range::_first*/;
-}
-val_t range___Range___last(val_t self) {
- struct trace_t trace = {NULL, NULL, 24, LOCATE_range___Range___last};
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- tracehead = trace.prev;
- return ATTR_range___Range____last( self) /*Range::_last*/;
-}
-val_t range___Range___after(val_t self) {
- struct trace_t trace = {NULL, NULL, 27, LOCATE_range___Range___after};
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- tracehead = trace.prev;
- return ATTR_range___Range____after( self) /*Range::_after*/;
-}
-val_t range___Range___has(val_t self, val_t param0) {
- struct trace_t trace = {NULL, NULL, 30, LOCATE_range___Range___has};
- val_t variable0;
- val_t variable1;
- val_t variable2;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable0 = param0;
- variable1 = ATTR_range___Range____first( self) /*Range::_first*/;
- variable1 = ((kernel___Comparable_____geq_t)CALL( variable0 /*item*/,COLOR_kernel___Comparable_____geq))( variable0 /*item*/, variable1) /*Comparable::>=*/;
- variable2 = variable1;
- if (UNTAG_Bool(variable2)) { /* and */
- variable2 = ATTR_range___Range____last( self) /*Range::_last*/;
- variable2 = ((kernel___Comparable_____leq_t)CALL( variable0 /*item*/,COLOR_kernel___Comparable_____leq))( variable0 /*item*/, variable2) /*Comparable::<=*/;
- }
- variable1 = variable2;
- goto return_label0;
- return_label0: while(false);
- tracehead = trace.prev;
- return variable1;
-}
-val_t range___Range___has_only(val_t self, val_t param0) {
- struct trace_t trace = {NULL, NULL, 32, LOCATE_range___Range___has_only};
- val_t variable0;
- val_t variable1;
- val_t variable2;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable0 = param0;
- variable1 = ATTR_range___Range____first( self) /*Range::_first*/;
- variable1 = TAG_Bool((variable1 == variable0 /*item*/) || ((variable1 != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL(variable1,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN(variable1, variable0 /*item*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL(variable1,COLOR_kernel___Object_____eqeq))(variable1, variable0 /*item*/) /*Object::==*/)))));
- variable2 = variable1;
- if (UNTAG_Bool(variable2)) { /* and */
- variable2 = ATTR_range___Range____last( self) /*Range::_last*/;
- variable2 = TAG_Bool(( variable0 /*item*/ == variable2) || (( variable0 /*item*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable0 /*item*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable0 /*item*/,variable2)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable0 /*item*/,COLOR_kernel___Object_____eqeq))( variable0 /*item*/, variable2) /*Object::==*/)))));
- }
- variable1 = variable2;
- goto return_label1;
- return_label1: while(false);
- tracehead = trace.prev;
- return variable1;
-}
-val_t range___Range___count(val_t self, val_t param0) {
- struct trace_t trace = {NULL, NULL, 34, LOCATE_range___Range___count};
- val_t variable0;
- val_t variable1;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable0 = param0;
- variable1 = ((range___Range___has_t)CALL( self,COLOR_abstract_collection___Collection___has))( self, variable0 /*item*/) /*Range::has*/;
- if (UNTAG_Bool(variable1)) { /*if*/
- variable1 = TAG_Int(1);
- goto return_label2;
- } else { /*if*/
- variable1 = TAG_Int(0);
- goto return_label2;
- }
- return_label2: while(false);
- tracehead = trace.prev;
- return variable1;
-}
-val_t range___Range___iterator(val_t self) {
- struct trace_t trace = {NULL, NULL, 43, LOCATE_range___Range___iterator};
- val_t variable0;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable0 = NEW_range___IteratorRange___init( self); /*new IteratorRange[E]*/
- goto return_label3;
- return_label3: while(false);
- tracehead = trace.prev;
- return variable0;
-}
-val_t range___Range___length(val_t self) {
- struct trace_t trace = {NULL, NULL, 45, LOCATE_range___Range___length};
- val_t variable0;
- val_t variable1;
- val_t variable2;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable1 = ATTR_range___Range____first( self) /*Range::_first*/;
- variable2 = ATTR_range___Range____after( self) /*Range::_after*/;
- variable1 = ((kernel___Discrete___distance_t)CALL(variable1,COLOR_kernel___Discrete___distance))(variable1, variable2) /*Discrete::distance*/;
- variable0 = variable1;
- variable1 = TAG_Bool(UNTAG_Int( variable0 /*nb*/)>UNTAG_Int( TAG_Int(0)));
- if (UNTAG_Bool(variable1)) { /*if*/
- variable0 = variable0 /*nb*/;
- goto return_label4;
- } else { /*if*/
- variable0 = TAG_Int(0);
- goto return_label4;
- }
- return_label4: while(false);
- tracehead = trace.prev;
- return variable0;
-}
-val_t range___Range___is_empty(val_t self) {
- struct trace_t trace = {NULL, NULL, 55, LOCATE_range___Range___is_empty};
- val_t variable0;
- val_t variable1;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable0 = ATTR_range___Range____first( self) /*Range::_first*/;
- variable1 = ATTR_range___Range____after( self) /*Range::_after*/;
- variable0 = ((kernel___Comparable_____geq_t)CALL(variable0,COLOR_kernel___Comparable_____geq))(variable0, variable1) /*Comparable::>=*/;
- goto return_label5;
- return_label5: while(false);
- tracehead = trace.prev;
- return variable0;
-}
-void range___Range___init(val_t self, val_t param0, val_t param1, int* init_table) {
- struct trace_t trace = {NULL, NULL, 57, LOCATE_range___Range___init};
- val_t variable0;
- val_t variable1;
- val_t variable2;
- trace.prev = tracehead; tracehead = &trace;
- trace.file = LOCATE_range;
- variable0 = param0;
- variable1 = param1;
- if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Range].i]) return;
- ATTR_range___Range____first( self) /*Range::_first*/ = variable0 /*from*/;
- ATTR_range___Range____last( self) /*Range::_last*/ = variable1 /*to*/;
- variable2 = ((kernel___Discrete___succ_t)CALL( variable1 /*to*/,COLOR_kernel___Discrete___succ))( variable1 /*to*/) /*Discrete::succ*/;
- ATTR_range___Range____after( self) /*Range::_after*/ = variable2;
- init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Range].i] = 1;
- tracehead = trace.prev;
+val_t range___Range___first(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_range;
+ fra.me.line = 22;
+ fra.me.meth = LOCATE_range___Range___first;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ /* ./../lib/standard//collection//range.nit:22 */
+ REGB0 = TAG_Bool(ATTR_range___Range____first(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_first", LOCATE_range, 22);
+ }
+ fra.me.REG[0] = ATTR_range___Range____first(fra.me.REG[0]);
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[0];
+}
+val_t range___Range___last(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_range;
+ fra.me.line = 24;
+ fra.me.meth = LOCATE_range___Range___last;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ /* ./../lib/standard//collection//range.nit:24 */
+ REGB0 = TAG_Bool(ATTR_range___Range____last(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_last", LOCATE_range, 24);
+ }
+ fra.me.REG[0] = ATTR_range___Range____last(fra.me.REG[0]);
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[0];
+}
+val_t range___Range___after(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_range;
+ fra.me.line = 27;
+ fra.me.meth = LOCATE_range___Range___after;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ /* ./../lib/standard//collection//range.nit:27 */
+ REGB0 = TAG_Bool(ATTR_range___Range____after(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_after", LOCATE_range, 27);
+ }
+ fra.me.REG[0] = ATTR_range___Range____after(fra.me.REG[0]);
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[0];
+}
+val_t range___Range___has(val_t p0, val_t p1){
+ struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+ val_t REGB0;
+ val_t REGB1;
+ val_t tmp;
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_range;
+ fra.me.line = 30;
+ fra.me.meth = LOCATE_range___Range___has;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 3;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[1] = NIT_NULL;
+ fra.me.REG[2] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ fra.me.REG[1] = p1;
+ /* ./../lib/standard//collection//range.nit:30 */
+ REGB0 = TAG_Bool(ATTR_range___Range____first(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_first", LOCATE_range, 30);
+ }
+ fra.me.REG[2] = ATTR_range___Range____first(fra.me.REG[0]);
+ REGB0 = CALL_kernel___Comparable_____geq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
+ if (UNTAG_Bool(REGB0)) {
+ REGB0 = TAG_Bool(ATTR_range___Range____last(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_last", LOCATE_range, 30);
+ }
+ fra.me.REG[0] = ATTR_range___Range____last(fra.me.REG[0]);
+ REGB0 = CALL_kernel___Comparable_____leq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
+ } else {
+ REGB1 = TAG_Bool(false);
+ REGB0 = REGB1;
+ }
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB0;
+}
+val_t range___Range___has_only(val_t p0, val_t p1){
+ struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+ val_t REGB0;
+ val_t REGB1;
+ val_t tmp;
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_range;
+ fra.me.line = 32;
+ fra.me.meth = LOCATE_range___Range___has_only;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 3;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[1] = NIT_NULL;
+ fra.me.REG[2] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ fra.me.REG[1] = p1;
+ /* ./../lib/standard//collection//range.nit:32 */
+ REGB0 = TAG_Bool(ATTR_range___Range____first(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_first", LOCATE_range, 32);
+ }
+ fra.me.REG[2] = ATTR_range___Range____first(fra.me.REG[0]);
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[1]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ REGB0 = TAG_Bool(ATTR_range___Range____last(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_last", LOCATE_range, 32);
+ }
+ fra.me.REG[0] = ATTR_range___Range____last(fra.me.REG[0]);
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[0]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
+ REGB0 = REGB1;
+ }
+ } else {
+ REGB1 = TAG_Bool(false);
+ REGB0 = REGB1;
+ }
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB0;
+}
+val_t range___Range___count(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_range;
+ fra.me.line = 34;
+ fra.me.meth = LOCATE_range___Range___count;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 2;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[1] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ fra.me.REG[1] = p1;
+ /* ./../lib/standard//collection//range.nit:36 */
+ REGB0 = CALL_abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+ if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//collection//range.nit:37 */
+ REGB0 = TAG_Int(1);
+ goto label1;
+ } else {
+ /* ./../lib/standard//collection//range.nit:39 */
+ REGB1 = TAG_Int(0);
+ REGB0 = REGB1;
+ goto label1;
+ }
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB0;
+}
+val_t range___Range___iterator(val_t p0){
+ 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_range;
+ fra.me.line = 43;
+ fra.me.meth = LOCATE_range___Range___iterator;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ /* ./../lib/standard//collection//range.nit:43 */
+ fra.me.REG[0] = NEW_IteratorRange_range___IteratorRange___init(fra.me.REG[0]);
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[0];
+}
+void range___Range___iterate(val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){
+ struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+ val_t REGB0;
+ fun_t CREG[1];
+ val_t tmp;
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_range;
+ fra.me.line = 45;
+ fra.me.meth = LOCATE_range___Range___iterate;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 3;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[1] = NIT_NULL;
+ fra.me.REG[2] = NIT_NULL;
+ fra.me.closure_ctx = closctx_param;
+ fra.me.closure_funs = CREG;
+ fra.me.REG[0] = p0;
+ CREG[0] = clos_fun0;
+ /* ./../lib/standard//collection//range.nit:48 */
+ REGB0 = TAG_Bool(ATTR_range___Range____first(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_first", LOCATE_range, 48);
+ }
+ fra.me.REG[1] = ATTR_range___Range____first(fra.me.REG[0]);
+ /* ./../lib/standard//collection//range.nit:49 */
+ REGB0 = TAG_Bool(ATTR_range___Range____last(fra.me.REG[0])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_last", LOCATE_range, 49);
+ }
+ fra.me.REG[0] = ATTR_range___Range____last(fra.me.REG[0]);
+ /* ./../lib/standard//collection//range.nit:50 */
+ while(1) {
+ REGB0 = CALL_kernel___Comparable_____leq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
+ if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//collection//range.nit:51 */
+ ((void (*)(struct stack_frame_t *, val_t))(CREG[0]))(closctx_param, fra.me.REG[1]);
+ if (closctx_param->has_broke) {
+ goto label1;
+ }
+ /* ./../lib/standard//collection//range.nit:52 */
+ fra.me.REG[2] = CALL_kernel___Discrete___succ(fra.me.REG[1])(fra.me.REG[1]);
+ fra.me.REG[1] = fra.me.REG[2];
+ } else {
+ /* ./../lib/standard//collection//range.nit:50 */
+ goto label2;
+ }
+ }
+ label2: while(0);
+ label1: while(0);
+ stack_frame_head = fra.me.prev;