fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
- REGB0 = TAG_Int((bigint)((obj_t)fra.me.REG[0])[1].object_id);
/* ./../lib/standard//kernel.nit:26 */
+ REGB0 = TAG_Int((bigint)((obj_t)fra.me.REG[0])[1].object_id);
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool((VAL2VFT(fra.me.REG[0])==VAL2VFT(fra.me.REG[1])));
/* ./../lib/standard//kernel.nit:29 */
+ REGB0 = TAG_Bool((VAL2VFT(fra.me.REG[0])==VAL2VFT(fra.me.REG[1])));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool(IS_EQUAL_ON(fra.me.REG[0],fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:35 */
+ REGB0 = TAG_Bool(IS_EQUAL_ON(fra.me.REG[0],fra.me.REG[1]));
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool(IS_EQUAL_ON(fra.me.REG[0],fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:40 */
+ REGB0 = TAG_Bool(IS_EQUAL_ON(fra.me.REG[0],fra.me.REG[1]));
if (UNTAG_Bool(REGB0)) {
} else {
REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
+ /* ./../lib/standard//kernel.nit:45 */
REGB0 = TAG_Char('<');
- /* ./../lib/standard//kernel.nit:327 */
+ /* ./../lib/standard//kernel.nit:349 */
printf("%c", (unsigned char)UNTAG_Char(REGB0));;
+ /* ./../lib/standard//kernel.nit:46 */
REGB0 = CALL_kernel___Object___object_id(fra.me.REG[0])(fra.me.REG[0]);
/* ./../lib/standard//kernel.nit:209 */
printf("%ld\n", UNTAG_Int(REGB0));;
+ /* ./../lib/standard//kernel.nit:47 */
REGB0 = TAG_Char('>');
- /* ./../lib/standard//kernel.nit:327 */
+ /* ./../lib/standard//kernel.nit:349 */
printf("%c", (unsigned char)UNTAG_Char(REGB0));;
stack_frame_head = fra.me.prev;
return;
fra.me.line = 50;
fra.me.meth = LOCATE_kernel___Object___exit;
fra.me.has_broke = 0;
- fra.me.REG_size = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[0] = p0;
REGB0 = p1;
/* ./../lib/standard//kernel.nit:50 */
exit(UNTAG_Int(REGB0));;
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
- fra.me.REG[0] = (G_sys);
/* ./../lib/standard//kernel.nit:51 */
+ fra.me.REG[0] = (G_sys);
stack_frame_head = fra.me.prev;
return fra.me.REG[0];
}
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
- /* ./../lib/standard//kernel.nit:56 */
stack_frame_head = fra.me.prev;
return;
}
fra.me.has_broke = 0;
fra.me.REG_size = 0;
/* ./../lib/standard//kernel.nit:69 */
- fprintf(stderr, "Deferred method called");
- fprintf(stderr, " (%s:%d)\n", LOCATE_kernel, 69);
- nit_exit(1);
+ nit_abort("Deferred method called", NULL, LOCATE_kernel, 69);
stack_frame_head = fra.me.prev;
return NIT_NULL;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
+ /* ./../lib/standard//kernel.nit:73 */
REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- /* ./../lib/standard//kernel.nit:73 */
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
+ /* ./../lib/standard//kernel.nit:76 */
REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- /* ./../lib/standard//kernel.nit:76 */
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
/* ./../lib/standard//kernel.nit:79 */
+ REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
/* ./../lib/standard//kernel.nit:84 */
+ REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:85 */
REGB0 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:216 */
REGB0 = TAG_Int(-UNTAG_Int(REGB0));
/* ./../lib/standard//kernel.nit:85 */
goto label1;
} else {
- REGB1 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
/* ./../lib/standard//kernel.nit:86 */
+ REGB1 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
if (UNTAG_Bool(REGB1)) {
+ /* ./../lib/standard//kernel.nit:87 */
REGB1 = TAG_Int(1);
REGB0 = REGB1;
- /* ./../lib/standard//kernel.nit:87 */
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:89 */
REGB1 = TAG_Int(0);
REGB0 = REGB1;
- /* ./../lib/standard//kernel.nit:89 */
goto label1;
}
}
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
fra.me.REG[2] = p2;
- REGB0 = CALL_kernel___Comparable_____leq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
/* ./../lib/standard//kernel.nit:96 */
+ REGB0 = CALL_kernel___Comparable_____leq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
if (UNTAG_Bool(REGB0)) {
REGB0 = CALL_kernel___Comparable_____leq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
} else {
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
/* ./../lib/standard//kernel.nit:102 */
+ REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
if (UNTAG_Bool(REGB0)) {
/* ./../lib/standard//kernel.nit:103 */
goto label1;
} else {
- fra.me.REG[1] = fra.me.REG[0];
/* ./../lib/standard//kernel.nit:105 */
+ fra.me.REG[1] = fra.me.REG[0];
goto label1;
}
label1: while(0);
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
/* ./../lib/standard//kernel.nit:112 */
+ REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
if (UNTAG_Bool(REGB0)) {
/* ./../lib/standard//kernel.nit:113 */
goto label1;
} else {
- fra.me.REG[1] = fra.me.REG[0];
/* ./../lib/standard//kernel.nit:115 */
+ fra.me.REG[1] = fra.me.REG[0];
goto label1;
}
label1: while(0);
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
+ /* ./../lib/standard//kernel.nit:127 */
REGB0 = TAG_Int(1);
fra.me.REG[0] = CALL_kernel___Discrete_____plus(fra.me.REG[0])(fra.me.REG[0], REGB0);
- /* ./../lib/standard//kernel.nit:127 */
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
+ /* ./../lib/standard//kernel.nit:130 */
REGB0 = TAG_Int(1);
fra.me.REG[0] = CALL_kernel___Discrete_____minus(fra.me.REG[0])(fra.me.REG[0], REGB0);
- /* ./../lib/standard//kernel.nit:130 */
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
/* ./../lib/standard//kernel.nit:132 */
- fprintf(stderr, "Deferred method called");
- fprintf(stderr, " (%s:%d)\n", LOCATE_kernel, 132);
- nit_exit(1);
+ nit_abort("Deferred method called", NULL, LOCATE_kernel, 132);
stack_frame_head = fra.me.prev;
return NIT_NULL;
}
fra.me.has_broke = 0;
fra.me.REG_size = 0;
/* ./../lib/standard//kernel.nit:135 */
- fprintf(stderr, "Deferred method called");
- fprintf(stderr, " (%s:%d)\n", LOCATE_kernel, 135);
- nit_exit(1);
+ nit_abort("Deferred method called", NULL, LOCATE_kernel, 135);
stack_frame_head = fra.me.prev;
return NIT_NULL;
}
fra.me.REG[3] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
/* ./../lib/standard//kernel.nit:145 */
+ REGB0 = CALL_kernel___Comparable_____l(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:146 */
fra.me.REG[2] = fra.me.REG[0];
+ /* ./../lib/standard//kernel.nit:147 */
fra.me.REG[3] = fra.me.REG[1];
- /* ./../lib/standard//kernel.nit:147 */
} else {
- REGB0 = CALL_kernel___Comparable_____g(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
/* ./../lib/standard//kernel.nit:148 */
+ REGB0 = CALL_kernel___Comparable_____g(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:149 */
fra.me.REG[2] = fra.me.REG[1];
+ /* ./../lib/standard//kernel.nit:150 */
fra.me.REG[3] = fra.me.REG[0];
- /* ./../lib/standard//kernel.nit:150 */
} else {
- REGB0 = TAG_Int(0);
/* ./../lib/standard//kernel.nit:152 */
+ REGB0 = TAG_Int(0);
goto label1;
}
}
+ /* ./../lib/standard//kernel.nit:155 */
REGB1 = TAG_Int(0);
/* ./../lib/standard//kernel.nit:156 */
while(1) {
REGB2 = CALL_kernel___Comparable_____l(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:157 */
fra.me.REG[0] = CALL_kernel___Discrete___succ(fra.me.REG[2])(fra.me.REG[2]);
fra.me.REG[2] = fra.me.REG[0];
+ /* ./../lib/standard//kernel.nit:158 */
REGB2 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:215 */
REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
+ /* ./../lib/standard//kernel.nit:158 */
REGB1 = REGB2;
- /* ./../lib/standard//kernel.nit:158 */
} else {
/* ./../lib/standard//kernel.nit:156 */
goto label2;
}
}
label2: while(0);
- REGB0 = REGB1;
/* ./../lib/standard//kernel.nit:160 */
+ REGB0 = REGB1;
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB0 = TAG_Int(UNTAG_Bool(REGB0));
/* ./../lib/standard//kernel.nit:174 */
+ REGB0 = TAG_Int(UNTAG_Bool(REGB0));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
fra.me.REG[0] = p1;
- REGB0 = TAG_Bool((REGB0)==(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:175 */
+ REGB0 = TAG_Bool((REGB0)==(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
fra.me.REG[0] = p1;
- REGB0 = TAG_Bool((REGB0)!=(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:176 */
+ REGB0 = TAG_Bool((REGB0)!=(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
- REGB0 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:183 */
+ REGB0 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])<=UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:186 */
+ REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])<=UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])<UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:187 */
+ REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])<UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])>=UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:188 */
+ REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])>=UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])>UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:189 */
+ REGB0 = TAG_Bool(UNBOX_Float(fra.me.REG[0])>UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])+UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:190 */
+ fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])+UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
- fra.me.REG[0] = BOX_Float(-UNBOX_Float(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:191 */
+ fra.me.REG[0] = BOX_Float(-UNBOX_Float(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return fra.me.REG[0];
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])-UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:192 */
+ fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])-UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])*UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:193 */
+ fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])*UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
fra.me.REG[1] = NIT_NULL;
fra.me.REG[0] = p0;
fra.me.REG[1] = p1;
- fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])/UNBOX_Float(fra.me.REG[1]));
/* ./../lib/standard//kernel.nit:194 */
+ fra.me.REG[1] = BOX_Float(UNBOX_Float(fra.me.REG[0])/UNBOX_Float(fra.me.REG[1]));
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
- REGB0 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:196 */
+ REGB0 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG_size = 0;
REGB0 = p0;
/* ./../lib/standard//kernel.nit:206 */
+ REGB0 = REGB0;
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
fra.me.REG[0] = p1;
- REGB0 = TAG_Bool((REGB0)==(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:207 */
+ REGB0 = TAG_Bool((REGB0)==(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
fra.me.REG[0] = p1;
- REGB0 = TAG_Bool((REGB0)!=(fra.me.REG[0]));
/* ./../lib/standard//kernel.nit:208 */
+ REGB0 = TAG_Bool((REGB0)!=(fra.me.REG[0]));
stack_frame_head = fra.me.prev;
return REGB0;
}
stack_frame_head = fra.me.prev;
return;
}
-val_t kernel___Int_____l(val_t p0, val_t p1){
+val_t kernel___Int_____leq(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 212;
- fra.me.meth = LOCATE_kernel___Int_____l;
+ fra.me.line = 211;
+ fra.me.meth = LOCATE_kernel___Int_____leq;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:212 */
+ /* ./../lib/standard//kernel.nit:211 */
+ REGB1 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int_____leq(val_t p0, val_t p1){
+val_t kernel___Int_____l(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 211;
- fra.me.meth = LOCATE_kernel___Int_____leq;
+ fra.me.line = 212;
+ fra.me.meth = LOCATE_kernel___Int_____l;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:211 */
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
/* ./../lib/standard//kernel.nit:213 */
+ REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
/* ./../lib/standard//kernel.nit:214 */
+ REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int_____leqg(val_t p0, val_t p1){
+val_t kernel___Int_____plus(val_t p0, val_t p1){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 239;
- fra.me.meth = LOCATE_kernel___Int_____leqg;
+ fra.me.line = 215;
+ fra.me.meth = LOCATE_kernel___Int_____plus;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:241 */
- if (UNTAG_Bool(REGB2)) {
- REGB2 = TAG_Int(1);
- REGB2 = TAG_Int(-UNTAG_Int(REGB2));
- /* ./../lib/standard//kernel.nit:242 */
- goto label1;
- } else {
- REGB0 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:243 */
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Int(1);
- REGB2 = REGB0;
- /* ./../lib/standard//kernel.nit:244 */
- goto label1;
- } else {
- REGB0 = TAG_Int(0);
- REGB2 = REGB0;
- /* ./../lib/standard//kernel.nit:246 */
- goto label1;
- }
- }
- label1: while(0);
+ /* ./../lib/standard//kernel.nit:215 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
- return REGB2;
+ return REGB1;
}
-val_t kernel___Int___is_between(val_t p0, val_t p1, val_t p2){
+val_t kernel___Int___unary__minus(val_t p0){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 250;
- fra.me.meth = LOCATE_kernel___Int___is_between;
+ fra.me.line = 216;
+ fra.me.meth = LOCATE_kernel___Int___unary__minus;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB1 = p1;
- REGB2 = p2;
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:252 */
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(true);
- } else {
- REGB0 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB0));
- REGB1 = REGB0;
- /* ./../lib/standard//kernel.nit:252 */
- }
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(false);
- /* ./../lib/standard//kernel.nit:253 */
- goto label1;
- } else {
- REGB0 = TAG_Bool(true);
- REGB1 = REGB0;
- /* ./../lib/standard//kernel.nit:255 */
- goto label1;
- }
- label1: while(0);
+ /* ./../lib/standard//kernel.nit:216 */
+ REGB0 = TAG_Int(-UNTAG_Int(REGB0));
stack_frame_head = fra.me.prev;
- return REGB1;
+ return REGB0;
}
-val_t kernel___Int___max(val_t p0, val_t p1){
+val_t kernel___Int_____minus(val_t p0, val_t p1){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 259;
- fra.me.meth = LOCATE_kernel___Int___max;
+ fra.me.line = 217;
+ fra.me.meth = LOCATE_kernel___Int_____minus;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:261 */
- if (UNTAG_Bool(REGB2)) {
- /* ./../lib/standard//kernel.nit:262 */
- goto label1;
- } else {
- REGB1 = REGB0;
- /* ./../lib/standard//kernel.nit:264 */
- goto label1;
- }
- label1: while(0);
+ /* ./../lib/standard//kernel.nit:217 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int___min(val_t p0, val_t p1){
+val_t kernel___Int_____star(val_t p0, val_t p1){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 268;
- fra.me.meth = LOCATE_kernel___Int___min;
+ fra.me.line = 218;
+ fra.me.meth = LOCATE_kernel___Int_____star;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:270 */
- if (UNTAG_Bool(REGB2)) {
- /* ./../lib/standard//kernel.nit:271 */
- goto label1;
- } else {
- REGB1 = REGB0;
- /* ./../lib/standard//kernel.nit:273 */
- goto label1;
- }
- label1: while(0);
+ /* ./../lib/standard//kernel.nit:218 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)*UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int___succ(val_t p0){
+val_t kernel___Int_____slash(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 227;
- fra.me.meth = LOCATE_kernel___Int___succ;
+ fra.me.line = 219;
+ fra.me.meth = LOCATE_kernel___Int_____slash;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB0 = TAG_Int(UNTAG_Int(REGB0)+1);
- /* ./../lib/standard//kernel.nit:227 */
+ REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:219 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)/UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
- return REGB0;
+ return REGB1;
}
-val_t kernel___Int___prec(val_t p0){
+val_t kernel___Int_____percent(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 228;
- fra.me.meth = LOCATE_kernel___Int___prec;
+ fra.me.line = 220;
+ fra.me.meth = LOCATE_kernel___Int_____percent;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB0 = TAG_Int(UNTAG_Int(REGB0)-1);
- /* ./../lib/standard//kernel.nit:228 */
+ REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:220 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)%UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
- return REGB0;
+ return REGB1;
}
-val_t kernel___Int_____plus(val_t p0, val_t p1){
+val_t kernel___Int___lshift(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 215;
- fra.me.meth = LOCATE_kernel___Int_____plus;
+ fra.me.line = 221;
+ fra.me.meth = LOCATE_kernel___Int___lshift;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:215 */
+ /* ./../lib/standard//kernel.nit:221 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)<<UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int_____minus(val_t p0, val_t p1){
+val_t kernel___Int___rshift(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 217;
- fra.me.meth = LOCATE_kernel___Int_____minus;
+ fra.me.line = 222;
+ fra.me.meth = LOCATE_kernel___Int___rshift;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:217 */
+ /* ./../lib/standard//kernel.nit:222 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)>>UNTAG_Int(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int___distance(val_t p0, val_t p1){
+val_t kernel___Int___to_f(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_kernel;
- fra.me.line = 229;
- fra.me.meth = LOCATE_kernel___Int___distance;
+ fra.me.line = 224;
+ fra.me.meth = LOCATE_kernel___Int___to_f;
fra.me.has_broke = 0;
- fra.me.REG_size = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
- REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
- REGB0 = TAG_Int(0);
- REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:232 */
- if (UNTAG_Bool(REGB0)) {
- REGB0 = REGB1;
- /* ./../lib/standard//kernel.nit:233 */
- goto label1;
- } else {
- REGB1 = TAG_Int(-UNTAG_Int(REGB1));
- REGB0 = REGB1;
- /* ./../lib/standard//kernel.nit:235 */
- goto label1;
- }
- label1: while(0);
+ /* ./../lib/standard//kernel.nit:224 */
+ fra.me.REG[0] = BOX_Float((float)UNTAG_Int(REGB0));
stack_frame_head = fra.me.prev;
- return REGB0;
+ return fra.me.REG[0];
}
-val_t kernel___Int___unary__minus(val_t p0){
+val_t kernel___Int___succ(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_kernel;
- fra.me.line = 216;
- fra.me.meth = LOCATE_kernel___Int___unary__minus;
+ fra.me.line = 227;
+ fra.me.meth = LOCATE_kernel___Int___succ;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB0 = TAG_Int(-UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:216 */
+ /* ./../lib/standard//kernel.nit:227 */
+ REGB0 = TAG_Int(UNTAG_Int(REGB0)+1);
stack_frame_head = fra.me.prev;
return REGB0;
}
-val_t kernel___Int_____star(val_t p0, val_t p1){
+val_t kernel___Int___prec(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_kernel;
- fra.me.line = 218;
- fra.me.meth = LOCATE_kernel___Int_____star;
+ fra.me.line = 228;
+ fra.me.meth = LOCATE_kernel___Int___prec;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)*UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:218 */
+ /* ./../lib/standard//kernel.nit:228 */
+ REGB0 = TAG_Int(UNTAG_Int(REGB0)-1);
stack_frame_head = fra.me.prev;
- return REGB1;
+ return REGB0;
}
-val_t kernel___Int_____slash(val_t p0, val_t p1){
+val_t kernel___Int___distance(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 219;
- fra.me.meth = LOCATE_kernel___Int_____slash;
+ fra.me.line = 229;
+ fra.me.meth = LOCATE_kernel___Int___distance;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)/UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:219 */
+ /* ./../lib/standard//kernel.nit:217 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:232 */
+ REGB0 = TAG_Int(0);
+ /* ./../lib/standard//kernel.nit:213 */
+ REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0));
+ /* ./../lib/standard//kernel.nit:232 */
+ if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:233 */
+ REGB0 = REGB1;
+ goto label1;
+ } else {
+ /* ./../lib/standard//kernel.nit:216 */
+ REGB1 = TAG_Int(-UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:235 */
+ REGB0 = REGB1;
+ goto label1;
+ }
+ label1: while(0);
stack_frame_head = fra.me.prev;
- return REGB1;
+ return REGB0;
}
-val_t kernel___Int_____percent(val_t p0, val_t p1){
+val_t kernel___Int_____leqg(val_t p0, val_t p1){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 220;
- fra.me.meth = LOCATE_kernel___Int_____percent;
+ fra.me.line = 239;
+ fra.me.meth = LOCATE_kernel___Int_____leqg;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)%UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:220 */
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:241 */
+ if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:242 */
+ REGB2 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:216 */
+ REGB2 = TAG_Int(-UNTAG_Int(REGB2));
+ /* ./../lib/standard//kernel.nit:242 */
+ goto label1;
+ } else {
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB0 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
+ /* ./../lib/standard//kernel.nit:243 */
+ if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:244 */
+ REGB0 = TAG_Int(1);
+ REGB2 = REGB0;
+ goto label1;
+ } else {
+ /* ./../lib/standard//kernel.nit:246 */
+ REGB0 = TAG_Int(0);
+ REGB2 = REGB0;
+ goto label1;
+ }
+ }
+ label1: while(0);
stack_frame_head = fra.me.prev;
- return REGB1;
+ return REGB2;
}
-val_t kernel___Int___lshift(val_t p0, val_t p1){
+val_t kernel___Int___is_between(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 tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 221;
- fra.me.meth = LOCATE_kernel___Int___lshift;
+ fra.me.line = 250;
+ fra.me.meth = LOCATE_kernel___Int___is_between;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)<<UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:221 */
+ REGB2 = p2;
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:252 */
+ if (UNTAG_Bool(REGB1)) {
+ REGB1 = TAG_Bool(true);
+ } else {
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB0 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB0));
+ /* ./../lib/standard//kernel.nit:252 */
+ REGB1 = REGB0;
+ }
+ if (UNTAG_Bool(REGB1)) {
+ /* ./../lib/standard//kernel.nit:253 */
+ REGB1 = TAG_Bool(false);
+ goto label1;
+ } else {
+ /* ./../lib/standard//kernel.nit:255 */
+ REGB0 = TAG_Bool(true);
+ REGB1 = REGB0;
+ goto label1;
+ }
+ label1: while(0);
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int___rshift(val_t p0, val_t p1){
+val_t kernel___Int___max(val_t p0, val_t p1){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 222;
- fra.me.meth = LOCATE_kernel___Int___rshift;
+ fra.me.line = 259;
+ fra.me.meth = LOCATE_kernel___Int___max;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Int(UNTAG_Int(REGB0)>>UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:222 */
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:261 */
+ if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:262 */
+ goto label1;
+ } else {
+ /* ./../lib/standard//kernel.nit:264 */
+ REGB1 = REGB0;
+ goto label1;
+ }
+ label1: while(0);
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Int___to_f(val_t p0){
+val_t kernel___Int___min(val_t p0, val_t p1){
struct {struct stack_frame_t me;} 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_kernel;
- fra.me.line = 224;
- fra.me.meth = LOCATE_kernel___Int___to_f;
+ fra.me.line = 268;
+ fra.me.meth = LOCATE_kernel___Int___min;
fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
+ fra.me.REG_size = 0;
REGB0 = p0;
- fra.me.REG[0] = BOX_Float((float)UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:224 */
+ REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
+ /* ./../lib/standard//kernel.nit:270 */
+ if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:271 */
+ goto label1;
+ } else {
+ /* ./../lib/standard//kernel.nit:273 */
+ REGB1 = REGB0;
+ goto label1;
+ }
+ label1: while(0);
stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
+ return REGB1;
}
val_t kernel___Int___ascii(val_t p0){
struct {struct stack_frame_t me;} fra;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB0 = TAG_Char(UNTAG_Int(REGB0));
/* ./../lib/standard//kernel.nit:277 */
+ REGB0 = TAG_Char(UNTAG_Int(REGB0));
stack_frame_head = fra.me.prev;
return REGB0;
}
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:286 */
REGB2 = TAG_Int(0);
+ /* ./../lib/standard//kernel.nit:212 */
REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
/* ./../lib/standard//kernel.nit:286 */
if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:287 */
REGB2 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:216 */
REGB3 = TAG_Int(-UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:288 */
} else {
+ /* ./../lib/standard//kernel.nit:289 */
REGB4 = TAG_Int(0);
REGB5 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB4));
- /* ./../lib/standard//kernel.nit:289 */
if (UNTAG_Bool(REGB5)) {
} else {
+ /* ./../lib/standard//kernel.nit:207 */
REGB4 = TAG_Bool((REGB0)==(REGB4));
+ /* ./../lib/standard//kernel.nit:289 */
REGB5 = REGB4;
- /* ./../lib/standard//kernel.nit:289 */
}
if (UNTAG_Bool(REGB5)) {
- REGB5 = TAG_Int(1);
/* ./../lib/standard//kernel.nit:290 */
+ REGB5 = TAG_Int(1);
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:292 */
REGB4 = TAG_Int(0);
REGB2 = REGB4;
+ /* ./../lib/standard//kernel.nit:293 */
REGB3 = REGB0;
- /* ./../lib/standard//kernel.nit:293 */
}
}
/* ./../lib/standard//kernel.nit:296 */
while(1) {
REGB0 = TAG_Int(0);
+ /* ./../lib/standard//kernel.nit:214 */
REGB0 = TAG_Bool(UNTAG_Int(REGB3)>UNTAG_Int(REGB0));
/* ./../lib/standard//kernel.nit:296 */
if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:297 */
REGB0 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:215 */
REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
+ /* ./../lib/standard//kernel.nit:297 */
REGB2 = REGB0;
+ /* ./../lib/standard//kernel.nit:219 */
REGB0 = TAG_Int(UNTAG_Int(REGB3)/UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:298 */
REGB3 = REGB0;
- /* ./../lib/standard//kernel.nit:298 */
} else {
/* ./../lib/standard//kernel.nit:296 */
goto label2;
}
}
label2: while(0);
- REGB5 = REGB2;
/* ./../lib/standard//kernel.nit:300 */
+ REGB5 = REGB2;
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:308 */
REGB1 = TAG_Int(0);
+ /* ./../lib/standard//kernel.nit:213 */
REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
/* ./../lib/standard//kernel.nit:308 */
if (UNTAG_Bool(REGB1)) {
REGB1 = TAG_Int(36);
+ /* ./../lib/standard//kernel.nit:211 */
REGB1 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
- /* ./../lib/standard//kernel.nit:308 */
} else {
+ /* ./../lib/standard//kernel.nit:308 */
REGB2 = TAG_Bool(false);
REGB1 = REGB2;
}
if (UNTAG_Bool(REGB1)) {
} else {
- fprintf(stderr, "Assert failed");
- fprintf(stderr, " (%s:%d)\n", LOCATE_kernel, 308);
- nit_exit(1);
+ nit_abort("Assert failed", NULL, LOCATE_kernel, 308);
}
+ /* ./../lib/standard//kernel.nit:309 */
REGB1 = TAG_Int(10);
+ /* ./../lib/standard//kernel.nit:212 */
REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
/* ./../lib/standard//kernel.nit:309 */
if (UNTAG_Bool(REGB1)) {
+ /* ./../lib/standard//kernel.nit:310 */
REGB1 = TAG_Char('0');
+ /* ./../lib/standard//kernel.nit:382 */
REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
+ /* ./../lib/standard//kernel.nit:215 */
REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:277 */
REGB1 = TAG_Char(UNTAG_Int(REGB1));
/* ./../lib/standard//kernel.nit:310 */
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:312 */
REGB2 = TAG_Char('a');
+ /* ./../lib/standard//kernel.nit:382 */
REGB2 = TAG_Int((unsigned char)UNTAG_Char(REGB2));
+ /* ./../lib/standard//kernel.nit:312 */
REGB3 = TAG_Int(10);
+ /* ./../lib/standard//kernel.nit:217 */
REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
+ /* ./../lib/standard//kernel.nit:215 */
REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+ /* ./../lib/standard//kernel.nit:277 */
REGB3 = TAG_Char(UNTAG_Int(REGB3));
- REGB1 = REGB3;
/* ./../lib/standard//kernel.nit:312 */
+ REGB1 = REGB3;
goto label1;
}
label1: while(0);
stack_frame_head = fra.me.prev;
return REGB1;
}
+void kernel___Int___enumerate_to(val_t p0, val_t p1, struct stack_frame_t *closctx_param, fun_t clos_fun0){
+ struct {struct stack_frame_t me;} fra;
+ val_t REGB0;
+ val_t REGB1;
+ val_t REGB2;
+ fun_t CREG[1];
+ val_t tmp;
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_kernel;
+ fra.me.line = 316;
+ fra.me.meth = LOCATE_kernel___Int___enumerate_to;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ fra.me.closure_ctx = closctx_param;
+ fra.me.closure_funs = CREG;
+ REGB0 = p0;
+ REGB1 = p1;
+ CREG[0] = clos_fun0;
+ /* ./../lib/standard//kernel.nit:321 */
+ while(1) {
+ /* ./../lib/standard//kernel.nit:211 */
+ REGB2 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:321 */
+ if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:322 */
+ ((void (*)(struct stack_frame_t *, val_t))(CREG[0]))(closctx_param, REGB0);
+ if (closctx_param->has_broke) {
+ goto label1;
+ }
+ /* ./../lib/standard//kernel.nit:323 */
+ REGB2 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:215 */
+ REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+ /* ./../lib/standard//kernel.nit:323 */
+ REGB0 = REGB2;
+ } else {
+ /* ./../lib/standard//kernel.nit:321 */
+ goto label2;
+ }
+ }
+ label2: while(0);
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return;
+}
+void kernel___Int___enumerate_before(val_t p0, val_t p1, struct stack_frame_t *closctx_param, fun_t clos_fun0){
+ struct {struct stack_frame_t me;} fra;
+ val_t REGB0;
+ val_t REGB1;
+ val_t REGB2;
+ fun_t CREG[1];
+ val_t tmp;
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_kernel;
+ fra.me.line = 327;
+ fra.me.meth = LOCATE_kernel___Int___enumerate_before;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ fra.me.closure_ctx = closctx_param;
+ fra.me.closure_funs = CREG;
+ REGB0 = p0;
+ REGB1 = p1;
+ CREG[0] = clos_fun0;
+ /* ./../lib/standard//kernel.nit:332 */
+ while(1) {
+ /* ./../lib/standard//kernel.nit:212 */
+ REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:332 */
+ if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:333 */
+ ((void (*)(struct stack_frame_t *, val_t))(CREG[0]))(closctx_param, REGB0);
+ if (closctx_param->has_broke) {
+ goto label1;
+ }
+ /* ./../lib/standard//kernel.nit:334 */
+ REGB2 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:215 */
+ REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+ /* ./../lib/standard//kernel.nit:334 */
+ REGB0 = REGB2;
+ } else {
+ /* ./../lib/standard//kernel.nit:332 */
+ goto label2;
+ }
+ }
+ label2: while(0);
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return;
+}
val_t kernel___Char___object_id(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_kernel;
- fra.me.line = 324;
+ fra.me.line = 346;
fra.me.meth = LOCATE_kernel___Char___object_id;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:346 */
REGB0 = TAG_Int(UNTAG_Char(REGB0));
- /* ./../lib/standard//kernel.nit:324 */
stack_frame_head = fra.me.prev;
return REGB0;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 325;
+ fra.me.line = 347;
fra.me.meth = LOCATE_kernel___Char_____eqeq;
fra.me.has_broke = 0;
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
fra.me.REG[0] = p1;
+ /* ./../lib/standard//kernel.nit:347 */
REGB0 = TAG_Bool((REGB0)==(fra.me.REG[0]));
- /* ./../lib/standard//kernel.nit:325 */
stack_frame_head = fra.me.prev;
return REGB0;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 326;
+ fra.me.line = 348;
fra.me.meth = LOCATE_kernel___Char_____neq;
fra.me.has_broke = 0;
fra.me.REG_size = 1;
fra.me.REG[0] = NIT_NULL;
REGB0 = p0;
fra.me.REG[0] = p1;
+ /* ./../lib/standard//kernel.nit:348 */
REGB0 = TAG_Bool((REGB0)!=(fra.me.REG[0]));
- /* ./../lib/standard//kernel.nit:326 */
stack_frame_head = fra.me.prev;
return REGB0;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 327;
+ fra.me.line = 349;
fra.me.meth = LOCATE_kernel___Char___output;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- /* ./../lib/standard//kernel.nit:327 */
+ /* ./../lib/standard//kernel.nit:349 */
printf("%c", (unsigned char)UNTAG_Char(REGB0));;
stack_frame_head = fra.me.prev;
return;
}
-val_t kernel___Char_____l(val_t p0, val_t p1){
+val_t kernel___Char_____leq(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 330;
- fra.me.meth = LOCATE_kernel___Char_____l;
+ fra.me.line = 351;
+ fra.me.meth = LOCATE_kernel___Char_____leq;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)<UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:330 */
+ /* ./../lib/standard//kernel.nit:351 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
-val_t kernel___Char_____leq(val_t p0, val_t p1){
+val_t kernel___Char_____l(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 329;
- fra.me.meth = LOCATE_kernel___Char_____leq;
+ fra.me.line = 352;
+ fra.me.meth = LOCATE_kernel___Char_____l;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:329 */
+ /* ./../lib/standard//kernel.nit:352 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)<UNTAG_Char(REGB1));
stack_frame_head = fra.me.prev;
return REGB1;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 331;
+ fra.me.line = 353;
fra.me.meth = LOCATE_kernel___Char_____geq;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:353 */
REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:331 */
stack_frame_head = fra.me.prev;
return REGB1;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 332;
+ fra.me.line = 354;
fra.me.meth = LOCATE_kernel___Char_____g;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:354 */
REGB1 = TAG_Bool(UNTAG_Char(REGB0)>UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:332 */
stack_frame_head = fra.me.prev;
return REGB1;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 334;
+ fra.me.line = 356;
fra.me.meth = LOCATE_kernel___Char___succ;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:356 */
REGB0 = TAG_Char(UNTAG_Char(REGB0)+1);
- /* ./../lib/standard//kernel.nit:334 */
stack_frame_head = fra.me.prev;
return REGB0;
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 335;
+ fra.me.line = 357;
fra.me.meth = LOCATE_kernel___Char___prec;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:357 */
REGB0 = TAG_Char(UNTAG_Char(REGB0)-1);
- /* ./../lib/standard//kernel.nit:335 */
stack_frame_head = fra.me.prev;
return REGB0;
}
-val_t kernel___Char_____plus(val_t p0, val_t p1){
- 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_kernel;
- fra.me.line = 363;
- fra.me.meth = LOCATE_kernel___Char_____plus;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- REGB0 = p0;
- REGB1 = p1;
- REGB1 = TAG_Char(UNTAG_Char(REGB0)+UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:363 */
- stack_frame_head = fra.me.prev;
- return REGB1;
-}
-val_t kernel___Char_____minus(val_t p0, val_t p1){
- 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_kernel;
- fra.me.line = 364;
- fra.me.meth = LOCATE_kernel___Char_____minus;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- REGB0 = p0;
- REGB1 = p1;
- REGB1 = TAG_Char(UNTAG_Char(REGB0)-UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:364 */
- stack_frame_head = fra.me.prev;
- return REGB1;
-}
val_t kernel___Char___distance(val_t p0, val_t p1){
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_kernel;
- fra.me.line = 337;
+ fra.me.line = 359;
fra.me.meth = LOCATE_kernel___Char___distance;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:382 */
REGB0 = TAG_Int((unsigned char)UNTAG_Char(REGB0));
REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
+ /* ./../lib/standard//kernel.nit:217 */
REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:362 */
REGB0 = TAG_Int(0);
+ /* ./../lib/standard//kernel.nit:213 */
REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0));
- /* ./../lib/standard//kernel.nit:340 */
+ /* ./../lib/standard//kernel.nit:362 */
if (UNTAG_Bool(REGB0)) {
+ /* ./../lib/standard//kernel.nit:363 */
REGB0 = REGB1;
- /* ./../lib/standard//kernel.nit:341 */
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:216 */
REGB1 = TAG_Int(-UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:365 */
REGB0 = REGB1;
- /* ./../lib/standard//kernel.nit:343 */
goto label1;
}
label1: while(0);
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 347;
+ fra.me.line = 369;
fra.me.meth = LOCATE_kernel___Char___to_i;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:373 */
REGB1 = TAG_Char('-');
REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- /* ./../lib/standard//kernel.nit:351 */
if (UNTAG_Bool(REGB2)) {
} else {
+ /* ./../lib/standard//kernel.nit:347 */
REGB1 = TAG_Bool((REGB0)==(REGB1));
+ /* ./../lib/standard//kernel.nit:373 */
REGB2 = REGB1;
- /* ./../lib/standard//kernel.nit:351 */
}
if (UNTAG_Bool(REGB2)) {
+ /* ./../lib/standard//kernel.nit:374 */
REGB2 = TAG_Int(1);
+ /* ./../lib/standard//kernel.nit:216 */
REGB2 = TAG_Int(-UNTAG_Int(REGB2));
- /* ./../lib/standard//kernel.nit:352 */
+ /* ./../lib/standard//kernel.nit:374 */
goto label1;
} else {
- REGB1 = TAG_Char('0');
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:353 */
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Char('9');
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:353 */
- } else {
- REGB3 = TAG_Bool(false);
- REGB1 = REGB3;
- }
+ /* ./../lib/standard//kernel.nit:375 */
+ REGB1 = CALL_kernel___Char___is_digit(REGB0)(REGB0);
if (UNTAG_Bool(REGB1)) {
+ /* ./../lib/standard//kernel.nit:382 */
REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB0));
+ /* ./../lib/standard//kernel.nit:376 */
REGB3 = TAG_Char('0');
+ /* ./../lib/standard//kernel.nit:382 */
REGB3 = TAG_Int((unsigned char)UNTAG_Char(REGB3));
+ /* ./../lib/standard//kernel.nit:217 */
REGB3 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB3));
+ /* ./../lib/standard//kernel.nit:376 */
REGB2 = REGB3;
- /* ./../lib/standard//kernel.nit:354 */
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:378 */
REGB0 = CALL_kernel___Char___to_lower(REGB0)(REGB0);
+ /* ./../lib/standard//kernel.nit:382 */
REGB0 = TAG_Int((unsigned char)UNTAG_Char(REGB0));
+ /* ./../lib/standard//kernel.nit:378 */
REGB3 = TAG_Char('a');
+ /* ./../lib/standard//kernel.nit:382 */
REGB3 = TAG_Int((unsigned char)UNTAG_Char(REGB3));
+ /* ./../lib/standard//kernel.nit:378 */
REGB1 = TAG_Int(10);
+ /* ./../lib/standard//kernel.nit:215 */
REGB1 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:217 */
REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+ /* ./../lib/standard//kernel.nit:378 */
REGB2 = REGB1;
- /* ./../lib/standard//kernel.nit:356 */
goto label1;
}
}
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 360;
+ fra.me.line = 382;
fra.me.meth = LOCATE_kernel___Char___ascii;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:382 */
REGB0 = TAG_Int((unsigned char)UNTAG_Char(REGB0));
- /* ./../lib/standard//kernel.nit:360 */
stack_frame_head = fra.me.prev;
return REGB0;
}
+val_t kernel___Char_____plus(val_t p0, val_t p1){
+ 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_kernel;
+ fra.me.line = 385;
+ fra.me.meth = LOCATE_kernel___Char_____plus;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ REGB0 = p0;
+ REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:385 */
+ REGB1 = TAG_Char(UNTAG_Char(REGB0)+UNTAG_Char(REGB1));
+ stack_frame_head = fra.me.prev;
+ return REGB1;
+}
+val_t kernel___Char_____minus(val_t p0, val_t p1){
+ 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_kernel;
+ fra.me.line = 386;
+ fra.me.meth = LOCATE_kernel___Char_____minus;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ REGB0 = p0;
+ REGB1 = p1;
+ /* ./../lib/standard//kernel.nit:386 */
+ REGB1 = TAG_Char(UNTAG_Char(REGB0)-UNTAG_Char(REGB1));
+ stack_frame_head = fra.me.prev;
+ return REGB1;
+}
val_t kernel___Char___to_lower(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_kernel;
- fra.me.line = 366;
+ fra.me.line = 388;
fra.me.meth = LOCATE_kernel___Char___to_lower;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB1 = TAG_Char('A');
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:369 */
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Char('Z');
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:369 */
- } else {
- REGB2 = TAG_Bool(false);
- REGB1 = REGB2;
- }
+ /* ./../lib/standard//kernel.nit:391 */
+ REGB1 = CALL_kernel___Char___is_upper(REGB0)(REGB0);
if (UNTAG_Bool(REGB1)) {
+ /* ./../lib/standard//kernel.nit:382 */
REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB0));
+ /* ./../lib/standard//kernel.nit:392 */
REGB2 = TAG_Char('a');
REGB3 = TAG_Char('A');
REGB3 = CALL_kernel___Discrete___distance(REGB2)(REGB2, REGB3);
+ /* ./../lib/standard//kernel.nit:215 */
REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
+ /* ./../lib/standard//kernel.nit:277 */
REGB3 = TAG_Char(UNTAG_Int(REGB3));
- /* ./../lib/standard//kernel.nit:370 */
+ /* ./../lib/standard//kernel.nit:392 */
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:394 */
REGB3 = REGB0;
- /* ./../lib/standard//kernel.nit:372 */
goto label1;
}
label1: while(0);
val_t tmp;
fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
fra.me.file = LOCATE_kernel;
- fra.me.line = 376;
+ fra.me.line = 398;
fra.me.meth = LOCATE_kernel___Char___to_upper;
fra.me.has_broke = 0;
fra.me.REG_size = 0;
REGB0 = p0;
- REGB1 = TAG_Char('a');
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:379 */
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Char('z');
- REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
- /* ./../lib/standard//kernel.nit:379 */
- } else {
- REGB2 = TAG_Bool(false);
- REGB1 = REGB2;
- }
+ /* ./../lib/standard//kernel.nit:401 */
+ REGB1 = CALL_kernel___Char___is_lower(REGB0)(REGB0);
if (UNTAG_Bool(REGB1)) {
+ /* ./../lib/standard//kernel.nit:382 */
REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB0));
+ /* ./../lib/standard//kernel.nit:402 */
REGB2 = TAG_Char('a');
REGB3 = TAG_Char('A');
REGB3 = CALL_kernel___Discrete___distance(REGB2)(REGB2, REGB3);
+ /* ./../lib/standard//kernel.nit:217 */
REGB3 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB3));
+ /* ./../lib/standard//kernel.nit:277 */
REGB3 = TAG_Char(UNTAG_Int(REGB3));
- /* ./../lib/standard//kernel.nit:380 */
+ /* ./../lib/standard//kernel.nit:402 */
goto label1;
} else {
+ /* ./../lib/standard//kernel.nit:404 */
REGB3 = REGB0;
- /* ./../lib/standard//kernel.nit:382 */
goto label1;
}
label1: while(0);
stack_frame_head = fra.me.prev;
return REGB3;
}
+val_t kernel___Char___is_digit(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_kernel;
+ fra.me.line = 408;
+ fra.me.meth = LOCATE_kernel___Char___is_digit;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:410 */
+ REGB1 = TAG_Char('0');
+ /* ./../lib/standard//kernel.nit:353 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
+ /* ./../lib/standard//kernel.nit:410 */
+ if (UNTAG_Bool(REGB1)) {
+ REGB1 = TAG_Char('9');
+ /* ./../lib/standard//kernel.nit:351 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
+ } else {
+ /* ./../lib/standard//kernel.nit:410 */
+ REGB0 = TAG_Bool(false);
+ REGB1 = REGB0;
+ }
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB1;
+}
+val_t kernel___Char___is_lower(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_kernel;
+ fra.me.line = 413;
+ fra.me.meth = LOCATE_kernel___Char___is_lower;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:415 */
+ REGB1 = TAG_Char('a');
+ /* ./../lib/standard//kernel.nit:353 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
+ /* ./../lib/standard//kernel.nit:415 */
+ if (UNTAG_Bool(REGB1)) {
+ REGB1 = TAG_Char('z');
+ /* ./../lib/standard//kernel.nit:351 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
+ } else {
+ /* ./../lib/standard//kernel.nit:415 */
+ REGB0 = TAG_Bool(false);
+ REGB1 = REGB0;
+ }
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB1;
+}
+val_t kernel___Char___is_upper(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_kernel;
+ fra.me.line = 418;
+ fra.me.meth = LOCATE_kernel___Char___is_upper;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:420 */
+ REGB1 = TAG_Char('A');
+ /* ./../lib/standard//kernel.nit:353 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
+ /* ./../lib/standard//kernel.nit:420 */
+ if (UNTAG_Bool(REGB1)) {
+ REGB1 = TAG_Char('Z');
+ /* ./../lib/standard//kernel.nit:351 */
+ REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
+ } else {
+ /* ./../lib/standard//kernel.nit:420 */
+ REGB0 = TAG_Bool(false);
+ REGB1 = REGB0;
+ }
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB1;
+}
+val_t kernel___Char___is_letter(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_kernel;
+ fra.me.line = 423;
+ fra.me.meth = LOCATE_kernel___Char___is_letter;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 0;
+ REGB0 = p0;
+ /* ./../lib/standard//kernel.nit:425 */
+ REGB1 = CALL_kernel___Char___is_lower(REGB0)(REGB0);
+ if (UNTAG_Bool(REGB1)) {
+ REGB1 = TAG_Bool(true);
+ } else {
+ REGB0 = CALL_kernel___Char___is_upper(REGB0)(REGB0);
+ REGB1 = REGB0;
+ }
+ goto label1;
+ label1: while(0);
+ stack_frame_head = fra.me.prev;
+ return REGB1;
+}