1 /* This C file is generated by NIT to compile module standard___kernel. */
2 #include "standard___kernel._sep.h"
3 val_t
standard___kernel___Object___object_id(val_t p0
){
4 struct {struct stack_frame_t me
;} fra
;
7 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
8 fra
.me
.file
= LOCATE_standard___kernel
;
10 fra
.me
.meth
= LOCATE_standard___kernel___Object___object_id
;
13 fra
.me
.nitni_local_ref_head
= NULL
;
14 fra
.me
.REG
[0] = NIT_NULL
;
16 /* ../lib/standard/kernel.nit:28 */
17 REGB0
= TAG_Int((bigint
)((obj_t
)fra
.me
.REG
[0])[1].object_id
);
18 stack_frame_head
= fra
.me
.prev
;
21 val_t
standard___kernel___Object___is_same_type(val_t p0
, val_t p1
){
22 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
25 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
26 fra
.me
.file
= LOCATE_standard___kernel
;
28 fra
.me
.meth
= LOCATE_standard___kernel___Object___is_same_type
;
31 fra
.me
.nitni_local_ref_head
= NULL
;
32 fra
.me
.REG
[0] = NIT_NULL
;
33 fra
.me
.REG
[1] = NIT_NULL
;
36 /* ../lib/standard/kernel.nit:33 */
37 REGB0
= TAG_Bool((VAL2VFT(fra
.me
.REG
[0])==VAL2VFT(fra
.me
.REG
[1])));
38 stack_frame_head
= fra
.me
.prev
;
41 val_t
standard___kernel___Object_____eqeq(val_t p0
, val_t p1
){
42 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
45 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
46 fra
.me
.file
= LOCATE_standard___kernel
;
48 fra
.me
.meth
= LOCATE_standard___kernel___Object_____eqeq
;
51 fra
.me
.nitni_local_ref_head
= NULL
;
52 fra
.me
.REG
[0] = NIT_NULL
;
53 fra
.me
.REG
[1] = NIT_NULL
;
56 /* ../lib/standard/kernel.nit:41 */
57 REGB0
= TAG_Bool(IS_EQUAL_ON(fra
.me
.REG
[0],fra
.me
.REG
[1]));
60 stack_frame_head
= fra
.me
.prev
;
63 val_t
standard___kernel___Object_____neq(val_t p0
, val_t p1
){
64 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
68 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
69 fra
.me
.file
= LOCATE_standard___kernel
;
71 fra
.me
.meth
= LOCATE_standard___kernel___Object_____neq
;
74 fra
.me
.nitni_local_ref_head
= NULL
;
75 fra
.me
.REG
[0] = NIT_NULL
;
76 fra
.me
.REG
[1] = NIT_NULL
;
79 /* ../lib/standard/kernel.nit:46 */
80 REGB0
= TAG_Bool(IS_EQUAL_ON(fra
.me
.REG
[0],fra
.me
.REG
[1]));
81 if (UNTAG_Bool(REGB0
)) {
83 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
86 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
89 stack_frame_head
= fra
.me
.prev
;
92 void standard___kernel___Object___output(val_t p0
){
93 struct {struct stack_frame_t me
;} fra
;
96 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
97 fra
.me
.file
= LOCATE_standard___kernel
;
99 fra
.me
.meth
= LOCATE_standard___kernel___Object___output
;
100 fra
.me
.has_broke
= 0;
102 fra
.me
.nitni_local_ref_head
= NULL
;
103 fra
.me
.REG
[0] = NIT_NULL
;
105 /* ../lib/standard/kernel.nit:52 */
106 REGB0
= TAG_Char('<');
107 /* ../lib/standard/kernel.nit:380 */
108 printf("%c", (unsigned char)UNTAG_Char(REGB0
));;
109 /* ../lib/standard/kernel.nit:53 */
110 REGB0
= CALL_standard___kernel___Object___object_id(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
111 /* ../lib/standard/kernel.nit:229 */
112 printf("%ld\n", UNTAG_Int(REGB0
));;
113 /* ../lib/standard/kernel.nit:54 */
114 REGB0
= TAG_Char('>');
115 /* ../lib/standard/kernel.nit:380 */
116 printf("%c", (unsigned char)UNTAG_Char(REGB0
));;
117 stack_frame_head
= fra
.me
.prev
;
120 void standard___kernel___Object___output_class_name(val_t p0
){
121 struct {struct stack_frame_t me
;} fra
;
123 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
124 fra
.me
.file
= LOCATE_standard___kernel
;
126 fra
.me
.meth
= LOCATE_standard___kernel___Object___output_class_name
;
127 fra
.me
.has_broke
= 0;
129 fra
.me
.nitni_local_ref_head
= NULL
;
130 fra
.me
.REG
[0] = NIT_NULL
;
132 /* ../lib/standard/kernel.nit:57 */
133 printf("%s\n", VAL2VFT(fra
.me
.REG
[0])[2].cname
);;
134 stack_frame_head
= fra
.me
.prev
;
137 void standard___kernel___Object___exit(val_t p0
, val_t p1
){
138 struct {struct stack_frame_t me
;} fra
;
141 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
142 fra
.me
.file
= LOCATE_standard___kernel
;
144 fra
.me
.meth
= LOCATE_standard___kernel___Object___exit
;
145 fra
.me
.has_broke
= 0;
147 fra
.me
.nitni_local_ref_head
= NULL
;
148 fra
.me
.REG
[0] = NIT_NULL
;
151 /* ../lib/standard/kernel.nit:61 */
152 exit(UNTAG_Int(REGB0
));;
153 stack_frame_head
= fra
.me
.prev
;
156 val_t
standard___kernel___Object___sys(val_t p0
){
157 struct {struct stack_frame_t me
;} fra
;
159 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
160 fra
.me
.file
= LOCATE_standard___kernel
;
162 fra
.me
.meth
= LOCATE_standard___kernel___Object___sys
;
163 fra
.me
.has_broke
= 0;
165 fra
.me
.nitni_local_ref_head
= NULL
;
166 fra
.me
.REG
[0] = NIT_NULL
;
168 /* ../lib/standard/kernel.nit:64 */
169 fra
.me
.REG
[0] = (G_sys
);
170 stack_frame_head
= fra
.me
.prev
;
171 return fra
.me
.REG
[0];
173 void standard___kernel___Sys___main(val_t p0
){
174 struct {struct stack_frame_t me
;} fra
;
176 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
177 fra
.me
.file
= LOCATE_standard___kernel
;
179 fra
.me
.meth
= LOCATE_standard___kernel___Sys___main
;
180 fra
.me
.has_broke
= 0;
182 fra
.me
.nitni_local_ref_head
= NULL
;
183 fra
.me
.REG
[0] = NIT_NULL
;
185 stack_frame_head
= fra
.me
.prev
;
188 void standard___kernel___Sys___init(val_t p0
, int* init_table
){
189 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_standard___kernel___Sys
].i
;
190 struct {struct stack_frame_t me
;} fra
;
192 if (init_table
[itpos0
]) return;
193 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
194 fra
.me
.file
= LOCATE_standard___kernel
;
196 fra
.me
.meth
= LOCATE_standard___kernel___Sys___init
;
197 fra
.me
.has_broke
= 0;
199 fra
.me
.nitni_local_ref_head
= NULL
;
200 stack_frame_head
= fra
.me
.prev
;
201 init_table
[itpos0
] = 1;
204 val_t
standard___kernel___Comparable_____l(val_t p0
, val_t p1
){
205 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
208 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
209 fra
.me
.file
= LOCATE_standard___kernel
;
211 fra
.me
.meth
= LOCATE_standard___kernel___Comparable_____l
;
212 fra
.me
.has_broke
= 0;
214 fra
.me
.nitni_local_ref_head
= NULL
;
215 fra
.me
.REG
[0] = NIT_NULL
;
216 fra
.me
.REG
[1] = NIT_NULL
;
219 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
220 if (UNTAG_Bool(REGB0
)) {
222 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
224 /* ../lib/standard/kernel.nit:86 */
225 nit_abort("Deferred method called", NULL
, LOCATE_standard___kernel
, 86);
226 stack_frame_head
= fra
.me
.prev
;
229 val_t
standard___kernel___Comparable_____leq(val_t p0
, val_t p1
){
230 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
233 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
234 fra
.me
.file
= LOCATE_standard___kernel
;
236 fra
.me
.meth
= LOCATE_standard___kernel___Comparable_____leq
;
237 fra
.me
.has_broke
= 0;
239 fra
.me
.nitni_local_ref_head
= NULL
;
240 fra
.me
.REG
[0] = NIT_NULL
;
241 fra
.me
.REG
[1] = NIT_NULL
;
244 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
245 if (UNTAG_Bool(REGB0
)) {
247 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
249 /* ../lib/standard/kernel.nit:91 */
250 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
251 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
254 stack_frame_head
= fra
.me
.prev
;
257 val_t
standard___kernel___Comparable_____geq(val_t p0
, val_t p1
){
258 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
261 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
262 fra
.me
.file
= LOCATE_standard___kernel
;
264 fra
.me
.meth
= LOCATE_standard___kernel___Comparable_____geq
;
265 fra
.me
.has_broke
= 0;
267 fra
.me
.nitni_local_ref_head
= NULL
;
268 fra
.me
.REG
[0] = NIT_NULL
;
269 fra
.me
.REG
[1] = NIT_NULL
;
272 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
273 if (UNTAG_Bool(REGB0
)) {
275 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
277 /* ../lib/standard/kernel.nit:95 */
278 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
279 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
282 stack_frame_head
= fra
.me
.prev
;
285 val_t
standard___kernel___Comparable_____g(val_t p0
, val_t p1
){
286 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
289 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
290 fra
.me
.file
= LOCATE_standard___kernel
;
292 fra
.me
.meth
= LOCATE_standard___kernel___Comparable_____g
;
293 fra
.me
.has_broke
= 0;
295 fra
.me
.nitni_local_ref_head
= NULL
;
296 fra
.me
.REG
[0] = NIT_NULL
;
297 fra
.me
.REG
[1] = NIT_NULL
;
300 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
301 if (UNTAG_Bool(REGB0
)) {
303 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
305 /* ../lib/standard/kernel.nit:98 */
306 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
309 stack_frame_head
= fra
.me
.prev
;
312 val_t
standard___kernel___Comparable_____leqg(val_t p0
, val_t p1
){
313 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
317 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
318 fra
.me
.file
= LOCATE_standard___kernel
;
320 fra
.me
.meth
= LOCATE_standard___kernel___Comparable_____leqg
;
321 fra
.me
.has_broke
= 0;
323 fra
.me
.nitni_local_ref_head
= NULL
;
324 fra
.me
.REG
[0] = NIT_NULL
;
325 fra
.me
.REG
[1] = NIT_NULL
;
328 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
329 if (UNTAG_Bool(REGB0
)) {
331 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
333 /* ../lib/standard/kernel.nit:104 */
334 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
335 if (UNTAG_Bool(REGB0
)) {
336 /* ../lib/standard/kernel.nit:105 */
338 /* ../lib/standard/kernel.nit:236 */
339 REGB0
= TAG_Int(-UNTAG_Int(REGB0
));
340 /* ../lib/standard/kernel.nit:105 */
343 /* ../lib/standard/kernel.nit:106 */
344 REGB1
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
345 if (UNTAG_Bool(REGB1
)) {
346 /* ../lib/standard/kernel.nit:107 */
351 /* ../lib/standard/kernel.nit:109 */
358 stack_frame_head
= fra
.me
.prev
;
361 val_t
standard___kernel___Comparable___is_between(val_t p0
, val_t p1
, val_t p2
){
362 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
366 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
367 fra
.me
.file
= LOCATE_standard___kernel
;
369 fra
.me
.meth
= LOCATE_standard___kernel___Comparable___is_between
;
370 fra
.me
.has_broke
= 0;
372 fra
.me
.nitni_local_ref_head
= NULL
;
373 fra
.me
.REG
[0] = NIT_NULL
;
374 fra
.me
.REG
[1] = NIT_NULL
;
375 fra
.me
.REG
[2] = NIT_NULL
;
379 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
380 if (UNTAG_Bool(REGB0
)) {
382 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
384 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[2], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
385 if (UNTAG_Bool(REGB0
)) {
387 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
389 /* ../lib/standard/kernel.nit:116 */
390 REGB0
= CALL_standard___kernel___Comparable_____leq(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
391 if (UNTAG_Bool(REGB0
)) {
392 REGB0
= CALL_standard___kernel___Comparable_____leq(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
394 REGB1
= TAG_Bool(false);
399 stack_frame_head
= fra
.me
.prev
;
402 val_t
standard___kernel___Comparable___max(val_t p0
, val_t p1
){
403 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
406 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
407 fra
.me
.file
= LOCATE_standard___kernel
;
409 fra
.me
.meth
= LOCATE_standard___kernel___Comparable___max
;
410 fra
.me
.has_broke
= 0;
412 fra
.me
.nitni_local_ref_head
= NULL
;
413 fra
.me
.REG
[0] = NIT_NULL
;
414 fra
.me
.REG
[1] = NIT_NULL
;
417 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
418 if (UNTAG_Bool(REGB0
)) {
420 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
422 /* ../lib/standard/kernel.nit:122 */
423 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
424 if (UNTAG_Bool(REGB0
)) {
425 /* ../lib/standard/kernel.nit:123 */
428 /* ../lib/standard/kernel.nit:125 */
429 fra
.me
.REG
[1] = fra
.me
.REG
[0];
433 stack_frame_head
= fra
.me
.prev
;
434 return fra
.me
.REG
[1];
436 val_t
standard___kernel___Comparable___min(val_t p0
, val_t p1
){
437 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
440 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
441 fra
.me
.file
= LOCATE_standard___kernel
;
443 fra
.me
.meth
= LOCATE_standard___kernel___Comparable___min
;
444 fra
.me
.has_broke
= 0;
446 fra
.me
.nitni_local_ref_head
= NULL
;
447 fra
.me
.REG
[0] = NIT_NULL
;
448 fra
.me
.REG
[1] = NIT_NULL
;
451 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
452 if (UNTAG_Bool(REGB0
)) {
454 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
456 /* ../lib/standard/kernel.nit:132 */
457 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
458 if (UNTAG_Bool(REGB0
)) {
459 /* ../lib/standard/kernel.nit:133 */
462 /* ../lib/standard/kernel.nit:135 */
463 fra
.me
.REG
[1] = fra
.me
.REG
[0];
467 stack_frame_head
= fra
.me
.prev
;
468 return fra
.me
.REG
[1];
470 val_t
standard___kernel___Discrete___succ(val_t p0
){
471 struct {struct stack_frame_t me
;} fra
;
474 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
475 fra
.me
.file
= LOCATE_standard___kernel
;
477 fra
.me
.meth
= LOCATE_standard___kernel___Discrete___succ
;
478 fra
.me
.has_broke
= 0;
480 fra
.me
.nitni_local_ref_head
= NULL
;
481 fra
.me
.REG
[0] = NIT_NULL
;
483 /* ../lib/standard/kernel.nit:147 */
485 fra
.me
.REG
[0] = CALL_standard___kernel___Discrete_____plus(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
488 stack_frame_head
= fra
.me
.prev
;
489 return fra
.me
.REG
[0];
491 val_t
standard___kernel___Discrete___prec(val_t p0
){
492 struct {struct stack_frame_t me
;} fra
;
495 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
496 fra
.me
.file
= LOCATE_standard___kernel
;
498 fra
.me
.meth
= LOCATE_standard___kernel___Discrete___prec
;
499 fra
.me
.has_broke
= 0;
501 fra
.me
.nitni_local_ref_head
= NULL
;
502 fra
.me
.REG
[0] = NIT_NULL
;
504 /* ../lib/standard/kernel.nit:150 */
506 fra
.me
.REG
[0] = CALL_standard___kernel___Discrete_____minus(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
509 stack_frame_head
= fra
.me
.prev
;
510 return fra
.me
.REG
[0];
512 val_t
standard___kernel___Discrete_____plus(val_t p0
, val_t p1
){
513 struct {struct stack_frame_t me
;} fra
;
515 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
516 fra
.me
.file
= LOCATE_standard___kernel
;
518 fra
.me
.meth
= LOCATE_standard___kernel___Discrete_____plus
;
519 fra
.me
.has_broke
= 0;
521 fra
.me
.nitni_local_ref_head
= NULL
;
522 /* ../lib/standard/kernel.nit:152 */
523 nit_abort("Deferred method called", NULL
, LOCATE_standard___kernel
, 152);
524 stack_frame_head
= fra
.me
.prev
;
527 val_t
standard___kernel___Discrete_____minus(val_t p0
, val_t p1
){
528 struct {struct stack_frame_t me
;} fra
;
530 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
531 fra
.me
.file
= LOCATE_standard___kernel
;
533 fra
.me
.meth
= LOCATE_standard___kernel___Discrete_____minus
;
534 fra
.me
.has_broke
= 0;
536 fra
.me
.nitni_local_ref_head
= NULL
;
537 /* ../lib/standard/kernel.nit:155 */
538 nit_abort("Deferred method called", NULL
, LOCATE_standard___kernel
, 155);
539 stack_frame_head
= fra
.me
.prev
;
542 val_t
standard___kernel___Discrete___distance(val_t p0
, val_t p1
){
543 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
548 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
549 fra
.me
.file
= LOCATE_standard___kernel
;
551 fra
.me
.meth
= LOCATE_standard___kernel___Discrete___distance
;
552 fra
.me
.has_broke
= 0;
554 fra
.me
.nitni_local_ref_head
= NULL
;
555 fra
.me
.REG
[0] = NIT_NULL
;
556 fra
.me
.REG
[1] = NIT_NULL
;
557 fra
.me
.REG
[2] = NIT_NULL
;
558 fra
.me
.REG
[3] = NIT_NULL
;
561 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]), VTID_standard___kernel___Comparable___OTHER(fra
.me
.REG
[0]))) /*cast OTHER*/;
562 if (UNTAG_Bool(REGB0
)) {
564 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
566 /* ../lib/standard/kernel.nit:165 */
567 REGB0
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
568 if (UNTAG_Bool(REGB0
)) {
569 /* ../lib/standard/kernel.nit:166 */
570 fra
.me
.REG
[2] = fra
.me
.REG
[0];
571 /* ../lib/standard/kernel.nit:167 */
572 fra
.me
.REG
[3] = fra
.me
.REG
[1];
574 /* ../lib/standard/kernel.nit:168 */
575 REGB0
= CALL_standard___kernel___Comparable_____g(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
576 if (UNTAG_Bool(REGB0
)) {
577 /* ../lib/standard/kernel.nit:169 */
578 fra
.me
.REG
[2] = fra
.me
.REG
[1];
579 /* ../lib/standard/kernel.nit:170 */
580 fra
.me
.REG
[3] = fra
.me
.REG
[0];
582 /* ../lib/standard/kernel.nit:172 */
587 /* ../lib/standard/kernel.nit:175 */
589 /* ../lib/standard/kernel.nit:176 */
591 REGB2
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
592 if (UNTAG_Bool(REGB2
)) {
593 /* ../lib/standard/kernel.nit:177 */
594 fra
.me
.REG
[0] = CALL_standard___kernel___Discrete___succ(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
595 fra
.me
.REG
[2] = fra
.me
.REG
[0];
596 /* ../lib/standard/kernel.nit:178 */
598 /* ../lib/standard/kernel.nit:235 */
599 REGB2
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB2
));
600 /* ../lib/standard/kernel.nit:178 */
603 /* ../lib/standard/kernel.nit:176 */
608 /* ../lib/standard/kernel.nit:180 */
612 stack_frame_head
= fra
.me
.prev
;
615 val_t
standard___kernel___Bool___object_id(val_t p0
){
616 struct {struct stack_frame_t me
;} fra
;
619 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
620 fra
.me
.file
= LOCATE_standard___kernel
;
622 fra
.me
.meth
= LOCATE_standard___kernel___Bool___object_id
;
623 fra
.me
.has_broke
= 0;
625 fra
.me
.nitni_local_ref_head
= NULL
;
627 /* ../lib/standard/kernel.nit:194 */
628 REGB0
= TAG_Int(UNTAG_Bool(REGB0
));
629 stack_frame_head
= fra
.me
.prev
;
632 val_t
standard___kernel___Bool_____eqeq(val_t p0
, val_t p1
){
633 struct {struct stack_frame_t me
;} fra
;
636 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
637 fra
.me
.file
= LOCATE_standard___kernel
;
639 fra
.me
.meth
= LOCATE_standard___kernel___Bool_____eqeq
;
640 fra
.me
.has_broke
= 0;
642 fra
.me
.nitni_local_ref_head
= NULL
;
643 fra
.me
.REG
[0] = NIT_NULL
;
646 /* ../lib/standard/kernel.nit:195 */
647 REGB0
= TAG_Bool((REGB0
)==(fra
.me
.REG
[0]));
648 stack_frame_head
= fra
.me
.prev
;
651 val_t
standard___kernel___Bool_____neq(val_t p0
, val_t p1
){
652 struct {struct stack_frame_t me
;} fra
;
655 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
656 fra
.me
.file
= LOCATE_standard___kernel
;
658 fra
.me
.meth
= LOCATE_standard___kernel___Bool_____neq
;
659 fra
.me
.has_broke
= 0;
661 fra
.me
.nitni_local_ref_head
= NULL
;
662 fra
.me
.REG
[0] = NIT_NULL
;
665 /* ../lib/standard/kernel.nit:196 */
666 REGB0
= TAG_Bool((REGB0
)!=(fra
.me
.REG
[0]));
667 stack_frame_head
= fra
.me
.prev
;
670 void standard___kernel___Bool___output(val_t p0
){
671 struct {struct stack_frame_t me
;} fra
;
674 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
675 fra
.me
.file
= LOCATE_standard___kernel
;
677 fra
.me
.meth
= LOCATE_standard___kernel___Bool___output
;
678 fra
.me
.has_broke
= 0;
680 fra
.me
.nitni_local_ref_head
= NULL
;
682 /* ../lib/standard/kernel.nit:197 */
683 (void)printf(UNTAG_Bool(REGB0
)?
"true\n":"false\n");;
684 stack_frame_head
= fra
.me
.prev
;
687 val_t
standard___kernel___Float___object_id(val_t p0
){
688 struct {struct stack_frame_t me
;} fra
;
691 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
692 fra
.me
.file
= LOCATE_standard___kernel
;
694 fra
.me
.meth
= LOCATE_standard___kernel___Float___object_id
;
695 fra
.me
.has_broke
= 0;
697 fra
.me
.nitni_local_ref_head
= NULL
;
698 fra
.me
.REG
[0] = NIT_NULL
;
700 /* ../lib/standard/kernel.nit:203 */
701 REGB0
= TAG_Int((bigint
)UNBOX_Float(fra
.me
.REG
[0]));
702 stack_frame_head
= fra
.me
.prev
;
705 void standard___kernel___Float___output(val_t p0
){
706 struct {struct stack_frame_t me
;} fra
;
708 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
709 fra
.me
.file
= LOCATE_standard___kernel
;
711 fra
.me
.meth
= LOCATE_standard___kernel___Float___output
;
712 fra
.me
.has_broke
= 0;
714 fra
.me
.nitni_local_ref_head
= NULL
;
715 fra
.me
.REG
[0] = NIT_NULL
;
717 /* ../lib/standard/kernel.nit:204 */
718 printf("%f\n", UNBOX_Float(fra
.me
.REG
[0]));;
719 stack_frame_head
= fra
.me
.prev
;
722 val_t
standard___kernel___Float_____leq(val_t p0
, val_t p1
){
723 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
726 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
727 fra
.me
.file
= LOCATE_standard___kernel
;
729 fra
.me
.meth
= LOCATE_standard___kernel___Float_____leq
;
730 fra
.me
.has_broke
= 0;
732 fra
.me
.nitni_local_ref_head
= NULL
;
733 fra
.me
.REG
[0] = NIT_NULL
;
734 fra
.me
.REG
[1] = NIT_NULL
;
737 /* ../lib/standard/kernel.nit:206 */
738 REGB0
= TAG_Bool(UNBOX_Float(fra
.me
.REG
[0])<=UNBOX_Float(fra
.me
.REG
[1]));
739 stack_frame_head
= fra
.me
.prev
;
742 val_t
standard___kernel___Float_____l(val_t p0
, val_t p1
){
743 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
746 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
747 fra
.me
.file
= LOCATE_standard___kernel
;
749 fra
.me
.meth
= LOCATE_standard___kernel___Float_____l
;
750 fra
.me
.has_broke
= 0;
752 fra
.me
.nitni_local_ref_head
= NULL
;
753 fra
.me
.REG
[0] = NIT_NULL
;
754 fra
.me
.REG
[1] = NIT_NULL
;
757 /* ../lib/standard/kernel.nit:207 */
758 REGB0
= TAG_Bool(UNBOX_Float(fra
.me
.REG
[0])<UNBOX_Float(fra
.me
.REG
[1]));
759 stack_frame_head
= fra
.me
.prev
;
762 val_t
standard___kernel___Float_____geq(val_t p0
, val_t p1
){
763 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
766 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
767 fra
.me
.file
= LOCATE_standard___kernel
;
769 fra
.me
.meth
= LOCATE_standard___kernel___Float_____geq
;
770 fra
.me
.has_broke
= 0;
772 fra
.me
.nitni_local_ref_head
= NULL
;
773 fra
.me
.REG
[0] = NIT_NULL
;
774 fra
.me
.REG
[1] = NIT_NULL
;
777 /* ../lib/standard/kernel.nit:208 */
778 REGB0
= TAG_Bool(UNBOX_Float(fra
.me
.REG
[0])>=UNBOX_Float(fra
.me
.REG
[1]));
779 stack_frame_head
= fra
.me
.prev
;
782 val_t
standard___kernel___Float_____g(val_t p0
, val_t p1
){
783 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
786 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
787 fra
.me
.file
= LOCATE_standard___kernel
;
789 fra
.me
.meth
= LOCATE_standard___kernel___Float_____g
;
790 fra
.me
.has_broke
= 0;
792 fra
.me
.nitni_local_ref_head
= NULL
;
793 fra
.me
.REG
[0] = NIT_NULL
;
794 fra
.me
.REG
[1] = NIT_NULL
;
797 /* ../lib/standard/kernel.nit:209 */
798 REGB0
= TAG_Bool(UNBOX_Float(fra
.me
.REG
[0])>UNBOX_Float(fra
.me
.REG
[1]));
799 stack_frame_head
= fra
.me
.prev
;
802 val_t
standard___kernel___Float_____plus(val_t p0
, val_t p1
){
803 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
805 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
806 fra
.me
.file
= LOCATE_standard___kernel
;
808 fra
.me
.meth
= LOCATE_standard___kernel___Float_____plus
;
809 fra
.me
.has_broke
= 0;
811 fra
.me
.nitni_local_ref_head
= NULL
;
812 fra
.me
.REG
[0] = NIT_NULL
;
813 fra
.me
.REG
[1] = NIT_NULL
;
816 /* ../lib/standard/kernel.nit:210 */
817 fra
.me
.REG
[1] = BOX_Float(UNBOX_Float(fra
.me
.REG
[0])+UNBOX_Float(fra
.me
.REG
[1]));
818 stack_frame_head
= fra
.me
.prev
;
819 return fra
.me
.REG
[1];
821 val_t
standard___kernel___Float___unary__minus(val_t p0
){
822 struct {struct stack_frame_t me
;} fra
;
824 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
825 fra
.me
.file
= LOCATE_standard___kernel
;
827 fra
.me
.meth
= LOCATE_standard___kernel___Float___unary__minus
;
828 fra
.me
.has_broke
= 0;
830 fra
.me
.nitni_local_ref_head
= NULL
;
831 fra
.me
.REG
[0] = NIT_NULL
;
833 /* ../lib/standard/kernel.nit:211 */
834 fra
.me
.REG
[0] = BOX_Float(-UNBOX_Float(fra
.me
.REG
[0]));
835 stack_frame_head
= fra
.me
.prev
;
836 return fra
.me
.REG
[0];
838 val_t
standard___kernel___Float_____minus(val_t p0
, val_t p1
){
839 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
841 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
842 fra
.me
.file
= LOCATE_standard___kernel
;
844 fra
.me
.meth
= LOCATE_standard___kernel___Float_____minus
;
845 fra
.me
.has_broke
= 0;
847 fra
.me
.nitni_local_ref_head
= NULL
;
848 fra
.me
.REG
[0] = NIT_NULL
;
849 fra
.me
.REG
[1] = NIT_NULL
;
852 /* ../lib/standard/kernel.nit:212 */
853 fra
.me
.REG
[1] = BOX_Float(UNBOX_Float(fra
.me
.REG
[0])-UNBOX_Float(fra
.me
.REG
[1]));
854 stack_frame_head
= fra
.me
.prev
;
855 return fra
.me
.REG
[1];
857 val_t
standard___kernel___Float_____star(val_t p0
, val_t p1
){
858 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
860 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
861 fra
.me
.file
= LOCATE_standard___kernel
;
863 fra
.me
.meth
= LOCATE_standard___kernel___Float_____star
;
864 fra
.me
.has_broke
= 0;
866 fra
.me
.nitni_local_ref_head
= NULL
;
867 fra
.me
.REG
[0] = NIT_NULL
;
868 fra
.me
.REG
[1] = NIT_NULL
;
871 /* ../lib/standard/kernel.nit:213 */
872 fra
.me
.REG
[1] = BOX_Float(UNBOX_Float(fra
.me
.REG
[0])*UNBOX_Float(fra
.me
.REG
[1]));
873 stack_frame_head
= fra
.me
.prev
;
874 return fra
.me
.REG
[1];
876 val_t
standard___kernel___Float_____slash(val_t p0
, val_t p1
){
877 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
879 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
880 fra
.me
.file
= LOCATE_standard___kernel
;
882 fra
.me
.meth
= LOCATE_standard___kernel___Float_____slash
;
883 fra
.me
.has_broke
= 0;
885 fra
.me
.nitni_local_ref_head
= NULL
;
886 fra
.me
.REG
[0] = NIT_NULL
;
887 fra
.me
.REG
[1] = NIT_NULL
;
890 /* ../lib/standard/kernel.nit:214 */
891 fra
.me
.REG
[1] = BOX_Float(UNBOX_Float(fra
.me
.REG
[0])/UNBOX_Float(fra
.me
.REG
[1]));
892 stack_frame_head
= fra
.me
.prev
;
893 return fra
.me
.REG
[1];
895 val_t
standard___kernel___Float___to_i(val_t p0
){
896 struct {struct stack_frame_t me
;} fra
;
899 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
900 fra
.me
.file
= LOCATE_standard___kernel
;
902 fra
.me
.meth
= LOCATE_standard___kernel___Float___to_i
;
903 fra
.me
.has_broke
= 0;
905 fra
.me
.nitni_local_ref_head
= NULL
;
906 fra
.me
.REG
[0] = NIT_NULL
;
908 /* ../lib/standard/kernel.nit:216 */
909 REGB0
= TAG_Int((bigint
)UNBOX_Float(fra
.me
.REG
[0]));
910 stack_frame_head
= fra
.me
.prev
;
913 val_t
standard___kernel___Int___object_id(val_t p0
){
914 struct {struct stack_frame_t me
;} fra
;
917 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
918 fra
.me
.file
= LOCATE_standard___kernel
;
920 fra
.me
.meth
= LOCATE_standard___kernel___Int___object_id
;
921 fra
.me
.has_broke
= 0;
923 fra
.me
.nitni_local_ref_head
= NULL
;
925 /* ../lib/standard/kernel.nit:226 */
927 stack_frame_head
= fra
.me
.prev
;
930 val_t
standard___kernel___Int_____eqeq(val_t p0
, val_t p1
){
931 struct {struct stack_frame_t me
;} fra
;
934 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
935 fra
.me
.file
= LOCATE_standard___kernel
;
937 fra
.me
.meth
= LOCATE_standard___kernel___Int_____eqeq
;
938 fra
.me
.has_broke
= 0;
940 fra
.me
.nitni_local_ref_head
= NULL
;
941 fra
.me
.REG
[0] = NIT_NULL
;
944 /* ../lib/standard/kernel.nit:227 */
945 REGB0
= TAG_Bool((REGB0
)==(fra
.me
.REG
[0]));
946 stack_frame_head
= fra
.me
.prev
;
949 val_t
standard___kernel___Int_____neq(val_t p0
, val_t p1
){
950 struct {struct stack_frame_t me
;} fra
;
953 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
954 fra
.me
.file
= LOCATE_standard___kernel
;
956 fra
.me
.meth
= LOCATE_standard___kernel___Int_____neq
;
957 fra
.me
.has_broke
= 0;
959 fra
.me
.nitni_local_ref_head
= NULL
;
960 fra
.me
.REG
[0] = NIT_NULL
;
963 /* ../lib/standard/kernel.nit:228 */
964 REGB0
= TAG_Bool((REGB0
)!=(fra
.me
.REG
[0]));
965 stack_frame_head
= fra
.me
.prev
;
968 void standard___kernel___Int___output(val_t p0
){
969 struct {struct stack_frame_t me
;} fra
;
972 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
973 fra
.me
.file
= LOCATE_standard___kernel
;
975 fra
.me
.meth
= LOCATE_standard___kernel___Int___output
;
976 fra
.me
.has_broke
= 0;
978 fra
.me
.nitni_local_ref_head
= NULL
;
980 /* ../lib/standard/kernel.nit:229 */
981 printf("%ld\n", UNTAG_Int(REGB0
));;
982 stack_frame_head
= fra
.me
.prev
;
985 val_t
standard___kernel___Int_____leq(val_t p0
, val_t p1
){
986 struct {struct stack_frame_t me
;} fra
;
991 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
992 fra
.me
.file
= LOCATE_standard___kernel
;
994 fra
.me
.meth
= LOCATE_standard___kernel___Int_____leq
;
995 fra
.me
.has_broke
= 0;
997 fra
.me
.nitni_local_ref_head
= NULL
;
1000 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1001 if (UNTAG_Bool(REGB2
)) {
1003 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1005 /* ../lib/standard/kernel.nit:231 */
1006 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<=UNTAG_Int(REGB1
));
1007 stack_frame_head
= fra
.me
.prev
;
1010 val_t
standard___kernel___Int_____l(val_t p0
, val_t p1
){
1011 struct {struct stack_frame_t me
;} fra
;
1016 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1017 fra
.me
.file
= LOCATE_standard___kernel
;
1019 fra
.me
.meth
= LOCATE_standard___kernel___Int_____l
;
1020 fra
.me
.has_broke
= 0;
1021 fra
.me
.REG_size
= 0;
1022 fra
.me
.nitni_local_ref_head
= NULL
;
1025 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1026 if (UNTAG_Bool(REGB2
)) {
1028 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1030 /* ../lib/standard/kernel.nit:232 */
1031 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1032 stack_frame_head
= fra
.me
.prev
;
1035 val_t
standard___kernel___Int_____geq(val_t p0
, val_t p1
){
1036 struct {struct stack_frame_t me
;} fra
;
1041 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1042 fra
.me
.file
= LOCATE_standard___kernel
;
1044 fra
.me
.meth
= LOCATE_standard___kernel___Int_____geq
;
1045 fra
.me
.has_broke
= 0;
1046 fra
.me
.REG_size
= 0;
1047 fra
.me
.nitni_local_ref_head
= NULL
;
1050 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1051 if (UNTAG_Bool(REGB2
)) {
1053 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1055 /* ../lib/standard/kernel.nit:233 */
1056 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
1057 stack_frame_head
= fra
.me
.prev
;
1060 val_t
standard___kernel___Int_____g(val_t p0
, val_t p1
){
1061 struct {struct stack_frame_t me
;} fra
;
1066 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1067 fra
.me
.file
= LOCATE_standard___kernel
;
1069 fra
.me
.meth
= LOCATE_standard___kernel___Int_____g
;
1070 fra
.me
.has_broke
= 0;
1071 fra
.me
.REG_size
= 0;
1072 fra
.me
.nitni_local_ref_head
= NULL
;
1075 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1076 if (UNTAG_Bool(REGB2
)) {
1078 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1080 /* ../lib/standard/kernel.nit:234 */
1081 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB1
));
1082 stack_frame_head
= fra
.me
.prev
;
1085 val_t
standard___kernel___Int_____plus(val_t p0
, val_t p1
){
1086 struct {struct stack_frame_t me
;} fra
;
1090 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1091 fra
.me
.file
= LOCATE_standard___kernel
;
1093 fra
.me
.meth
= LOCATE_standard___kernel___Int_____plus
;
1094 fra
.me
.has_broke
= 0;
1095 fra
.me
.REG_size
= 0;
1096 fra
.me
.nitni_local_ref_head
= NULL
;
1099 /* ../lib/standard/kernel.nit:235 */
1100 REGB1
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB1
));
1101 stack_frame_head
= fra
.me
.prev
;
1104 val_t
standard___kernel___Int___unary__minus(val_t p0
){
1105 struct {struct stack_frame_t me
;} fra
;
1108 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1109 fra
.me
.file
= LOCATE_standard___kernel
;
1111 fra
.me
.meth
= LOCATE_standard___kernel___Int___unary__minus
;
1112 fra
.me
.has_broke
= 0;
1113 fra
.me
.REG_size
= 0;
1114 fra
.me
.nitni_local_ref_head
= NULL
;
1116 /* ../lib/standard/kernel.nit:236 */
1117 REGB0
= TAG_Int(-UNTAG_Int(REGB0
));
1118 stack_frame_head
= fra
.me
.prev
;
1121 val_t
standard___kernel___Int_____minus(val_t p0
, val_t p1
){
1122 struct {struct stack_frame_t me
;} fra
;
1126 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1127 fra
.me
.file
= LOCATE_standard___kernel
;
1129 fra
.me
.meth
= LOCATE_standard___kernel___Int_____minus
;
1130 fra
.me
.has_broke
= 0;
1131 fra
.me
.REG_size
= 0;
1132 fra
.me
.nitni_local_ref_head
= NULL
;
1135 /* ../lib/standard/kernel.nit:237 */
1136 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
1137 stack_frame_head
= fra
.me
.prev
;
1140 val_t
standard___kernel___Int_____star(val_t p0
, val_t p1
){
1141 struct {struct stack_frame_t me
;} fra
;
1145 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1146 fra
.me
.file
= LOCATE_standard___kernel
;
1148 fra
.me
.meth
= LOCATE_standard___kernel___Int_____star
;
1149 fra
.me
.has_broke
= 0;
1150 fra
.me
.REG_size
= 0;
1151 fra
.me
.nitni_local_ref_head
= NULL
;
1154 /* ../lib/standard/kernel.nit:238 */
1155 REGB1
= TAG_Int(UNTAG_Int(REGB0
)*UNTAG_Int(REGB1
));
1156 stack_frame_head
= fra
.me
.prev
;
1159 val_t
standard___kernel___Int_____slash(val_t p0
, val_t p1
){
1160 struct {struct stack_frame_t me
;} fra
;
1164 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1165 fra
.me
.file
= LOCATE_standard___kernel
;
1167 fra
.me
.meth
= LOCATE_standard___kernel___Int_____slash
;
1168 fra
.me
.has_broke
= 0;
1169 fra
.me
.REG_size
= 0;
1170 fra
.me
.nitni_local_ref_head
= NULL
;
1173 /* ../lib/standard/kernel.nit:239 */
1174 REGB1
= TAG_Int(UNTAG_Int(REGB0
)/UNTAG_Int(REGB1
));
1175 stack_frame_head
= fra
.me
.prev
;
1178 val_t
standard___kernel___Int_____percent(val_t p0
, val_t p1
){
1179 struct {struct stack_frame_t me
;} fra
;
1183 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1184 fra
.me
.file
= LOCATE_standard___kernel
;
1186 fra
.me
.meth
= LOCATE_standard___kernel___Int_____percent
;
1187 fra
.me
.has_broke
= 0;
1188 fra
.me
.REG_size
= 0;
1189 fra
.me
.nitni_local_ref_head
= NULL
;
1192 /* ../lib/standard/kernel.nit:240 */
1193 REGB1
= TAG_Int(UNTAG_Int(REGB0
)%UNTAG_Int(REGB1
));
1194 stack_frame_head
= fra
.me
.prev
;
1197 val_t
standard___kernel___Int___lshift(val_t p0
, val_t p1
){
1198 struct {struct stack_frame_t me
;} fra
;
1202 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1203 fra
.me
.file
= LOCATE_standard___kernel
;
1205 fra
.me
.meth
= LOCATE_standard___kernel___Int___lshift
;
1206 fra
.me
.has_broke
= 0;
1207 fra
.me
.REG_size
= 0;
1208 fra
.me
.nitni_local_ref_head
= NULL
;
1211 /* ../lib/standard/kernel.nit:241 */
1212 REGB1
= TAG_Int(UNTAG_Int(REGB0
)<<UNTAG_Int(REGB1
));
1213 stack_frame_head
= fra
.me
.prev
;
1216 val_t
standard___kernel___Int___rshift(val_t p0
, val_t p1
){
1217 struct {struct stack_frame_t me
;} fra
;
1221 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1222 fra
.me
.file
= LOCATE_standard___kernel
;
1224 fra
.me
.meth
= LOCATE_standard___kernel___Int___rshift
;
1225 fra
.me
.has_broke
= 0;
1226 fra
.me
.REG_size
= 0;
1227 fra
.me
.nitni_local_ref_head
= NULL
;
1230 /* ../lib/standard/kernel.nit:242 */
1231 REGB1
= TAG_Int(UNTAG_Int(REGB0
)>>UNTAG_Int(REGB1
));
1232 stack_frame_head
= fra
.me
.prev
;
1235 val_t
standard___kernel___Int___to_f(val_t p0
){
1236 struct {struct stack_frame_t me
;} fra
;
1239 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1240 fra
.me
.file
= LOCATE_standard___kernel
;
1242 fra
.me
.meth
= LOCATE_standard___kernel___Int___to_f
;
1243 fra
.me
.has_broke
= 0;
1244 fra
.me
.REG_size
= 1;
1245 fra
.me
.nitni_local_ref_head
= NULL
;
1246 fra
.me
.REG
[0] = NIT_NULL
;
1248 /* ../lib/standard/kernel.nit:244 */
1249 fra
.me
.REG
[0] = BOX_Float((float)UNTAG_Int(REGB0
));
1250 stack_frame_head
= fra
.me
.prev
;
1251 return fra
.me
.REG
[0];
1253 val_t
standard___kernel___Int___succ(val_t p0
){
1254 struct {struct stack_frame_t me
;} fra
;
1257 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1258 fra
.me
.file
= LOCATE_standard___kernel
;
1260 fra
.me
.meth
= LOCATE_standard___kernel___Int___succ
;
1261 fra
.me
.has_broke
= 0;
1262 fra
.me
.REG_size
= 0;
1263 fra
.me
.nitni_local_ref_head
= NULL
;
1265 /* ../lib/standard/kernel.nit:247 */
1266 REGB0
= TAG_Int(UNTAG_Int(REGB0
)+1);
1267 stack_frame_head
= fra
.me
.prev
;
1270 val_t
standard___kernel___Int___prec(val_t p0
){
1271 struct {struct stack_frame_t me
;} fra
;
1274 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1275 fra
.me
.file
= LOCATE_standard___kernel
;
1277 fra
.me
.meth
= LOCATE_standard___kernel___Int___prec
;
1278 fra
.me
.has_broke
= 0;
1279 fra
.me
.REG_size
= 0;
1280 fra
.me
.nitni_local_ref_head
= NULL
;
1282 /* ../lib/standard/kernel.nit:248 */
1283 REGB0
= TAG_Int(UNTAG_Int(REGB0
)-1);
1284 stack_frame_head
= fra
.me
.prev
;
1287 val_t
standard___kernel___Int___distance(val_t p0
, val_t p1
){
1288 struct {struct stack_frame_t me
;} fra
;
1293 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1294 fra
.me
.file
= LOCATE_standard___kernel
;
1296 fra
.me
.meth
= LOCATE_standard___kernel___Int___distance
;
1297 fra
.me
.has_broke
= 0;
1298 fra
.me
.REG_size
= 0;
1299 fra
.me
.nitni_local_ref_head
= NULL
;
1302 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1303 if (UNTAG_Bool(REGB2
)) {
1305 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1307 /* ../lib/standard/kernel.nit:237 */
1308 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
1309 /* ../lib/standard/kernel.nit:252 */
1311 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1312 if (UNTAG_Bool(REGB2
)) {
1314 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1316 /* ../lib/standard/kernel.nit:233 */
1317 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB0
));
1318 /* ../lib/standard/kernel.nit:252 */
1319 if (UNTAG_Bool(REGB0
)) {
1320 /* ../lib/standard/kernel.nit:253 */
1324 /* ../lib/standard/kernel.nit:236 */
1325 REGB1
= TAG_Int(-UNTAG_Int(REGB1
));
1326 /* ../lib/standard/kernel.nit:255 */
1331 stack_frame_head
= fra
.me
.prev
;
1334 val_t
standard___kernel___Int_____leqg(val_t p0
, val_t p1
){
1335 struct {struct stack_frame_t me
;} fra
;
1341 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1342 fra
.me
.file
= LOCATE_standard___kernel
;
1344 fra
.me
.meth
= LOCATE_standard___kernel___Int_____leqg
;
1345 fra
.me
.has_broke
= 0;
1346 fra
.me
.REG_size
= 0;
1347 fra
.me
.nitni_local_ref_head
= NULL
;
1350 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1351 if (UNTAG_Bool(REGB2
)) {
1353 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1355 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1356 if (UNTAG_Bool(REGB2
)) {
1358 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1360 /* ../lib/standard/kernel.nit:232 */
1361 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1362 /* ../lib/standard/kernel.nit:261 */
1363 if (UNTAG_Bool(REGB2
)) {
1364 /* ../lib/standard/kernel.nit:262 */
1366 /* ../lib/standard/kernel.nit:236 */
1367 REGB2
= TAG_Int(-UNTAG_Int(REGB2
));
1368 /* ../lib/standard/kernel.nit:262 */
1371 REGB3
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1372 if (UNTAG_Bool(REGB3
)) {
1374 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1376 /* ../lib/standard/kernel.nit:232 */
1377 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
1378 /* ../lib/standard/kernel.nit:263 */
1379 if (UNTAG_Bool(REGB0
)) {
1380 /* ../lib/standard/kernel.nit:264 */
1385 /* ../lib/standard/kernel.nit:266 */
1392 stack_frame_head
= fra
.me
.prev
;
1395 val_t
standard___kernel___Int___is_between(val_t p0
, val_t p1
, val_t p2
){
1396 struct {struct stack_frame_t me
;} fra
;
1402 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1403 fra
.me
.file
= LOCATE_standard___kernel
;
1405 fra
.me
.meth
= LOCATE_standard___kernel___Int___is_between
;
1406 fra
.me
.has_broke
= 0;
1407 fra
.me
.REG_size
= 0;
1408 fra
.me
.nitni_local_ref_head
= NULL
;
1412 REGB3
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1413 if (UNTAG_Bool(REGB3
)) {
1415 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1417 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1418 if (UNTAG_Bool(REGB3
)) {
1420 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1422 REGB3
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1423 if (UNTAG_Bool(REGB3
)) {
1425 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1427 /* ../lib/standard/kernel.nit:232 */
1428 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1429 /* ../lib/standard/kernel.nit:272 */
1430 if (UNTAG_Bool(REGB1
)) {
1431 REGB1
= TAG_Bool(true);
1433 REGB3
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2
), VTID_standard___kernel___Comparable___OTHER(REGB2
))) /*cast OTHER*/;
1434 if (UNTAG_Bool(REGB3
)) {
1436 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1438 /* ../lib/standard/kernel.nit:232 */
1439 REGB0
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB0
));
1440 /* ../lib/standard/kernel.nit:272 */
1443 if (UNTAG_Bool(REGB1
)) {
1444 /* ../lib/standard/kernel.nit:273 */
1445 REGB1
= TAG_Bool(false);
1448 /* ../lib/standard/kernel.nit:275 */
1449 REGB0
= TAG_Bool(true);
1454 stack_frame_head
= fra
.me
.prev
;
1457 val_t
standard___kernel___Int___max(val_t p0
, val_t p1
){
1458 struct {struct stack_frame_t me
;} fra
;
1463 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1464 fra
.me
.file
= LOCATE_standard___kernel
;
1466 fra
.me
.meth
= LOCATE_standard___kernel___Int___max
;
1467 fra
.me
.has_broke
= 0;
1468 fra
.me
.REG_size
= 0;
1469 fra
.me
.nitni_local_ref_head
= NULL
;
1472 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1473 if (UNTAG_Bool(REGB2
)) {
1475 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1477 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1478 if (UNTAG_Bool(REGB2
)) {
1480 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1482 /* ../lib/standard/kernel.nit:232 */
1483 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1484 /* ../lib/standard/kernel.nit:281 */
1485 if (UNTAG_Bool(REGB2
)) {
1486 /* ../lib/standard/kernel.nit:282 */
1489 /* ../lib/standard/kernel.nit:284 */
1494 stack_frame_head
= fra
.me
.prev
;
1497 val_t
standard___kernel___Int___min(val_t p0
, val_t p1
){
1498 struct {struct stack_frame_t me
;} fra
;
1503 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1504 fra
.me
.file
= LOCATE_standard___kernel
;
1506 fra
.me
.meth
= LOCATE_standard___kernel___Int___min
;
1507 fra
.me
.has_broke
= 0;
1508 fra
.me
.REG_size
= 0;
1509 fra
.me
.nitni_local_ref_head
= NULL
;
1512 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1513 if (UNTAG_Bool(REGB2
)) {
1515 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1517 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1518 if (UNTAG_Bool(REGB2
)) {
1520 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1522 /* ../lib/standard/kernel.nit:232 */
1523 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
1524 /* ../lib/standard/kernel.nit:290 */
1525 if (UNTAG_Bool(REGB2
)) {
1526 /* ../lib/standard/kernel.nit:291 */
1529 /* ../lib/standard/kernel.nit:293 */
1534 stack_frame_head
= fra
.me
.prev
;
1537 val_t
standard___kernel___Int___ascii(val_t p0
){
1538 struct {struct stack_frame_t me
;} fra
;
1541 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1542 fra
.me
.file
= LOCATE_standard___kernel
;
1544 fra
.me
.meth
= LOCATE_standard___kernel___Int___ascii
;
1545 fra
.me
.has_broke
= 0;
1546 fra
.me
.REG_size
= 0;
1547 fra
.me
.nitni_local_ref_head
= NULL
;
1549 /* ../lib/standard/kernel.nit:297 */
1550 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
1551 stack_frame_head
= fra
.me
.prev
;
1554 val_t
standard___kernel___Int___digit_count(val_t p0
, val_t p1
){
1555 struct {struct stack_frame_t me
;} fra
;
1563 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1564 fra
.me
.file
= LOCATE_standard___kernel
;
1566 fra
.me
.meth
= LOCATE_standard___kernel___Int___digit_count
;
1567 fra
.me
.has_broke
= 0;
1568 fra
.me
.REG_size
= 0;
1569 fra
.me
.nitni_local_ref_head
= NULL
;
1572 /* ../lib/standard/kernel.nit:306 */
1574 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1575 if (UNTAG_Bool(REGB3
)) {
1577 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1579 /* ../lib/standard/kernel.nit:232 */
1580 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB2
));
1581 /* ../lib/standard/kernel.nit:306 */
1582 if (UNTAG_Bool(REGB2
)) {
1583 /* ../lib/standard/kernel.nit:307 */
1585 /* ../lib/standard/kernel.nit:236 */
1586 REGB3
= TAG_Int(-UNTAG_Int(REGB0
));
1588 /* ../lib/standard/kernel.nit:309 */
1590 REGB5
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB4
));
1591 if (UNTAG_Bool(REGB5
)) {
1593 /* ../lib/standard/kernel.nit:227 */
1594 REGB4
= TAG_Bool((REGB0
)==(REGB4
));
1595 /* ../lib/standard/kernel.nit:309 */
1598 if (UNTAG_Bool(REGB5
)) {
1599 /* ../lib/standard/kernel.nit:310 */
1603 /* ../lib/standard/kernel.nit:312 */
1606 /* ../lib/standard/kernel.nit:313 */
1610 /* ../lib/standard/kernel.nit:316 */
1613 REGB4
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3
), VTID_standard___kernel___Comparable___OTHER(REGB3
))) /*cast OTHER*/;
1614 if (UNTAG_Bool(REGB4
)) {
1616 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1618 /* ../lib/standard/kernel.nit:234 */
1619 REGB0
= TAG_Bool(UNTAG_Int(REGB3
)>UNTAG_Int(REGB0
));
1620 /* ../lib/standard/kernel.nit:316 */
1621 if (UNTAG_Bool(REGB0
)) {
1622 /* ../lib/standard/kernel.nit:317 */
1624 /* ../lib/standard/kernel.nit:235 */
1625 REGB0
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB0
));
1626 /* ../lib/standard/kernel.nit:317 */
1628 /* ../lib/standard/kernel.nit:239 */
1629 REGB0
= TAG_Int(UNTAG_Int(REGB3
)/UNTAG_Int(REGB1
));
1630 /* ../lib/standard/kernel.nit:318 */
1633 /* ../lib/standard/kernel.nit:316 */
1638 /* ../lib/standard/kernel.nit:320 */
1642 stack_frame_head
= fra
.me
.prev
;
1645 val_t
standard___kernel___Int___to_c(val_t p0
){
1646 struct {struct stack_frame_t me
;} fra
;
1652 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1653 fra
.me
.file
= LOCATE_standard___kernel
;
1655 fra
.me
.meth
= LOCATE_standard___kernel___Int___to_c
;
1656 fra
.me
.has_broke
= 0;
1657 fra
.me
.REG_size
= 0;
1658 fra
.me
.nitni_local_ref_head
= NULL
;
1660 /* ../lib/standard/kernel.nit:328 */
1662 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1663 if (UNTAG_Bool(REGB2
)) {
1665 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1667 /* ../lib/standard/kernel.nit:233 */
1668 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
1669 /* ../lib/standard/kernel.nit:328 */
1670 if (UNTAG_Bool(REGB1
)) {
1671 REGB1
= TAG_Int(36);
1672 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1673 if (UNTAG_Bool(REGB2
)) {
1675 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1677 /* ../lib/standard/kernel.nit:231 */
1678 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<=UNTAG_Int(REGB1
));
1680 /* ../lib/standard/kernel.nit:328 */
1681 REGB2
= TAG_Bool(false);
1684 if (UNTAG_Bool(REGB1
)) {
1686 nit_abort("Assert failed", NULL
, LOCATE_standard___kernel
, 328);
1688 /* ../lib/standard/kernel.nit:329 */
1689 REGB1
= TAG_Int(10);
1690 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1691 if (UNTAG_Bool(REGB2
)) {
1693 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1695 /* ../lib/standard/kernel.nit:232 */
1696 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1697 /* ../lib/standard/kernel.nit:329 */
1698 if (UNTAG_Bool(REGB1
)) {
1699 /* ../lib/standard/kernel.nit:330 */
1700 REGB1
= TAG_Char('0');
1701 /* ../lib/standard/kernel.nit:413 */
1702 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB1
));
1703 /* ../lib/standard/kernel.nit:235 */
1704 REGB1
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB1
));
1705 /* ../lib/standard/kernel.nit:297 */
1706 REGB1
= TAG_Char(UNTAG_Int(REGB1
));
1707 /* ../lib/standard/kernel.nit:330 */
1710 /* ../lib/standard/kernel.nit:332 */
1711 REGB2
= TAG_Char('a');
1712 /* ../lib/standard/kernel.nit:413 */
1713 REGB2
= TAG_Int((unsigned char)UNTAG_Char(REGB2
));
1714 /* ../lib/standard/kernel.nit:332 */
1715 REGB3
= TAG_Int(10);
1716 /* ../lib/standard/kernel.nit:237 */
1717 REGB3
= TAG_Int(UNTAG_Int(REGB2
)-UNTAG_Int(REGB3
));
1718 /* ../lib/standard/kernel.nit:235 */
1719 REGB3
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB3
));
1720 /* ../lib/standard/kernel.nit:297 */
1721 REGB3
= TAG_Char(UNTAG_Int(REGB3
));
1722 /* ../lib/standard/kernel.nit:332 */
1727 stack_frame_head
= fra
.me
.prev
;
1730 void standard___kernel___Int___enumerate_to(val_t p0
, val_t p1
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
){
1731 struct {struct stack_frame_t me
;} fra
;
1737 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1738 fra
.me
.file
= LOCATE_standard___kernel
;
1740 fra
.me
.meth
= LOCATE_standard___kernel___Int___enumerate_to
;
1741 fra
.me
.has_broke
= 0;
1742 fra
.me
.REG_size
= 0;
1743 fra
.me
.nitni_local_ref_head
= NULL
;
1744 fra
.me
.closure_ctx
= closctx_param
;
1745 fra
.me
.closure_funs
= CREG
;
1748 CREG
[0] = clos_fun0
;
1749 /* ../lib/standard/kernel.nit:341 */
1751 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1752 if (UNTAG_Bool(REGB2
)) {
1754 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1756 /* ../lib/standard/kernel.nit:231 */
1757 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<=UNTAG_Int(REGB1
));
1758 /* ../lib/standard/kernel.nit:341 */
1759 if (UNTAG_Bool(REGB2
)) {
1760 /* ../lib/standard/kernel.nit:342 */
1761 ((void (*)(struct stack_frame_t
*, val_t
))(CREG
[0]))(closctx_param
, REGB0
);
1762 if (closctx_param
->has_broke
) {
1765 /* ../lib/standard/kernel.nit:343 */
1767 /* ../lib/standard/kernel.nit:235 */
1768 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
1769 /* ../lib/standard/kernel.nit:343 */
1772 /* ../lib/standard/kernel.nit:341 */
1778 stack_frame_head
= fra
.me
.prev
;
1781 void standard___kernel___Int___enumerate_before(val_t p0
, val_t p1
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
){
1782 struct {struct stack_frame_t me
;} fra
;
1788 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1789 fra
.me
.file
= LOCATE_standard___kernel
;
1791 fra
.me
.meth
= LOCATE_standard___kernel___Int___enumerate_before
;
1792 fra
.me
.has_broke
= 0;
1793 fra
.me
.REG_size
= 0;
1794 fra
.me
.nitni_local_ref_head
= NULL
;
1795 fra
.me
.closure_ctx
= closctx_param
;
1796 fra
.me
.closure_funs
= CREG
;
1799 CREG
[0] = clos_fun0
;
1800 /* ../lib/standard/kernel.nit:352 */
1802 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1803 if (UNTAG_Bool(REGB2
)) {
1805 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1807 /* ../lib/standard/kernel.nit:232 */
1808 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1809 /* ../lib/standard/kernel.nit:352 */
1810 if (UNTAG_Bool(REGB2
)) {
1811 /* ../lib/standard/kernel.nit:353 */
1812 ((void (*)(struct stack_frame_t
*, val_t
))(CREG
[0]))(closctx_param
, REGB0
);
1813 if (closctx_param
->has_broke
) {
1816 /* ../lib/standard/kernel.nit:354 */
1818 /* ../lib/standard/kernel.nit:235 */
1819 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
1820 /* ../lib/standard/kernel.nit:354 */
1823 /* ../lib/standard/kernel.nit:352 */
1829 stack_frame_head
= fra
.me
.prev
;
1832 val_t
standard___kernel___Int___abs(val_t p0
){
1833 struct {struct stack_frame_t me
;} fra
;
1838 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1839 fra
.me
.file
= LOCATE_standard___kernel
;
1841 fra
.me
.meth
= LOCATE_standard___kernel___Int___abs
;
1842 fra
.me
.has_broke
= 0;
1843 fra
.me
.REG_size
= 0;
1844 fra
.me
.nitni_local_ref_head
= NULL
;
1846 /* ../lib/standard/kernel.nit:361 */
1848 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1849 if (UNTAG_Bool(REGB2
)) {
1851 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1853 /* ../lib/standard/kernel.nit:233 */
1854 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
1855 /* ../lib/standard/kernel.nit:361 */
1856 if (UNTAG_Bool(REGB1
)) {
1857 /* ../lib/standard/kernel.nit:363 */
1861 /* ../lib/standard/kernel.nit:365 */
1863 /* ../lib/standard/kernel.nit:236 */
1864 REGB2
= TAG_Int(-UNTAG_Int(REGB2
));
1865 /* ../lib/standard/kernel.nit:238 */
1866 REGB0
= TAG_Int(UNTAG_Int(REGB2
)*UNTAG_Int(REGB0
));
1867 /* ../lib/standard/kernel.nit:365 */
1872 stack_frame_head
= fra
.me
.prev
;
1875 val_t
standard___kernel___Char___object_id(val_t p0
){
1876 struct {struct stack_frame_t me
;} fra
;
1879 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1880 fra
.me
.file
= LOCATE_standard___kernel
;
1882 fra
.me
.meth
= LOCATE_standard___kernel___Char___object_id
;
1883 fra
.me
.has_broke
= 0;
1884 fra
.me
.REG_size
= 0;
1885 fra
.me
.nitni_local_ref_head
= NULL
;
1887 /* ../lib/standard/kernel.nit:377 */
1888 REGB0
= TAG_Int(UNTAG_Char(REGB0
));
1889 stack_frame_head
= fra
.me
.prev
;
1892 val_t
standard___kernel___Char_____eqeq(val_t p0
, val_t p1
){
1893 struct {struct stack_frame_t me
;} fra
;
1896 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1897 fra
.me
.file
= LOCATE_standard___kernel
;
1899 fra
.me
.meth
= LOCATE_standard___kernel___Char_____eqeq
;
1900 fra
.me
.has_broke
= 0;
1901 fra
.me
.REG_size
= 1;
1902 fra
.me
.nitni_local_ref_head
= NULL
;
1903 fra
.me
.REG
[0] = NIT_NULL
;
1906 /* ../lib/standard/kernel.nit:378 */
1907 REGB0
= TAG_Bool((REGB0
)==(fra
.me
.REG
[0]));
1908 stack_frame_head
= fra
.me
.prev
;
1911 val_t
standard___kernel___Char_____neq(val_t p0
, val_t p1
){
1912 struct {struct stack_frame_t me
;} fra
;
1915 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1916 fra
.me
.file
= LOCATE_standard___kernel
;
1918 fra
.me
.meth
= LOCATE_standard___kernel___Char_____neq
;
1919 fra
.me
.has_broke
= 0;
1920 fra
.me
.REG_size
= 1;
1921 fra
.me
.nitni_local_ref_head
= NULL
;
1922 fra
.me
.REG
[0] = NIT_NULL
;
1925 /* ../lib/standard/kernel.nit:379 */
1926 REGB0
= TAG_Bool((REGB0
)!=(fra
.me
.REG
[0]));
1927 stack_frame_head
= fra
.me
.prev
;
1930 void standard___kernel___Char___output(val_t p0
){
1931 struct {struct stack_frame_t me
;} fra
;
1934 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1935 fra
.me
.file
= LOCATE_standard___kernel
;
1937 fra
.me
.meth
= LOCATE_standard___kernel___Char___output
;
1938 fra
.me
.has_broke
= 0;
1939 fra
.me
.REG_size
= 0;
1940 fra
.me
.nitni_local_ref_head
= NULL
;
1942 /* ../lib/standard/kernel.nit:380 */
1943 printf("%c", (unsigned char)UNTAG_Char(REGB0
));;
1944 stack_frame_head
= fra
.me
.prev
;
1947 val_t
standard___kernel___Char_____leq(val_t p0
, val_t p1
){
1948 struct {struct stack_frame_t me
;} fra
;
1953 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1954 fra
.me
.file
= LOCATE_standard___kernel
;
1956 fra
.me
.meth
= LOCATE_standard___kernel___Char_____leq
;
1957 fra
.me
.has_broke
= 0;
1958 fra
.me
.REG_size
= 0;
1959 fra
.me
.nitni_local_ref_head
= NULL
;
1962 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1963 if (UNTAG_Bool(REGB2
)) {
1965 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1967 /* ../lib/standard/kernel.nit:382 */
1968 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)<=UNTAG_Char(REGB1
));
1969 stack_frame_head
= fra
.me
.prev
;
1972 val_t
standard___kernel___Char_____l(val_t p0
, val_t p1
){
1973 struct {struct stack_frame_t me
;} fra
;
1978 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1979 fra
.me
.file
= LOCATE_standard___kernel
;
1981 fra
.me
.meth
= LOCATE_standard___kernel___Char_____l
;
1982 fra
.me
.has_broke
= 0;
1983 fra
.me
.REG_size
= 0;
1984 fra
.me
.nitni_local_ref_head
= NULL
;
1987 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1988 if (UNTAG_Bool(REGB2
)) {
1990 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1992 /* ../lib/standard/kernel.nit:383 */
1993 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)<UNTAG_Char(REGB1
));
1994 stack_frame_head
= fra
.me
.prev
;
1997 val_t
standard___kernel___Char_____geq(val_t p0
, val_t p1
){
1998 struct {struct stack_frame_t me
;} fra
;
2003 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2004 fra
.me
.file
= LOCATE_standard___kernel
;
2006 fra
.me
.meth
= LOCATE_standard___kernel___Char_____geq
;
2007 fra
.me
.has_broke
= 0;
2008 fra
.me
.REG_size
= 0;
2009 fra
.me
.nitni_local_ref_head
= NULL
;
2012 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2013 if (UNTAG_Bool(REGB2
)) {
2015 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2017 /* ../lib/standard/kernel.nit:384 */
2018 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)>=UNTAG_Char(REGB1
));
2019 stack_frame_head
= fra
.me
.prev
;
2022 val_t
standard___kernel___Char_____g(val_t p0
, val_t p1
){
2023 struct {struct stack_frame_t me
;} fra
;
2028 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2029 fra
.me
.file
= LOCATE_standard___kernel
;
2031 fra
.me
.meth
= LOCATE_standard___kernel___Char_____g
;
2032 fra
.me
.has_broke
= 0;
2033 fra
.me
.REG_size
= 0;
2034 fra
.me
.nitni_local_ref_head
= NULL
;
2037 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2038 if (UNTAG_Bool(REGB2
)) {
2040 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2042 /* ../lib/standard/kernel.nit:385 */
2043 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)>UNTAG_Char(REGB1
));
2044 stack_frame_head
= fra
.me
.prev
;
2047 val_t
standard___kernel___Char___succ(val_t p0
){
2048 struct {struct stack_frame_t me
;} fra
;
2051 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2052 fra
.me
.file
= LOCATE_standard___kernel
;
2054 fra
.me
.meth
= LOCATE_standard___kernel___Char___succ
;
2055 fra
.me
.has_broke
= 0;
2056 fra
.me
.REG_size
= 0;
2057 fra
.me
.nitni_local_ref_head
= NULL
;
2059 /* ../lib/standard/kernel.nit:387 */
2060 REGB0
= TAG_Char(UNTAG_Char(REGB0
)+1);
2061 stack_frame_head
= fra
.me
.prev
;
2064 val_t
standard___kernel___Char___prec(val_t p0
){
2065 struct {struct stack_frame_t me
;} fra
;
2068 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2069 fra
.me
.file
= LOCATE_standard___kernel
;
2071 fra
.me
.meth
= LOCATE_standard___kernel___Char___prec
;
2072 fra
.me
.has_broke
= 0;
2073 fra
.me
.REG_size
= 0;
2074 fra
.me
.nitni_local_ref_head
= NULL
;
2076 /* ../lib/standard/kernel.nit:388 */
2077 REGB0
= TAG_Char(UNTAG_Char(REGB0
)-1);
2078 stack_frame_head
= fra
.me
.prev
;
2081 val_t
standard___kernel___Char___distance(val_t p0
, val_t p1
){
2082 struct {struct stack_frame_t me
;} fra
;
2087 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2088 fra
.me
.file
= LOCATE_standard___kernel
;
2090 fra
.me
.meth
= LOCATE_standard___kernel___Char___distance
;
2091 fra
.me
.has_broke
= 0;
2092 fra
.me
.REG_size
= 0;
2093 fra
.me
.nitni_local_ref_head
= NULL
;
2096 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2097 if (UNTAG_Bool(REGB2
)) {
2099 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2101 /* ../lib/standard/kernel.nit:413 */
2102 REGB0
= TAG_Int((unsigned char)UNTAG_Char(REGB0
));
2103 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB1
));
2104 /* ../lib/standard/kernel.nit:237 */
2105 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
2106 /* ../lib/standard/kernel.nit:393 */
2108 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
2109 if (UNTAG_Bool(REGB2
)) {
2111 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2113 /* ../lib/standard/kernel.nit:233 */
2114 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB0
));
2115 /* ../lib/standard/kernel.nit:393 */
2116 if (UNTAG_Bool(REGB0
)) {
2117 /* ../lib/standard/kernel.nit:394 */
2121 /* ../lib/standard/kernel.nit:236 */
2122 REGB1
= TAG_Int(-UNTAG_Int(REGB1
));
2123 /* ../lib/standard/kernel.nit:396 */
2128 stack_frame_head
= fra
.me
.prev
;
2131 val_t
standard___kernel___Char___to_i(val_t p0
){
2132 struct {struct stack_frame_t me
;} fra
;
2138 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2139 fra
.me
.file
= LOCATE_standard___kernel
;
2141 fra
.me
.meth
= LOCATE_standard___kernel___Char___to_i
;
2142 fra
.me
.has_broke
= 0;
2143 fra
.me
.REG_size
= 0;
2144 fra
.me
.nitni_local_ref_head
= NULL
;
2146 /* ../lib/standard/kernel.nit:404 */
2147 REGB1
= TAG_Char('-');
2148 REGB2
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB1
));
2149 if (UNTAG_Bool(REGB2
)) {
2151 /* ../lib/standard/kernel.nit:378 */
2152 REGB1
= TAG_Bool((REGB0
)==(REGB1
));
2153 /* ../lib/standard/kernel.nit:404 */
2156 if (UNTAG_Bool(REGB2
)) {
2157 /* ../lib/standard/kernel.nit:405 */
2159 /* ../lib/standard/kernel.nit:236 */
2160 REGB2
= TAG_Int(-UNTAG_Int(REGB2
));
2161 /* ../lib/standard/kernel.nit:405 */
2164 /* ../lib/standard/kernel.nit:406 */
2165 REGB1
= CALL_standard___kernel___Char___is_digit(REGB0
)(REGB0
);
2166 if (UNTAG_Bool(REGB1
)) {
2167 /* ../lib/standard/kernel.nit:413 */
2168 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB0
));
2169 /* ../lib/standard/kernel.nit:407 */
2170 REGB3
= TAG_Char('0');
2171 /* ../lib/standard/kernel.nit:413 */
2172 REGB3
= TAG_Int((unsigned char)UNTAG_Char(REGB3
));
2173 /* ../lib/standard/kernel.nit:237 */
2174 REGB3
= TAG_Int(UNTAG_Int(REGB1
)-UNTAG_Int(REGB3
));
2175 /* ../lib/standard/kernel.nit:407 */
2179 /* ../lib/standard/kernel.nit:409 */
2180 REGB0
= CALL_standard___kernel___Char___to_lower(REGB0
)(REGB0
);
2181 /* ../lib/standard/kernel.nit:413 */
2182 REGB0
= TAG_Int((unsigned char)UNTAG_Char(REGB0
));
2183 /* ../lib/standard/kernel.nit:409 */
2184 REGB3
= TAG_Char('a');
2185 /* ../lib/standard/kernel.nit:413 */
2186 REGB3
= TAG_Int((unsigned char)UNTAG_Char(REGB3
));
2187 /* ../lib/standard/kernel.nit:409 */
2188 REGB1
= TAG_Int(10);
2189 /* ../lib/standard/kernel.nit:235 */
2190 REGB1
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB1
));
2191 /* ../lib/standard/kernel.nit:237 */
2192 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
2193 /* ../lib/standard/kernel.nit:409 */
2199 stack_frame_head
= fra
.me
.prev
;
2202 val_t
standard___kernel___Char___ascii(val_t p0
){
2203 struct {struct stack_frame_t me
;} fra
;
2206 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2207 fra
.me
.file
= LOCATE_standard___kernel
;
2209 fra
.me
.meth
= LOCATE_standard___kernel___Char___ascii
;
2210 fra
.me
.has_broke
= 0;
2211 fra
.me
.REG_size
= 0;
2212 fra
.me
.nitni_local_ref_head
= NULL
;
2214 /* ../lib/standard/kernel.nit:413 */
2215 REGB0
= TAG_Int((unsigned char)UNTAG_Char(REGB0
));
2216 stack_frame_head
= fra
.me
.prev
;
2219 val_t
standard___kernel___Char_____plus(val_t p0
, val_t p1
){
2220 struct {struct stack_frame_t me
;} fra
;
2224 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2225 fra
.me
.file
= LOCATE_standard___kernel
;
2227 fra
.me
.meth
= LOCATE_standard___kernel___Char_____plus
;
2228 fra
.me
.has_broke
= 0;
2229 fra
.me
.REG_size
= 0;
2230 fra
.me
.nitni_local_ref_head
= NULL
;
2233 /* ../lib/standard/kernel.nit:416 */
2234 REGB1
= TAG_Char(UNTAG_Char(REGB0
)+UNTAG_Char(REGB1
));
2235 stack_frame_head
= fra
.me
.prev
;
2238 val_t
standard___kernel___Char_____minus(val_t p0
, val_t p1
){
2239 struct {struct stack_frame_t me
;} fra
;
2243 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2244 fra
.me
.file
= LOCATE_standard___kernel
;
2246 fra
.me
.meth
= LOCATE_standard___kernel___Char_____minus
;
2247 fra
.me
.has_broke
= 0;
2248 fra
.me
.REG_size
= 0;
2249 fra
.me
.nitni_local_ref_head
= NULL
;
2252 /* ../lib/standard/kernel.nit:417 */
2253 REGB1
= TAG_Char(UNTAG_Char(REGB0
)-UNTAG_Char(REGB1
));
2254 stack_frame_head
= fra
.me
.prev
;
2257 val_t
standard___kernel___Char___to_lower(val_t p0
){
2258 struct {struct stack_frame_t me
;} fra
;
2264 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2265 fra
.me
.file
= LOCATE_standard___kernel
;
2267 fra
.me
.meth
= LOCATE_standard___kernel___Char___to_lower
;
2268 fra
.me
.has_broke
= 0;
2269 fra
.me
.REG_size
= 0;
2270 fra
.me
.nitni_local_ref_head
= NULL
;
2272 /* ../lib/standard/kernel.nit:423 */
2273 REGB1
= CALL_standard___kernel___Char___is_upper(REGB0
)(REGB0
);
2274 if (UNTAG_Bool(REGB1
)) {
2275 /* ../lib/standard/kernel.nit:413 */
2276 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB0
));
2277 /* ../lib/standard/kernel.nit:424 */
2278 REGB2
= TAG_Char('a');
2279 REGB3
= TAG_Char('A');
2280 REGB3
= CALL_standard___kernel___Discrete___distance(REGB2
)(REGB2
, REGB3
);
2281 /* ../lib/standard/kernel.nit:235 */
2282 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
2283 /* ../lib/standard/kernel.nit:297 */
2284 REGB3
= TAG_Char(UNTAG_Int(REGB3
));
2285 /* ../lib/standard/kernel.nit:424 */
2288 /* ../lib/standard/kernel.nit:426 */
2293 stack_frame_head
= fra
.me
.prev
;
2296 val_t
standard___kernel___Char___to_upper(val_t p0
){
2297 struct {struct stack_frame_t me
;} fra
;
2303 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2304 fra
.me
.file
= LOCATE_standard___kernel
;
2306 fra
.me
.meth
= LOCATE_standard___kernel___Char___to_upper
;
2307 fra
.me
.has_broke
= 0;
2308 fra
.me
.REG_size
= 0;
2309 fra
.me
.nitni_local_ref_head
= NULL
;
2311 /* ../lib/standard/kernel.nit:434 */
2312 REGB1
= CALL_standard___kernel___Char___is_lower(REGB0
)(REGB0
);
2313 if (UNTAG_Bool(REGB1
)) {
2314 /* ../lib/standard/kernel.nit:413 */
2315 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB0
));
2316 /* ../lib/standard/kernel.nit:435 */
2317 REGB2
= TAG_Char('a');
2318 REGB3
= TAG_Char('A');
2319 REGB3
= CALL_standard___kernel___Discrete___distance(REGB2
)(REGB2
, REGB3
);
2320 /* ../lib/standard/kernel.nit:237 */
2321 REGB3
= TAG_Int(UNTAG_Int(REGB1
)-UNTAG_Int(REGB3
));
2322 /* ../lib/standard/kernel.nit:297 */
2323 REGB3
= TAG_Char(UNTAG_Int(REGB3
));
2324 /* ../lib/standard/kernel.nit:435 */
2327 /* ../lib/standard/kernel.nit:437 */
2332 stack_frame_head
= fra
.me
.prev
;
2335 val_t
standard___kernel___Char___is_digit(val_t p0
){
2336 struct {struct stack_frame_t me
;} fra
;
2341 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2342 fra
.me
.file
= LOCATE_standard___kernel
;
2344 fra
.me
.meth
= LOCATE_standard___kernel___Char___is_digit
;
2345 fra
.me
.has_broke
= 0;
2346 fra
.me
.REG_size
= 0;
2347 fra
.me
.nitni_local_ref_head
= NULL
;
2349 /* ../lib/standard/kernel.nit:444 */
2350 REGB1
= TAG_Char('0');
2351 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2352 if (UNTAG_Bool(REGB2
)) {
2354 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2356 /* ../lib/standard/kernel.nit:384 */
2357 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)>=UNTAG_Char(REGB1
));
2358 /* ../lib/standard/kernel.nit:444 */
2359 if (UNTAG_Bool(REGB1
)) {
2360 REGB1
= TAG_Char('9');
2361 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2362 if (UNTAG_Bool(REGB2
)) {
2364 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2366 /* ../lib/standard/kernel.nit:382 */
2367 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)<=UNTAG_Char(REGB1
));
2369 /* ../lib/standard/kernel.nit:444 */
2370 REGB0
= TAG_Bool(false);
2375 stack_frame_head
= fra
.me
.prev
;
2378 val_t
standard___kernel___Char___is_lower(val_t p0
){
2379 struct {struct stack_frame_t me
;} fra
;
2384 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2385 fra
.me
.file
= LOCATE_standard___kernel
;
2387 fra
.me
.meth
= LOCATE_standard___kernel___Char___is_lower
;
2388 fra
.me
.has_broke
= 0;
2389 fra
.me
.REG_size
= 0;
2390 fra
.me
.nitni_local_ref_head
= NULL
;
2392 /* ../lib/standard/kernel.nit:450 */
2393 REGB1
= TAG_Char('a');
2394 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2395 if (UNTAG_Bool(REGB2
)) {
2397 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2399 /* ../lib/standard/kernel.nit:384 */
2400 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)>=UNTAG_Char(REGB1
));
2401 /* ../lib/standard/kernel.nit:450 */
2402 if (UNTAG_Bool(REGB1
)) {
2403 REGB1
= TAG_Char('z');
2404 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2405 if (UNTAG_Bool(REGB2
)) {
2407 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2409 /* ../lib/standard/kernel.nit:382 */
2410 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)<=UNTAG_Char(REGB1
));
2412 /* ../lib/standard/kernel.nit:450 */
2413 REGB0
= TAG_Bool(false);
2418 stack_frame_head
= fra
.me
.prev
;
2421 val_t
standard___kernel___Char___is_upper(val_t p0
){
2422 struct {struct stack_frame_t me
;} fra
;
2427 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2428 fra
.me
.file
= LOCATE_standard___kernel
;
2430 fra
.me
.meth
= LOCATE_standard___kernel___Char___is_upper
;
2431 fra
.me
.has_broke
= 0;
2432 fra
.me
.REG_size
= 0;
2433 fra
.me
.nitni_local_ref_head
= NULL
;
2435 /* ../lib/standard/kernel.nit:456 */
2436 REGB1
= TAG_Char('A');
2437 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2438 if (UNTAG_Bool(REGB2
)) {
2440 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2442 /* ../lib/standard/kernel.nit:384 */
2443 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)>=UNTAG_Char(REGB1
));
2444 /* ../lib/standard/kernel.nit:456 */
2445 if (UNTAG_Bool(REGB1
)) {
2446 REGB1
= TAG_Char('Z');
2447 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2448 if (UNTAG_Bool(REGB2
)) {
2450 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2452 /* ../lib/standard/kernel.nit:382 */
2453 REGB1
= TAG_Bool(UNTAG_Char(REGB0
)<=UNTAG_Char(REGB1
));
2455 /* ../lib/standard/kernel.nit:456 */
2456 REGB0
= TAG_Bool(false);
2461 stack_frame_head
= fra
.me
.prev
;
2464 val_t
standard___kernel___Char___is_letter(val_t p0
){
2465 struct {struct stack_frame_t me
;} fra
;
2469 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2470 fra
.me
.file
= LOCATE_standard___kernel
;
2472 fra
.me
.meth
= LOCATE_standard___kernel___Char___is_letter
;
2473 fra
.me
.has_broke
= 0;
2474 fra
.me
.REG_size
= 0;
2475 fra
.me
.nitni_local_ref_head
= NULL
;
2477 /* ../lib/standard/kernel.nit:462 */
2478 REGB1
= CALL_standard___kernel___Char___is_lower(REGB0
)(REGB0
);
2479 if (UNTAG_Bool(REGB1
)) {
2480 REGB1
= TAG_Bool(true);
2482 REGB0
= CALL_standard___kernel___Char___is_upper(REGB0
)(REGB0
);
2487 stack_frame_head
= fra
.me
.prev
;