1 /* This C file is generated by NIT to compile module opts. */
3 val_t
opts___Option___names(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_opts
;
10 fra
.me
.meth
= LOCATE_opts___Option___names
;
13 fra
.me
.REG
[0] = NIT_NULL
;
15 /* ./../lib/opts.nit:19 */
16 REGB0
= TAG_Bool(ATTR_opts___Option____names(fra
.me
.REG
[0])!=NIT_NULL
);
17 if (UNTAG_Bool(REGB0
)) {
19 nit_abort("Uninitialized attribute %s", "_names", LOCATE_opts
, 19);
21 fra
.me
.REG
[0] = ATTR_opts___Option____names(fra
.me
.REG
[0]);
22 stack_frame_head
= fra
.me
.prev
;
25 val_t
opts___Option___helptext(val_t p0
){
26 struct {struct stack_frame_t me
;} fra
;
29 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
30 fra
.me
.file
= LOCATE_opts
;
32 fra
.me
.meth
= LOCATE_opts___Option___helptext
;
35 fra
.me
.REG
[0] = NIT_NULL
;
37 /* ./../lib/opts.nit:25 */
38 REGB0
= TAG_Bool(ATTR_opts___Option____helptext(fra
.me
.REG
[0])!=NIT_NULL
);
39 if (UNTAG_Bool(REGB0
)) {
41 nit_abort("Uninitialized attribute %s", "_helptext", LOCATE_opts
, 25);
43 fra
.me
.REG
[0] = ATTR_opts___Option____helptext(fra
.me
.REG
[0]);
44 stack_frame_head
= fra
.me
.prev
;
47 val_t
opts___Option___mandatory(val_t p0
){
48 struct {struct stack_frame_t me
;} fra
;
51 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
52 fra
.me
.file
= LOCATE_opts
;
54 fra
.me
.meth
= LOCATE_opts___Option___mandatory
;
57 fra
.me
.REG
[0] = NIT_NULL
;
59 /* ./../lib/opts.nit:28 */
60 REGB0
= TAG_Bool(ATTR_opts___Option____mandatory(fra
.me
.REG
[0])!=NIT_NULL
);
61 if (UNTAG_Bool(REGB0
)) {
63 nit_abort("Uninitialized attribute %s", "_mandatory", LOCATE_opts
, 28);
65 REGB0
= ATTR_opts___Option____mandatory(fra
.me
.REG
[0]);
66 stack_frame_head
= fra
.me
.prev
;
69 void opts___Option___mandatory__eq(val_t p0
, val_t p1
){
70 struct {struct stack_frame_t me
;} fra
;
73 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
74 fra
.me
.file
= LOCATE_opts
;
76 fra
.me
.meth
= LOCATE_opts___Option___mandatory__eq
;
79 fra
.me
.REG
[0] = NIT_NULL
;
82 /* ./../lib/opts.nit:28 */
83 ATTR_opts___Option____mandatory(fra
.me
.REG
[0]) = REGB0
;
84 stack_frame_head
= fra
.me
.prev
;
87 void opts___Option___value__eq(val_t p0
, val_t p1
){
88 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
90 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
91 fra
.me
.file
= LOCATE_opts
;
93 fra
.me
.meth
= LOCATE_opts___Option___value__eq
;
96 fra
.me
.REG
[0] = NIT_NULL
;
97 fra
.me
.REG
[1] = NIT_NULL
;
100 /* ./../lib/opts.nit:31 */
101 ATTR_opts___Option____value(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
102 stack_frame_head
= fra
.me
.prev
;
105 val_t
opts___Option___value(val_t p0
){
106 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
109 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
110 fra
.me
.file
= LOCATE_opts
;
112 fra
.me
.meth
= LOCATE_opts___Option___value
;
113 fra
.me
.has_broke
= 0;
115 fra
.me
.REG
[0] = NIT_NULL
;
116 fra
.me
.REG
[1] = NIT_NULL
;
118 /* ./../lib/opts.nit:34 */
119 fra
.me
.REG
[1] = fra
.me
.REG
[0];
120 /* ./../lib/opts.nit:35 */
121 fra
.me
.REG
[1] = ATTR_opts___Option____value(fra
.me
.REG
[1]);
122 REGB0
= TAG_Bool((fra
.me
.REG
[1]==NIT_NULL
) || VAL_ISA(fra
.me
.REG
[1], VTCOLOR_opts___Option___VALUE(fra
.me
.REG
[0]), VTID_opts___Option___VALUE(fra
.me
.REG
[0]))) /*cast VALUE*/;
123 if (UNTAG_Bool(REGB0
)) {
125 nit_abort("Cast failed", NULL
, LOCATE_opts
, 35);
129 stack_frame_head
= fra
.me
.prev
;
130 return fra
.me
.REG
[1];
132 val_t
opts___Option___default_value(val_t p0
){
133 struct {struct stack_frame_t me
;} fra
;
135 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
136 fra
.me
.file
= LOCATE_opts
;
138 fra
.me
.meth
= LOCATE_opts___Option___default_value
;
139 fra
.me
.has_broke
= 0;
141 fra
.me
.REG
[0] = NIT_NULL
;
143 /* ./../lib/opts.nit:37 */
144 fra
.me
.REG
[0] = ATTR_opts___Option____default_value(fra
.me
.REG
[0]);
145 stack_frame_head
= fra
.me
.prev
;
146 return fra
.me
.REG
[0];
148 void opts___Option___default_value__eq(val_t p0
, val_t p1
){
149 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
151 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
152 fra
.me
.file
= LOCATE_opts
;
154 fra
.me
.meth
= LOCATE_opts___Option___default_value__eq
;
155 fra
.me
.has_broke
= 0;
157 fra
.me
.REG
[0] = NIT_NULL
;
158 fra
.me
.REG
[1] = NIT_NULL
;
161 /* ./../lib/opts.nit:37 */
162 ATTR_opts___Option____default_value(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
163 stack_frame_head
= fra
.me
.prev
;
166 void opts___Option___init_opt(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
167 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___Option
].i
;
168 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
172 if (init_table
[itpos0
]) return;
173 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
174 fra
.me
.file
= LOCATE_opts
;
176 fra
.me
.meth
= LOCATE_opts___Option___init_opt
;
177 fra
.me
.has_broke
= 0;
179 fra
.me
.REG
[0] = NIT_NULL
;
180 fra
.me
.REG
[1] = NIT_NULL
;
181 fra
.me
.REG
[2] = NIT_NULL
;
182 fra
.me
.REG
[3] = NIT_NULL
;
183 fra
.me
.REG
[4] = NIT_NULL
;
188 /* ./../lib/opts.nit:43 */
189 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
190 if (UNTAG_Bool(REGB0
)) {
192 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
193 if (UNTAG_Bool(REGB1
)) {
194 REGB1
= TAG_Bool(false);
197 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
201 if (UNTAG_Bool(REGB0
)) {
202 /* ./../lib/opts.nit:44 */
203 fra
.me
.REG
[4] = NEW_Array_standard___collection___array___Array___init();
204 ATTR_opts___Option____names(fra
.me
.REG
[0]) = fra
.me
.REG
[4];
206 /* ./../lib/opts.nit:46 */
207 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
208 if (UNTAG_Bool(REGB0
)) {
209 nit_abort("Reciever is null", NULL
, LOCATE_opts
, 46);
211 fra
.me
.REG
[3] = CALL_standard___collection___array___Collection___to_a(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
212 ATTR_opts___Option____names(fra
.me
.REG
[0]) = fra
.me
.REG
[3];
214 /* ./../lib/opts.nit:48 */
215 ATTR_opts___Option____helptext(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
216 /* ./../lib/opts.nit:49 */
217 REGB0
= TAG_Bool(false);
218 ATTR_opts___Option____mandatory(fra
.me
.REG
[0]) = REGB0
;
219 /* ./../lib/opts.nit:50 */
220 ATTR_opts___Option____default_value(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
221 /* ./../lib/opts.nit:51 */
222 ATTR_opts___Option____value(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
223 stack_frame_head
= fra
.me
.prev
;
224 init_table
[itpos0
] = 1;
227 void opts___Option___add_aliases(val_t p0
, val_t p1
){
228 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
231 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
232 fra
.me
.file
= LOCATE_opts
;
234 fra
.me
.meth
= LOCATE_opts___Option___add_aliases
;
235 fra
.me
.has_broke
= 0;
237 fra
.me
.REG
[0] = NIT_NULL
;
238 fra
.me
.REG
[1] = NIT_NULL
;
239 fra
.me
.REG
[2] = NIT_NULL
;
242 /* ./../lib/opts.nit:54 */
243 fra
.me
.REG
[2] = fra
.me
.REG
[0];
244 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
245 if (UNTAG_Bool(REGB0
)) {
247 nit_abort("Cast failed", NULL
, LOCATE_opts
, 54);
249 /* ./../lib/opts.nit:55 */
250 REGB0
= TAG_Bool(ATTR_opts___Option____names(fra
.me
.REG
[2])!=NIT_NULL
);
251 if (UNTAG_Bool(REGB0
)) {
253 nit_abort("Uninitialized attribute %s", "_names", LOCATE_opts
, 55);
255 fra
.me
.REG
[2] = ATTR_opts___Option____names(fra
.me
.REG
[2]);
256 CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
257 stack_frame_head
= fra
.me
.prev
;
260 val_t
opts___Option___to_s(val_t p0
){
261 struct {struct stack_frame_t me
;} fra
;
264 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
265 fra
.me
.file
= LOCATE_opts
;
267 fra
.me
.meth
= LOCATE_opts___Option___to_s
;
268 fra
.me
.has_broke
= 0;
270 fra
.me
.REG
[0] = NIT_NULL
;
272 /* ./../lib/opts.nit:58 */
274 fra
.me
.REG
[0] = CALL_opts___Option___pretty(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
277 stack_frame_head
= fra
.me
.prev
;
278 return fra
.me
.REG
[0];
280 val_t
opts___Option___pretty(val_t p0
, val_t p1
){
281 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
286 static val_t once_value_1
; /* Once value */
287 static val_t once_value_2
; /* Once value */
288 static val_t once_value_3
; /* Once value */
289 static val_t once_value_4
; /* Once value */
290 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
291 fra
.me
.file
= LOCATE_opts
;
293 fra
.me
.meth
= LOCATE_opts___Option___pretty
;
294 fra
.me
.has_broke
= 0;
296 fra
.me
.REG
[0] = NIT_NULL
;
297 fra
.me
.REG
[1] = NIT_NULL
;
298 fra
.me
.REG
[2] = NIT_NULL
;
299 fra
.me
.REG
[3] = NIT_NULL
;
302 /* ./../lib/opts.nit:63 */
304 fra
.me
.REG
[1] = BOX_NativeString(" ");
306 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB1
);
307 once_value_1
= fra
.me
.REG
[1];
308 register_static_object(&once_value_1
);
309 } else fra
.me
.REG
[1] = once_value_1
;
310 fra
.me
.REG
[1] = fra
.me
.REG
[1];
311 fra
.me
.REG
[1] = NEW_Buffer_standard___string___Buffer___from(fra
.me
.REG
[1]);
312 /* ./../lib/opts.nit:64 */
313 REGB1
= TAG_Bool(ATTR_opts___Option____names(fra
.me
.REG
[0])!=NIT_NULL
);
314 if (UNTAG_Bool(REGB1
)) {
316 nit_abort("Uninitialized attribute %s", "_names", LOCATE_opts
, 64);
318 fra
.me
.REG
[2] = ATTR_opts___Option____names(fra
.me
.REG
[0]);
320 fra
.me
.REG
[3] = BOX_NativeString(", ");
322 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB1
);
323 once_value_2
= fra
.me
.REG
[3];
324 register_static_object(&once_value_2
);
325 } else fra
.me
.REG
[3] = once_value_2
;
326 fra
.me
.REG
[3] = fra
.me
.REG
[3];
327 fra
.me
.REG
[3] = CALL_standard___string___Collection___join(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
328 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[3]);
329 /* ./../lib/opts.nit:65 */
331 fra
.me
.REG
[3] = BOX_NativeString(" ");
333 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB1
);
334 once_value_3
= fra
.me
.REG
[3];
335 register_static_object(&once_value_3
);
336 } else fra
.me
.REG
[3] = once_value_3
;
337 fra
.me
.REG
[3] = fra
.me
.REG
[3];
338 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[3]);
339 /* ./../lib/standard//collection//array.nit:24 */
340 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
341 if (UNTAG_Bool(REGB1
)) {
343 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
345 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
346 /* ./../lib/standard//kernel.nit:237 */
347 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
348 /* ./../lib/opts.nit:67 */
350 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
351 if (UNTAG_Bool(REGB2
)) {
353 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
355 /* ./../lib/standard//kernel.nit:234 */
356 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>UNTAG_Int(REGB0
));
357 /* ./../lib/opts.nit:67 */
358 if (UNTAG_Bool(REGB0
)) {
360 fra
.me
.REG
[3] = BOX_NativeString(" ");
362 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
363 once_value_4
= fra
.me
.REG
[3];
364 register_static_object(&once_value_4
);
365 } else fra
.me
.REG
[3] = once_value_4
;
366 fra
.me
.REG
[3] = fra
.me
.REG
[3];
367 fra
.me
.REG
[3] = CALL_standard___string___String_____star(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB1
);
368 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[3]);
370 /* ./../lib/opts.nit:68 */
371 fra
.me
.REG
[0] = CALL_opts___Option___helptext(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
372 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
373 /* ./../lib/opts.nit:70 */
374 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
377 stack_frame_head
= fra
.me
.prev
;
378 return fra
.me
.REG
[1];
380 val_t
opts___Option___pretty_default(val_t p0
){
381 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
385 static val_t once_value_1
; /* Once value */
386 static val_t once_value_2
; /* Once value */
387 static val_t once_value_4
; /* Once value */
388 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
389 fra
.me
.file
= LOCATE_opts
;
391 fra
.me
.meth
= LOCATE_opts___Option___pretty_default
;
392 fra
.me
.has_broke
= 0;
394 fra
.me
.REG
[0] = NIT_NULL
;
395 fra
.me
.REG
[1] = NIT_NULL
;
396 fra
.me
.REG
[2] = NIT_NULL
;
398 /* ./../lib/opts.nit:75 */
399 fra
.me
.REG
[0] = CALL_opts___Option___default_value(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
400 /* ./../lib/opts.nit:76 */
401 REGB0
= TAG_Bool(fra
.me
.REG
[0]==NIT_NULL
);
402 if (UNTAG_Bool(REGB0
)) {
404 REGB1
= TAG_Bool(fra
.me
.REG
[0]==NIT_NULL
);
405 if (UNTAG_Bool(REGB1
)) {
406 REGB1
= TAG_Bool(false);
409 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[0])(fra
.me
.REG
[0], NIT_NULL
);
413 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
414 if (UNTAG_Bool(REGB0
)) {
416 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
418 fra
.me
.REG
[2] = BOX_NativeString(" (");
420 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB0
);
421 once_value_1
= fra
.me
.REG
[2];
422 register_static_object(&once_value_1
);
423 } else fra
.me
.REG
[2] = once_value_1
;
424 fra
.me
.REG
[2] = fra
.me
.REG
[2];
425 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
426 fra
.me
.REG
[0] = CALL_standard___string___Object___to_s(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
427 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
429 fra
.me
.REG
[0] = BOX_NativeString(")");
431 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
432 once_value_2
= fra
.me
.REG
[0];
433 register_static_object(&once_value_2
);
434 } else fra
.me
.REG
[0] = once_value_2
;
435 fra
.me
.REG
[0] = fra
.me
.REG
[0];
436 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
437 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
440 /* ./../lib/opts.nit:77 */
442 fra
.me
.REG
[0] = BOX_NativeString("");
444 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
445 once_value_4
= fra
.me
.REG
[0];
446 register_static_object(&once_value_4
);
447 } else fra
.me
.REG
[0] = once_value_4
;
448 fra
.me
.REG
[0] = fra
.me
.REG
[0];
449 fra
.me
.REG
[1] = fra
.me
.REG
[0];
452 stack_frame_head
= fra
.me
.prev
;
453 return fra
.me
.REG
[1];
455 void opts___Option___read_param(val_t p0
, val_t p1
){
456 struct {struct stack_frame_t me
;} fra
;
458 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
459 fra
.me
.file
= LOCATE_opts
;
461 fra
.me
.meth
= LOCATE_opts___Option___read_param
;
462 fra
.me
.has_broke
= 0;
464 /* ./../lib/opts.nit:80 */
465 nit_abort("Deferred method called", NULL
, LOCATE_opts
, 80);
466 stack_frame_head
= fra
.me
.prev
;
469 void opts___OptionText___init(val_t p0
, val_t p1
, int* init_table
){
470 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionText
].i
;
471 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
473 if (init_table
[itpos1
]) return;
474 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
475 fra
.me
.file
= LOCATE_opts
;
477 fra
.me
.meth
= LOCATE_opts___OptionText___init
;
478 fra
.me
.has_broke
= 0;
480 fra
.me
.REG
[0] = NIT_NULL
;
481 fra
.me
.REG
[1] = NIT_NULL
;
484 /* ./../lib/opts.nit:86 */
485 CALL_opts___Option___init_opt(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], NIT_NULL
, NIT_NULL
, init_table
);
486 stack_frame_head
= fra
.me
.prev
;
487 init_table
[itpos1
] = 1;
490 val_t
opts___OptionText___pretty(val_t p0
, val_t p1
){
491 struct {struct stack_frame_t me
;} fra
;
494 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
495 fra
.me
.file
= LOCATE_opts
;
497 fra
.me
.meth
= LOCATE_opts___OptionText___pretty
;
498 fra
.me
.has_broke
= 0;
500 fra
.me
.REG
[0] = NIT_NULL
;
503 /* ./../lib/opts.nit:88 */
504 fra
.me
.REG
[0] = CALL_standard___string___Object___to_s(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
507 stack_frame_head
= fra
.me
.prev
;
508 return fra
.me
.REG
[0];
510 val_t
opts___OptionText___to_s(val_t p0
){
511 struct {struct stack_frame_t me
;} fra
;
513 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
514 fra
.me
.file
= LOCATE_opts
;
516 fra
.me
.meth
= LOCATE_opts___OptionText___to_s
;
517 fra
.me
.has_broke
= 0;
519 fra
.me
.REG
[0] = NIT_NULL
;
521 /* ./../lib/opts.nit:90 */
522 fra
.me
.REG
[0] = CALL_opts___Option___helptext(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
525 stack_frame_head
= fra
.me
.prev
;
526 return fra
.me
.REG
[0];
528 void opts___OptionBool___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
529 int itpos2
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionBool
].i
;
530 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
533 if (init_table
[itpos2
]) return;
534 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
535 fra
.me
.file
= LOCATE_opts
;
537 fra
.me
.meth
= LOCATE_opts___OptionBool___init
;
538 fra
.me
.has_broke
= 0;
540 fra
.me
.REG
[0] = NIT_NULL
;
541 fra
.me
.REG
[1] = NIT_NULL
;
542 fra
.me
.REG
[2] = NIT_NULL
;
543 fra
.me
.REG
[3] = NIT_NULL
;
547 /* ./../lib/opts.nit:97 */
548 fra
.me
.REG
[3] = fra
.me
.REG
[0];
549 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[2], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
550 if (UNTAG_Bool(REGB0
)) {
552 nit_abort("Cast failed", NULL
, LOCATE_opts
, 97);
554 REGB0
= TAG_Bool(false);
555 CALL_opts___Option___init_opt(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1], REGB0
, fra
.me
.REG
[2], init_table
);
556 stack_frame_head
= fra
.me
.prev
;
557 init_table
[itpos2
] = 1;
560 void opts___OptionBool___read_param(val_t p0
, val_t p1
){
561 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
564 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
565 fra
.me
.file
= LOCATE_opts
;
567 fra
.me
.meth
= LOCATE_opts___OptionBool___read_param
;
568 fra
.me
.has_broke
= 0;
570 fra
.me
.REG
[0] = NIT_NULL
;
571 fra
.me
.REG
[1] = NIT_NULL
;
574 /* ./../lib/opts.nit:99 */
575 REGB0
= TAG_Bool(true);
576 CALL_opts___Option___value__eq(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
577 stack_frame_head
= fra
.me
.prev
;
580 void opts___OptionCount___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
581 int itpos3
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionCount
].i
;
582 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
585 if (init_table
[itpos3
]) return;
586 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
587 fra
.me
.file
= LOCATE_opts
;
589 fra
.me
.meth
= LOCATE_opts___OptionCount___init
;
590 fra
.me
.has_broke
= 0;
592 fra
.me
.REG
[0] = NIT_NULL
;
593 fra
.me
.REG
[1] = NIT_NULL
;
594 fra
.me
.REG
[2] = NIT_NULL
;
595 fra
.me
.REG
[3] = NIT_NULL
;
599 /* ./../lib/opts.nit:106 */
600 fra
.me
.REG
[3] = fra
.me
.REG
[0];
601 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[2], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
602 if (UNTAG_Bool(REGB0
)) {
604 nit_abort("Cast failed", NULL
, LOCATE_opts
, 106);
607 CALL_opts___Option___init_opt(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1], REGB0
, fra
.me
.REG
[2], init_table
);
608 stack_frame_head
= fra
.me
.prev
;
609 init_table
[itpos3
] = 1;
612 void opts___OptionCount___read_param(val_t p0
, val_t p1
){
613 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
616 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
617 fra
.me
.file
= LOCATE_opts
;
619 fra
.me
.meth
= LOCATE_opts___OptionCount___read_param
;
620 fra
.me
.has_broke
= 0;
622 fra
.me
.REG
[0] = NIT_NULL
;
623 fra
.me
.REG
[1] = NIT_NULL
;
626 /* ./../lib/opts.nit:108 */
627 fra
.me
.REG
[1] = CALL_opts___Option___value(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
629 /* ./../lib/standard//kernel.nit:235 */
630 REGB0
= TAG_Int(UNTAG_Int(fra
.me
.REG
[1])+UNTAG_Int(REGB0
));
631 /* ./../lib/opts.nit:108 */
632 CALL_opts___Option___value__eq(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
633 stack_frame_head
= fra
.me
.prev
;
636 val_t
opts___OptionParameter___convert(val_t p0
, val_t p1
){
637 struct {struct stack_frame_t me
;} fra
;
639 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
640 fra
.me
.file
= LOCATE_opts
;
642 fra
.me
.meth
= LOCATE_opts___OptionParameter___convert
;
643 fra
.me
.has_broke
= 0;
645 /* ./../lib/opts.nit:114 */
646 nit_abort("Deferred method called", NULL
, LOCATE_opts
, 114);
647 stack_frame_head
= fra
.me
.prev
;
650 void opts___OptionParameter___read_param(val_t p0
, val_t p1
){
651 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
654 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
655 fra
.me
.file
= LOCATE_opts
;
657 fra
.me
.meth
= LOCATE_opts___OptionParameter___read_param
;
658 fra
.me
.has_broke
= 0;
660 fra
.me
.REG
[0] = NIT_NULL
;
661 fra
.me
.REG
[1] = NIT_NULL
;
662 fra
.me
.REG
[2] = NIT_NULL
;
665 /* ./../lib/opts.nit:118 */
666 REGB0
= CALL_standard___collection___abstract_collection___Iterator___is_ok(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
667 if (UNTAG_Bool(REGB0
)) {
668 /* ./../lib/opts.nit:119 */
669 fra
.me
.REG
[2] = CALL_standard___collection___abstract_collection___Iterator___item(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
670 fra
.me
.REG
[2] = CALL_opts___OptionParameter___convert(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
671 CALL_opts___Option___value__eq(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
672 /* ./../lib/opts.nit:120 */
673 CALL_standard___collection___abstract_collection___Iterator___next(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
675 stack_frame_head
= fra
.me
.prev
;
678 void opts___OptionParameter___init_opt(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
679 int itpos4
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionParameter
].i
;
680 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
682 if (init_table
[itpos4
]) return;
683 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
684 fra
.me
.file
= LOCATE_opts
;
686 fra
.me
.meth
= LOCATE_opts___OptionParameter___init_opt
;
687 fra
.me
.has_broke
= 0;
689 fra
.me
.REG
[0] = NIT_NULL
;
690 fra
.me
.REG
[1] = NIT_NULL
;
691 fra
.me
.REG
[2] = NIT_NULL
;
692 fra
.me
.REG
[3] = NIT_NULL
;
697 /* ./../lib/opts.nit:126 */
698 CALL_opts___Option___init_opt(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], fra
.me
.REG
[3], init_table
);
699 stack_frame_head
= fra
.me
.prev
;
700 init_table
[itpos4
] = 1;
703 void opts___OptionString___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
704 int itpos5
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionString
].i
;
705 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
708 if (init_table
[itpos5
]) return;
709 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
710 fra
.me
.file
= LOCATE_opts
;
712 fra
.me
.meth
= LOCATE_opts___OptionString___init
;
713 fra
.me
.has_broke
= 0;
715 fra
.me
.REG
[0] = NIT_NULL
;
716 fra
.me
.REG
[1] = NIT_NULL
;
717 fra
.me
.REG
[2] = NIT_NULL
;
718 fra
.me
.REG
[3] = NIT_NULL
;
722 /* ./../lib/opts.nit:133 */
723 fra
.me
.REG
[3] = fra
.me
.REG
[0];
724 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[2], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
725 if (UNTAG_Bool(REGB0
)) {
727 nit_abort("Cast failed", NULL
, LOCATE_opts
, 133);
729 CALL_opts___OptionParameter___init_opt(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1], NIT_NULL
, fra
.me
.REG
[2], init_table
);
730 stack_frame_head
= fra
.me
.prev
;
731 init_table
[itpos5
] = 1;
734 val_t
opts___OptionString___convert(val_t p0
, val_t p1
){
735 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
737 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
738 fra
.me
.file
= LOCATE_opts
;
740 fra
.me
.meth
= LOCATE_opts___OptionString___convert
;
741 fra
.me
.has_broke
= 0;
743 fra
.me
.REG
[0] = NIT_NULL
;
744 fra
.me
.REG
[1] = NIT_NULL
;
747 /* ./../lib/opts.nit:135 */
750 stack_frame_head
= fra
.me
.prev
;
751 return fra
.me
.REG
[1];
753 void opts___OptionEnum___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, val_t p4
, int* init_table
){
754 int itpos6
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionEnum
].i
;
755 struct {struct stack_frame_t me
; val_t MORE_REG
[5];} fra
;
761 static val_t once_value_1
; /* Once value */
762 static val_t once_value_2
; /* Once value */
763 static val_t once_value_3
; /* Once value */
764 static val_t once_value_4
; /* Once value */
765 if (init_table
[itpos6
]) return;
766 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
767 fra
.me
.file
= LOCATE_opts
;
769 fra
.me
.meth
= LOCATE_opts___OptionEnum___init
;
770 fra
.me
.has_broke
= 0;
772 fra
.me
.REG
[0] = NIT_NULL
;
773 fra
.me
.REG
[1] = NIT_NULL
;
774 fra
.me
.REG
[2] = NIT_NULL
;
775 fra
.me
.REG
[3] = NIT_NULL
;
776 fra
.me
.REG
[4] = NIT_NULL
;
777 fra
.me
.REG
[5] = NIT_NULL
;
783 /* ./../lib/opts.nit:143 */
784 fra
.me
.REG
[4] = fra
.me
.REG
[0];
785 REGB1
= TAG_Bool(VAL_ISA(fra
.me
.REG
[3], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
786 if (UNTAG_Bool(REGB1
)) {
788 nit_abort("Cast failed", NULL
, LOCATE_opts
, 143);
790 /* ./../lib/standard//collection//array.nit:24 */
791 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
792 if (UNTAG_Bool(REGB1
)) {
794 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
796 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
797 /* ./../lib/opts.nit:145 */
799 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
800 if (UNTAG_Bool(REGB3
)) {
802 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
804 /* ./../lib/standard//kernel.nit:234 */
805 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)>UNTAG_Int(REGB2
));
806 /* ./../lib/opts.nit:145 */
807 if (UNTAG_Bool(REGB2
)) {
809 nit_abort("Assert failed", NULL
, LOCATE_opts
, 145);
811 /* ./../lib/opts.nit:146 */
812 fra
.me
.REG
[0] = CALL_standard___collection___array___Collection___to_a(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
813 ATTR_opts___OptionEnum____values(fra
.me
.REG
[4]) = fra
.me
.REG
[0];
814 /* ./../lib/opts.nit:147 */
816 fra
.me
.REG
[0] = NEW_Array_standard___collection___array___Array___with_capacity(REGB2
);
818 fra
.me
.REG
[5] = BOX_NativeString("");
820 fra
.me
.REG
[5] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[5], REGB2
);
821 once_value_1
= fra
.me
.REG
[5];
822 register_static_object(&once_value_1
);
823 } else fra
.me
.REG
[5] = once_value_1
;
824 fra
.me
.REG
[5] = fra
.me
.REG
[5];
825 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[5]);
826 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
828 fra
.me
.REG
[2] = BOX_NativeString(" <");
830 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB2
);
831 once_value_2
= fra
.me
.REG
[2];
832 register_static_object(&once_value_2
);
833 } else fra
.me
.REG
[2] = once_value_2
;
834 fra
.me
.REG
[2] = fra
.me
.REG
[2];
835 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
837 fra
.me
.REG
[2] = BOX_NativeString(", ");
839 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB2
);
840 once_value_3
= fra
.me
.REG
[2];
841 register_static_object(&once_value_3
);
842 } else fra
.me
.REG
[2] = once_value_3
;
843 fra
.me
.REG
[2] = fra
.me
.REG
[2];
844 fra
.me
.REG
[2] = CALL_standard___string___Collection___join(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
845 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
847 fra
.me
.REG
[2] = BOX_NativeString(">");
849 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB2
);
850 once_value_4
= fra
.me
.REG
[2];
851 register_static_object(&once_value_4
);
852 } else fra
.me
.REG
[2] = once_value_4
;
853 fra
.me
.REG
[2] = fra
.me
.REG
[2];
854 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
855 fra
.me
.REG
[0] = CALL_standard___string___Object___to_s(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
856 CALL_opts___OptionParameter___init_opt(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[0], REGB0
, fra
.me
.REG
[3], init_table
);
857 stack_frame_head
= fra
.me
.prev
;
858 init_table
[itpos6
] = 1;
861 val_t
opts___OptionEnum___convert(val_t p0
, val_t p1
){
862 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
865 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
866 fra
.me
.file
= LOCATE_opts
;
868 fra
.me
.meth
= LOCATE_opts___OptionEnum___convert
;
869 fra
.me
.has_broke
= 0;
871 fra
.me
.REG
[0] = NIT_NULL
;
872 fra
.me
.REG
[1] = NIT_NULL
;
875 /* ./../lib/opts.nit:152 */
876 REGB0
= TAG_Bool(ATTR_opts___OptionEnum____values(fra
.me
.REG
[0])!=NIT_NULL
);
877 if (UNTAG_Bool(REGB0
)) {
879 nit_abort("Uninitialized attribute %s", "_values", LOCATE_opts
, 152);
881 fra
.me
.REG
[0] = ATTR_opts___OptionEnum____values(fra
.me
.REG
[0]);
882 REGB0
= CALL_standard___collection___abstract_collection___SequenceRead___index_of(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
883 /* ./../lib/opts.nit:153 */
886 stack_frame_head
= fra
.me
.prev
;
889 val_t
opts___OptionEnum___value_name(val_t p0
){
890 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
895 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
896 fra
.me
.file
= LOCATE_opts
;
898 fra
.me
.meth
= LOCATE_opts___OptionEnum___value_name
;
899 fra
.me
.has_broke
= 0;
901 fra
.me
.REG
[0] = NIT_NULL
;
902 fra
.me
.REG
[1] = NIT_NULL
;
904 /* ./../lib/opts.nit:156 */
905 REGB0
= TAG_Bool(ATTR_opts___OptionEnum____values(fra
.me
.REG
[0])!=NIT_NULL
);
906 if (UNTAG_Bool(REGB0
)) {
908 nit_abort("Uninitialized attribute %s", "_values", LOCATE_opts
, 156);
910 fra
.me
.REG
[1] = ATTR_opts___OptionEnum____values(fra
.me
.REG
[0]);
911 fra
.me
.REG
[0] = CALL_opts___Option___value(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
912 /* ./../lib/standard//collection//array.nit:278 */
913 REGB0
= fra
.me
.REG
[0];
914 /* ./../lib/standard//collection//array.nit:280 */
916 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
917 if (UNTAG_Bool(REGB2
)) {
919 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
921 /* ./../lib/standard//kernel.nit:233 */
922 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
923 /* ./../lib/standard//collection//array.nit:280 */
924 if (UNTAG_Bool(REGB1
)) {
925 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
926 if (UNTAG_Bool(REGB1
)) {
928 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 280);
930 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
931 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
932 if (UNTAG_Bool(REGB2
)) {
934 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
936 /* ./../lib/standard//kernel.nit:232 */
937 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
939 /* ./../lib/standard//collection//array.nit:280 */
940 REGB2
= TAG_Bool(false);
943 if (UNTAG_Bool(REGB1
)) {
945 nit_abort("Assert %s failed", "'index'", LOCATE_standard___collection___array
, 280);
947 /* ./../lib/standard//collection//array.nit:281 */
948 fra
.me
.REG
[1] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
949 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
950 if (UNTAG_Bool(REGB1
)) {
951 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 281);
953 /* ./../lib/standard//collection//array.nit:718 */
954 fra
.me
.REG
[1] = ((Nit_NativeArray
)fra
.me
.REG
[1])->val
[UNTAG_Int(REGB0
)];
955 /* ./../lib/standard//collection//array.nit:281 */
958 /* ./../lib/opts.nit:156 */
961 stack_frame_head
= fra
.me
.prev
;
962 return fra
.me
.REG
[1];
964 val_t
opts___OptionEnum___pretty_default(val_t p0
){
965 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
970 static val_t once_value_1
; /* Once value */
971 static val_t once_value_3
; /* Once value */
972 static val_t once_value_5
; /* Once value */
973 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
974 fra
.me
.file
= LOCATE_opts
;
976 fra
.me
.meth
= LOCATE_opts___OptionEnum___pretty_default
;
977 fra
.me
.has_broke
= 0;
979 fra
.me
.REG
[0] = NIT_NULL
;
980 fra
.me
.REG
[1] = NIT_NULL
;
981 fra
.me
.REG
[2] = NIT_NULL
;
982 fra
.me
.REG
[3] = NIT_NULL
;
984 /* ./../lib/opts.nit:158 */
985 fra
.me
.REG
[1] = fra
.me
.REG
[0];
986 /* ./../lib/opts.nit:160 */
987 fra
.me
.REG
[2] = CALL_opts___Option___default_value(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
988 REGB0
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
989 if (UNTAG_Bool(REGB0
)) {
991 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
992 if (UNTAG_Bool(REGB1
)) {
993 REGB1
= TAG_Bool(false);
996 /* ./../lib/standard//kernel.nit:227 */
997 REGB1
= TAG_Bool((fra
.me
.REG
[2])==(NIT_NULL
));
998 /* ./../lib/opts.nit:160 */
1002 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
1003 if (UNTAG_Bool(REGB0
)) {
1004 /* ./../lib/opts.nit:161 */
1006 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
1007 if (!once_value_1
) {
1008 fra
.me
.REG
[3] = BOX_NativeString(" (");
1010 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
1011 once_value_1
= fra
.me
.REG
[3];
1012 register_static_object(&once_value_1
);
1013 } else fra
.me
.REG
[3] = once_value_1
;
1014 fra
.me
.REG
[3] = fra
.me
.REG
[3];
1015 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1016 REGB0
= TAG_Bool(ATTR_opts___OptionEnum____values(fra
.me
.REG
[1])!=NIT_NULL
);
1017 if (UNTAG_Bool(REGB0
)) {
1019 nit_abort("Uninitialized attribute %s", "_values", LOCATE_opts
, 161);
1021 fra
.me
.REG
[3] = ATTR_opts___OptionEnum____values(fra
.me
.REG
[1]);
1022 fra
.me
.REG
[1] = CALL_opts___Option___default_value(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1023 REGB0
= TAG_Bool((fra
.me
.REG
[1]!=NIT_NULL
) && VAL_ISA(fra
.me
.REG
[1], VTCOLOR_opts___Option___VALUE(fra
.me
.REG
[0]), VTID_opts___Option___VALUE(fra
.me
.REG
[0]))) /*cast VALUE*/;
1024 if (UNTAG_Bool(REGB0
)) {
1026 nit_abort("Cast failed", NULL
, LOCATE_opts
, 161);
1028 /* ./../lib/standard//collection//array.nit:278 */
1029 REGB0
= fra
.me
.REG
[1];
1030 /* ./../lib/standard//collection//array.nit:280 */
1032 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1033 if (UNTAG_Bool(REGB2
)) {
1035 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1037 /* ./../lib/standard//kernel.nit:233 */
1038 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
1039 /* ./../lib/standard//collection//array.nit:280 */
1040 if (UNTAG_Bool(REGB1
)) {
1041 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
1042 if (UNTAG_Bool(REGB1
)) {
1044 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 280);
1046 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3]);
1047 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1048 if (UNTAG_Bool(REGB2
)) {
1050 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1052 /* ./../lib/standard//kernel.nit:232 */
1053 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1055 /* ./../lib/standard//collection//array.nit:280 */
1056 REGB2
= TAG_Bool(false);
1059 if (UNTAG_Bool(REGB1
)) {
1061 nit_abort("Assert %s failed", "'index'", LOCATE_standard___collection___array
, 280);
1063 /* ./../lib/standard//collection//array.nit:281 */
1064 fra
.me
.REG
[3] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[3]);
1065 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
1066 if (UNTAG_Bool(REGB1
)) {
1067 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 281);
1069 /* ./../lib/standard//collection//array.nit:718 */
1070 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[3])->val
[UNTAG_Int(REGB0
)];
1071 /* ./../lib/standard//collection//array.nit:281 */
1074 /* ./../lib/opts.nit:161 */
1075 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1076 if (!once_value_3
) {
1077 fra
.me
.REG
[3] = BOX_NativeString(")");
1079 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
1080 once_value_3
= fra
.me
.REG
[3];
1081 register_static_object(&once_value_3
);
1082 } else fra
.me
.REG
[3] = once_value_3
;
1083 fra
.me
.REG
[3] = fra
.me
.REG
[3];
1084 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1085 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1088 /* ./../lib/opts.nit:163 */
1089 if (!once_value_5
) {
1090 fra
.me
.REG
[3] = BOX_NativeString("");
1092 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
1093 once_value_5
= fra
.me
.REG
[3];
1094 register_static_object(&once_value_5
);
1095 } else fra
.me
.REG
[3] = once_value_5
;
1096 fra
.me
.REG
[3] = fra
.me
.REG
[3];
1097 fra
.me
.REG
[2] = fra
.me
.REG
[3];
1101 stack_frame_head
= fra
.me
.prev
;
1102 return fra
.me
.REG
[2];
1104 void opts___OptionInt___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
1105 int itpos7
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionInt
].i
;
1106 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1110 if (init_table
[itpos7
]) return;
1111 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1112 fra
.me
.file
= LOCATE_opts
;
1114 fra
.me
.meth
= LOCATE_opts___OptionInt___init
;
1115 fra
.me
.has_broke
= 0;
1116 fra
.me
.REG_size
= 4;
1117 fra
.me
.REG
[0] = NIT_NULL
;
1118 fra
.me
.REG
[1] = NIT_NULL
;
1119 fra
.me
.REG
[2] = NIT_NULL
;
1120 fra
.me
.REG
[3] = NIT_NULL
;
1125 /* ./../lib/opts.nit:172 */
1126 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1127 REGB1
= TAG_Bool(VAL_ISA(fra
.me
.REG
[2], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
1128 if (UNTAG_Bool(REGB1
)) {
1130 nit_abort("Cast failed", NULL
, LOCATE_opts
, 172);
1132 CALL_opts___OptionParameter___init_opt(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1], REGB0
, fra
.me
.REG
[2], init_table
);
1133 stack_frame_head
= fra
.me
.prev
;
1134 init_table
[itpos7
] = 1;
1137 val_t
opts___OptionInt___convert(val_t p0
, val_t p1
){
1138 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1141 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1142 fra
.me
.file
= LOCATE_opts
;
1144 fra
.me
.meth
= LOCATE_opts___OptionInt___convert
;
1145 fra
.me
.has_broke
= 0;
1146 fra
.me
.REG_size
= 2;
1147 fra
.me
.REG
[0] = NIT_NULL
;
1148 fra
.me
.REG
[1] = NIT_NULL
;
1151 /* ./../lib/opts.nit:174 */
1152 REGB0
= CALL_standard___string___AbstractString___to_i(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1155 stack_frame_head
= fra
.me
.prev
;
1158 void opts___OptionArray___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1159 int itpos8
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionArray
].i
;
1160 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1163 if (init_table
[itpos8
]) return;
1164 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1165 fra
.me
.file
= LOCATE_opts
;
1167 fra
.me
.meth
= LOCATE_opts___OptionArray___init
;
1168 fra
.me
.has_broke
= 0;
1169 fra
.me
.REG_size
= 4;
1170 fra
.me
.REG
[0] = NIT_NULL
;
1171 fra
.me
.REG
[1] = NIT_NULL
;
1172 fra
.me
.REG
[2] = NIT_NULL
;
1173 fra
.me
.REG
[3] = NIT_NULL
;
1177 /* ./../lib/opts.nit:181 */
1178 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1179 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[2], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[String]*/;
1180 if (UNTAG_Bool(REGB0
)) {
1182 nit_abort("Cast failed", NULL
, LOCATE_opts
, 181);
1184 /* ./../lib/opts.nit:183 */
1185 fra
.me
.REG
[0] = NEW_Array_standard___collection___array___Array___init();
1186 ATTR_opts___OptionArray____values(fra
.me
.REG
[3]) = fra
.me
.REG
[0];
1187 /* ./../lib/opts.nit:184 */
1188 REGB0
= TAG_Bool(ATTR_opts___OptionArray____values(fra
.me
.REG
[3])!=NIT_NULL
);
1189 if (UNTAG_Bool(REGB0
)) {
1191 nit_abort("Uninitialized attribute %s", "_values", LOCATE_opts
, 184);
1193 fra
.me
.REG
[0] = ATTR_opts___OptionArray____values(fra
.me
.REG
[3]);
1194 CALL_opts___OptionParameter___init_opt(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1], fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1195 stack_frame_head
= fra
.me
.prev
;
1196 init_table
[itpos8
] = 1;
1199 val_t
opts___OptionArray___convert(val_t p0
, val_t p1
){
1200 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1203 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1204 fra
.me
.file
= LOCATE_opts
;
1206 fra
.me
.meth
= LOCATE_opts___OptionArray___convert
;
1207 fra
.me
.has_broke
= 0;
1208 fra
.me
.REG_size
= 3;
1209 fra
.me
.REG
[0] = NIT_NULL
;
1210 fra
.me
.REG
[1] = NIT_NULL
;
1211 fra
.me
.REG
[2] = NIT_NULL
;
1214 /* ./../lib/opts.nit:190 */
1215 REGB0
= TAG_Bool(ATTR_opts___OptionArray____values(fra
.me
.REG
[0])!=NIT_NULL
);
1216 if (UNTAG_Bool(REGB0
)) {
1218 nit_abort("Uninitialized attribute %s", "_values", LOCATE_opts
, 190);
1220 fra
.me
.REG
[2] = ATTR_opts___OptionArray____values(fra
.me
.REG
[0]);
1221 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
1222 /* ./../lib/opts.nit:191 */
1223 REGB0
= TAG_Bool(ATTR_opts___OptionArray____values(fra
.me
.REG
[0])!=NIT_NULL
);
1224 if (UNTAG_Bool(REGB0
)) {
1226 nit_abort("Uninitialized attribute %s", "_values", LOCATE_opts
, 191);
1228 fra
.me
.REG
[0] = ATTR_opts___OptionArray____values(fra
.me
.REG
[0]);
1231 stack_frame_head
= fra
.me
.prev
;
1232 return fra
.me
.REG
[0];
1234 val_t
opts___OptionContext___options(val_t p0
){
1235 struct {struct stack_frame_t me
;} fra
;
1238 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1239 fra
.me
.file
= LOCATE_opts
;
1241 fra
.me
.meth
= LOCATE_opts___OptionContext___options
;
1242 fra
.me
.has_broke
= 0;
1243 fra
.me
.REG_size
= 1;
1244 fra
.me
.REG
[0] = NIT_NULL
;
1246 /* ./../lib/opts.nit:196 */
1247 REGB0
= TAG_Bool(ATTR_opts___OptionContext____options(fra
.me
.REG
[0])!=NIT_NULL
);
1248 if (UNTAG_Bool(REGB0
)) {
1250 nit_abort("Uninitialized attribute %s", "_options", LOCATE_opts
, 196);
1252 fra
.me
.REG
[0] = ATTR_opts___OptionContext____options(fra
.me
.REG
[0]);
1253 stack_frame_head
= fra
.me
.prev
;
1254 return fra
.me
.REG
[0];
1256 val_t
opts___OptionContext___rest(val_t p0
){
1257 struct {struct stack_frame_t me
;} fra
;
1260 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1261 fra
.me
.file
= LOCATE_opts
;
1263 fra
.me
.meth
= LOCATE_opts___OptionContext___rest
;
1264 fra
.me
.has_broke
= 0;
1265 fra
.me
.REG_size
= 1;
1266 fra
.me
.REG
[0] = NIT_NULL
;
1268 /* ./../lib/opts.nit:197 */
1269 REGB0
= TAG_Bool(ATTR_opts___OptionContext____rest(fra
.me
.REG
[0])!=NIT_NULL
);
1270 if (UNTAG_Bool(REGB0
)) {
1272 nit_abort("Uninitialized attribute %s", "_rest", LOCATE_opts
, 197);
1274 fra
.me
.REG
[0] = ATTR_opts___OptionContext____rest(fra
.me
.REG
[0]);
1275 stack_frame_head
= fra
.me
.prev
;
1276 return fra
.me
.REG
[0];
1278 void opts___OptionContext___usage(val_t p0
){
1279 struct {struct stack_frame_t me
; val_t MORE_REG
[5];} fra
;
1287 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1288 fra
.me
.file
= LOCATE_opts
;
1290 fra
.me
.meth
= LOCATE_opts___OptionContext___usage
;
1291 fra
.me
.has_broke
= 0;
1292 fra
.me
.REG_size
= 6;
1293 fra
.me
.REG
[0] = NIT_NULL
;
1294 fra
.me
.REG
[1] = NIT_NULL
;
1295 fra
.me
.REG
[2] = NIT_NULL
;
1296 fra
.me
.REG
[3] = NIT_NULL
;
1297 fra
.me
.REG
[4] = NIT_NULL
;
1298 fra
.me
.REG
[5] = NIT_NULL
;
1300 /* ./../lib/opts.nit:203 */
1302 /* ./../lib/opts.nit:204 */
1303 REGB1
= TAG_Bool(ATTR_opts___OptionContext____options(fra
.me
.REG
[0])!=NIT_NULL
);
1304 if (UNTAG_Bool(REGB1
)) {
1306 nit_abort("Uninitialized attribute %s", "_options", LOCATE_opts
, 204);
1308 fra
.me
.REG
[1] = ATTR_opts___OptionContext____options(fra
.me
.REG
[0]);
1309 /* ./../lib/standard//collection//array.nit:269 */
1311 /* ./../lib/standard//collection//array.nit:270 */
1312 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1313 if (UNTAG_Bool(REGB2
)) {
1315 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1317 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1318 /* ./../lib/standard//collection//array.nit:271 */
1319 fra
.me
.REG
[2] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
1320 /* ./../lib/standard//collection//array.nit:272 */
1322 /* ./../lib/standard//collection//array.nit:24 */
1323 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1324 if (UNTAG_Bool(REGB2
)) {
1326 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1328 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1329 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1330 if (UNTAG_Bool(REGB3
)) {
1332 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1334 /* ./../lib/standard//kernel.nit:232 */
1335 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
1336 /* ./../lib/standard//collection//array.nit:272 */
1337 if (UNTAG_Bool(REGB2
)) {
1338 /* ./../lib/standard//collection//array.nit:273 */
1339 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
1340 if (UNTAG_Bool(REGB2
)) {
1341 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1343 /* ./../lib/standard//collection//array.nit:718 */
1344 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[2])->val
[UNTAG_Int(REGB1
)];
1345 /* ./../lib/opts.nit:205 */
1347 /* ./../lib/opts.nit:206 */
1348 fra
.me
.REG
[3] = CALL_opts___Option___names(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1349 /* ./../lib/standard//collection//array.nit:269 */
1351 /* ./../lib/standard//collection//array.nit:270 */
1352 REGB4
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
1353 if (UNTAG_Bool(REGB4
)) {
1355 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1357 REGB4
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3]);
1358 /* ./../lib/standard//collection//array.nit:271 */
1359 fra
.me
.REG
[4] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[3]);
1360 /* ./../lib/standard//collection//array.nit:272 */
1362 /* ./../lib/standard//collection//array.nit:24 */
1363 REGB4
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
1364 if (UNTAG_Bool(REGB4
)) {
1366 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1368 REGB4
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3]);
1369 REGB5
= TAG_Bool(VAL_ISA(REGB4
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3
), VTID_standard___kernel___Comparable___OTHER(REGB3
))) /*cast OTHER*/;
1370 if (UNTAG_Bool(REGB5
)) {
1372 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1374 /* ./../lib/standard//kernel.nit:232 */
1375 REGB4
= TAG_Bool(UNTAG_Int(REGB3
)<UNTAG_Int(REGB4
));
1376 /* ./../lib/standard//collection//array.nit:272 */
1377 if (UNTAG_Bool(REGB4
)) {
1378 /* ./../lib/standard//collection//array.nit:273 */
1379 REGB4
= TAG_Bool(fra
.me
.REG
[4]==NIT_NULL
);
1380 if (UNTAG_Bool(REGB4
)) {
1381 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1383 /* ./../lib/standard//collection//array.nit:718 */
1384 fra
.me
.REG
[5] = ((Nit_NativeArray
)fra
.me
.REG
[4])->val
[UNTAG_Int(REGB3
)];
1385 /* ./../lib/standard//collection//array.nit:24 */
1386 REGB4
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[5])!=NIT_NULL
);
1387 if (UNTAG_Bool(REGB4
)) {
1389 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1391 REGB4
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[5]);
1392 /* ./../lib/opts.nit:207 */
1394 /* ./../lib/standard//kernel.nit:235 */
1395 REGB5
= TAG_Int(UNTAG_Int(REGB4
)+UNTAG_Int(REGB5
));
1396 REGB5
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB5
));
1397 /* ./../lib/opts.nit:207 */
1399 /* ./../lib/standard//collection//array.nit:274 */
1401 /* ./../lib/standard//kernel.nit:235 */
1402 REGB5
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB5
));
1403 /* ./../lib/standard//collection//array.nit:274 */
1406 /* ./../lib/standard//collection//array.nit:272 */
1411 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1412 if (UNTAG_Bool(REGB3
)) {
1414 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1416 /* ./../lib/standard//kernel.nit:232 */
1417 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB2
));
1418 /* ./../lib/opts.nit:209 */
1419 if (UNTAG_Bool(REGB3
)) {
1422 /* ./../lib/standard//collection//array.nit:274 */
1424 /* ./../lib/standard//kernel.nit:235 */
1425 REGB2
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB2
));
1426 /* ./../lib/standard//collection//array.nit:274 */
1429 /* ./../lib/standard//collection//array.nit:272 */
1434 /* ./../lib/opts.nit:212 */
1435 REGB1
= TAG_Bool(ATTR_opts___OptionContext____options(fra
.me
.REG
[0])!=NIT_NULL
);
1436 if (UNTAG_Bool(REGB1
)) {
1438 nit_abort("Uninitialized attribute %s", "_options", LOCATE_opts
, 212);
1440 fra
.me
.REG
[2] = ATTR_opts___OptionContext____options(fra
.me
.REG
[0]);
1441 /* ./../lib/standard//collection//array.nit:269 */
1443 /* ./../lib/standard//collection//array.nit:270 */
1444 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
1445 if (UNTAG_Bool(REGB2
)) {
1447 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1449 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2]);
1450 /* ./../lib/standard//collection//array.nit:271 */
1451 fra
.me
.REG
[1] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[2]);
1452 /* ./../lib/standard//collection//array.nit:272 */
1454 /* ./../lib/standard//collection//array.nit:24 */
1455 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
1456 if (UNTAG_Bool(REGB2
)) {
1458 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1460 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2]);
1461 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1462 if (UNTAG_Bool(REGB3
)) {
1464 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1466 /* ./../lib/standard//kernel.nit:232 */
1467 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
1468 /* ./../lib/standard//collection//array.nit:272 */
1469 if (UNTAG_Bool(REGB2
)) {
1470 /* ./../lib/standard//collection//array.nit:273 */
1471 REGB2
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
1472 if (UNTAG_Bool(REGB2
)) {
1473 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1475 /* ./../lib/standard//collection//array.nit:718 */
1476 fra
.me
.REG
[4] = ((Nit_NativeArray
)fra
.me
.REG
[1])->val
[UNTAG_Int(REGB1
)];
1477 /* ./../lib/opts.nit:213 */
1478 fra
.me
.REG
[4] = CALL_opts___Option___pretty(fra
.me
.REG
[4])(fra
.me
.REG
[4], REGB0
);
1479 CALL_standard___file___Object___print(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[4]);
1480 /* ./../lib/standard//collection//array.nit:274 */
1482 /* ./../lib/standard//kernel.nit:235 */
1483 REGB2
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB2
));
1484 /* ./../lib/standard//collection//array.nit:274 */
1487 /* ./../lib/standard//collection//array.nit:272 */
1492 stack_frame_head
= fra
.me
.prev
;
1495 void opts___OptionContext___parse(val_t p0
, val_t p1
){
1496 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1498 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1499 fra
.me
.file
= LOCATE_opts
;
1501 fra
.me
.meth
= LOCATE_opts___OptionContext___parse
;
1502 fra
.me
.has_broke
= 0;
1503 fra
.me
.REG_size
= 2;
1504 fra
.me
.REG
[0] = NIT_NULL
;
1505 fra
.me
.REG
[1] = NIT_NULL
;
1508 /* ./../lib/opts.nit:220 */
1509 fra
.me
.REG
[1] = CALL_standard___collection___abstract_collection___Collection___iterator(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1510 /* ./../lib/opts.nit:221 */
1511 CALL_opts___OptionContext___parse_intern(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
1512 stack_frame_head
= fra
.me
.prev
;
1515 void opts___OptionContext___parse_intern(val_t p0
, val_t p1
){
1516 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1521 static val_t once_value_1
; /* Once value */
1522 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1523 fra
.me
.file
= LOCATE_opts
;
1525 fra
.me
.meth
= LOCATE_opts___OptionContext___parse_intern
;
1526 fra
.me
.has_broke
= 0;
1527 fra
.me
.REG_size
= 5;
1528 fra
.me
.REG
[0] = NIT_NULL
;
1529 fra
.me
.REG
[1] = NIT_NULL
;
1530 fra
.me
.REG
[2] = NIT_NULL
;
1531 fra
.me
.REG
[3] = NIT_NULL
;
1532 fra
.me
.REG
[4] = NIT_NULL
;
1535 /* ./../lib/opts.nit:226 */
1536 REGB0
= TAG_Bool(true);
1537 /* ./../lib/opts.nit:227 */
1538 CALL_opts___OptionContext___build(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1539 /* ./../lib/opts.nit:228 */
1540 REGB1
= TAG_Bool(ATTR_opts___OptionContext____rest(fra
.me
.REG
[0])!=NIT_NULL
);
1541 if (UNTAG_Bool(REGB1
)) {
1543 nit_abort("Uninitialized attribute %s", "_rest", LOCATE_opts
, 228);
1545 fra
.me
.REG
[2] = ATTR_opts___OptionContext____rest(fra
.me
.REG
[0]);
1546 /* ./../lib/opts.nit:230 */
1548 if (UNTAG_Bool(REGB0
)) {
1549 REGB1
= CALL_standard___collection___abstract_collection___Iterator___is_ok(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1551 REGB2
= TAG_Bool(false);
1554 if (UNTAG_Bool(REGB1
)) {
1555 /* ./../lib/opts.nit:231 */
1556 fra
.me
.REG
[3] = CALL_standard___collection___abstract_collection___Iterator___item(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1557 /* ./../lib/opts.nit:232 */
1558 if (!once_value_1
) {
1559 fra
.me
.REG
[4] = BOX_NativeString("--");
1561 fra
.me
.REG
[4] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[4], REGB1
);
1562 once_value_1
= fra
.me
.REG
[4];
1563 register_static_object(&once_value_1
);
1564 } else fra
.me
.REG
[4] = once_value_1
;
1565 fra
.me
.REG
[4] = fra
.me
.REG
[4];
1566 REGB1
= TAG_Bool(IS_EQUAL_OO(fra
.me
.REG
[3],fra
.me
.REG
[4]));
1567 if (UNTAG_Bool(REGB1
)) {
1569 REGB2
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[4]);
1572 if (UNTAG_Bool(REGB1
)) {
1573 /* ./../lib/opts.nit:233 */
1574 CALL_standard___collection___abstract_collection___Iterator___next(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1575 /* ./../lib/opts.nit:234 */
1576 fra
.me
.REG
[4] = CALL_standard___collection___array___Iterator___to_a(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1577 CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[4]);
1578 /* ./../lib/opts.nit:235 */
1579 REGB1
= TAG_Bool(false);
1582 /* ./../lib/opts.nit:237 */
1583 REGB1
= TAG_Bool(ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0])!=NIT_NULL
);
1584 if (UNTAG_Bool(REGB1
)) {
1586 nit_abort("Uninitialized attribute %s", "_optmap", LOCATE_opts
, 237);
1588 fra
.me
.REG
[4] = ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0]);
1589 REGB1
= CALL_standard___collection___abstract_collection___MapRead___has_key(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
1590 if (UNTAG_Bool(REGB1
)) {
1591 /* ./../lib/opts.nit:238 */
1592 REGB1
= TAG_Bool(ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0])!=NIT_NULL
);
1593 if (UNTAG_Bool(REGB1
)) {
1595 nit_abort("Uninitialized attribute %s", "_optmap", LOCATE_opts
, 238);
1597 fra
.me
.REG
[4] = ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0]);
1598 fra
.me
.REG
[3] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
1599 /* ./../lib/opts.nit:239 */
1600 CALL_standard___collection___abstract_collection___Iterator___next(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1601 /* ./../lib/opts.nit:240 */
1602 CALL_opts___Option___read_param(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1]);
1604 /* ./../lib/opts.nit:242 */
1605 fra
.me
.REG
[3] = CALL_standard___collection___abstract_collection___Iterator___item(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1606 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1607 /* ./../lib/opts.nit:243 */
1608 CALL_standard___collection___abstract_collection___Iterator___next(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1612 /* ./../lib/opts.nit:230 */
1617 stack_frame_head
= fra
.me
.prev
;
1620 void opts___OptionContext___add_option(val_t p0
, val_t p1
){
1621 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1626 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1627 fra
.me
.file
= LOCATE_opts
;
1629 fra
.me
.meth
= LOCATE_opts___OptionContext___add_option
;
1630 fra
.me
.has_broke
= 0;
1631 fra
.me
.REG_size
= 5;
1632 fra
.me
.REG
[0] = NIT_NULL
;
1633 fra
.me
.REG
[1] = NIT_NULL
;
1634 fra
.me
.REG
[2] = NIT_NULL
;
1635 fra
.me
.REG
[3] = NIT_NULL
;
1636 fra
.me
.REG
[4] = NIT_NULL
;
1639 /* ./../lib/opts.nit:249 */
1640 fra
.me
.REG
[2] = fra
.me
.REG
[0];
1641 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[1], COLOR_standard___collection___array___Array
, ID_standard___collection___array___Array
)) /*cast Array[Option]*/;
1642 if (UNTAG_Bool(REGB0
)) {
1644 nit_abort("Cast failed", NULL
, LOCATE_opts
, 249);
1646 /* ./../lib/standard//collection//array.nit:269 */
1648 /* ./../lib/standard//collection//array.nit:270 */
1649 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1650 if (UNTAG_Bool(REGB1
)) {
1652 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1654 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1655 /* ./../lib/standard//collection//array.nit:271 */
1656 fra
.me
.REG
[0] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
1657 /* ./../lib/standard//collection//array.nit:272 */
1659 /* ./../lib/standard//collection//array.nit:24 */
1660 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1661 if (UNTAG_Bool(REGB1
)) {
1663 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1665 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1666 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1667 if (UNTAG_Bool(REGB2
)) {
1669 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1671 /* ./../lib/standard//kernel.nit:232 */
1672 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1673 /* ./../lib/standard//collection//array.nit:272 */
1674 if (UNTAG_Bool(REGB1
)) {
1675 /* ./../lib/standard//collection//array.nit:273 */
1676 REGB1
= TAG_Bool(fra
.me
.REG
[0]==NIT_NULL
);
1677 if (UNTAG_Bool(REGB1
)) {
1678 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1680 /* ./../lib/standard//collection//array.nit:718 */
1681 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[0])->val
[UNTAG_Int(REGB0
)];
1682 /* ./../lib/opts.nit:252 */
1683 REGB1
= TAG_Bool(ATTR_opts___OptionContext____options(fra
.me
.REG
[2])!=NIT_NULL
);
1684 if (UNTAG_Bool(REGB1
)) {
1686 nit_abort("Uninitialized attribute %s", "_options", LOCATE_opts
, 252);
1688 fra
.me
.REG
[4] = ATTR_opts___OptionContext____options(fra
.me
.REG
[2]);
1689 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
1690 /* ./../lib/standard//collection//array.nit:274 */
1692 /* ./../lib/standard//kernel.nit:235 */
1693 REGB1
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB1
));
1694 /* ./../lib/standard//collection//array.nit:274 */
1697 /* ./../lib/standard//collection//array.nit:272 */
1702 stack_frame_head
= fra
.me
.prev
;
1705 void opts___OptionContext___init(val_t p0
, int* init_table
){
1706 int itpos9
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_opts___OptionContext
].i
;
1707 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1709 if (init_table
[itpos9
]) return;
1710 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1711 fra
.me
.file
= LOCATE_opts
;
1713 fra
.me
.meth
= LOCATE_opts___OptionContext___init
;
1714 fra
.me
.has_broke
= 0;
1715 fra
.me
.REG_size
= 2;
1716 fra
.me
.REG
[0] = NIT_NULL
;
1717 fra
.me
.REG
[1] = NIT_NULL
;
1719 /* ./../lib/opts.nit:258 */
1720 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___init();
1721 ATTR_opts___OptionContext____options(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1722 /* ./../lib/opts.nit:259 */
1723 fra
.me
.REG
[1] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
1724 ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1725 /* ./../lib/opts.nit:260 */
1726 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___init();
1727 ATTR_opts___OptionContext____rest(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1728 stack_frame_head
= fra
.me
.prev
;
1729 init_table
[itpos9
] = 1;
1732 void opts___OptionContext___build(val_t p0
){
1733 struct {struct stack_frame_t me
; val_t MORE_REG
[7];} fra
;
1739 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1740 fra
.me
.file
= LOCATE_opts
;
1742 fra
.me
.meth
= LOCATE_opts___OptionContext___build
;
1743 fra
.me
.has_broke
= 0;
1744 fra
.me
.REG_size
= 8;
1745 fra
.me
.REG
[0] = NIT_NULL
;
1746 fra
.me
.REG
[1] = NIT_NULL
;
1747 fra
.me
.REG
[2] = NIT_NULL
;
1748 fra
.me
.REG
[3] = NIT_NULL
;
1749 fra
.me
.REG
[4] = NIT_NULL
;
1750 fra
.me
.REG
[5] = NIT_NULL
;
1751 fra
.me
.REG
[6] = NIT_NULL
;
1752 fra
.me
.REG
[7] = NIT_NULL
;
1754 /* ./../lib/opts.nit:265 */
1755 REGB0
= TAG_Bool(ATTR_opts___OptionContext____options(fra
.me
.REG
[0])!=NIT_NULL
);
1756 if (UNTAG_Bool(REGB0
)) {
1758 nit_abort("Uninitialized attribute %s", "_options", LOCATE_opts
, 265);
1760 fra
.me
.REG
[1] = ATTR_opts___OptionContext____options(fra
.me
.REG
[0]);
1761 /* ./../lib/standard//collection//array.nit:269 */
1763 /* ./../lib/standard//collection//array.nit:270 */
1764 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1765 if (UNTAG_Bool(REGB1
)) {
1767 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1769 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1770 /* ./../lib/standard//collection//array.nit:271 */
1771 fra
.me
.REG
[2] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
1772 /* ./../lib/standard//collection//array.nit:272 */
1774 /* ./../lib/standard//collection//array.nit:24 */
1775 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1776 if (UNTAG_Bool(REGB1
)) {
1778 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1780 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1781 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1782 if (UNTAG_Bool(REGB2
)) {
1784 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1786 /* ./../lib/standard//kernel.nit:232 */
1787 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1788 /* ./../lib/standard//collection//array.nit:272 */
1789 if (UNTAG_Bool(REGB1
)) {
1790 /* ./../lib/standard//collection//array.nit:273 */
1791 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
1792 if (UNTAG_Bool(REGB1
)) {
1793 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1795 /* ./../lib/standard//collection//array.nit:718 */
1796 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[2])->val
[UNTAG_Int(REGB0
)];
1797 /* ./../lib/opts.nit:266 */
1798 fra
.me
.REG
[4] = CALL_opts___Option___names(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1799 /* ./../lib/standard//collection//array.nit:269 */
1801 /* ./../lib/standard//collection//array.nit:270 */
1802 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4])!=NIT_NULL
);
1803 if (UNTAG_Bool(REGB2
)) {
1805 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1807 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4]);
1808 /* ./../lib/standard//collection//array.nit:271 */
1809 fra
.me
.REG
[5] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[4]);
1810 /* ./../lib/standard//collection//array.nit:272 */
1812 /* ./../lib/standard//collection//array.nit:24 */
1813 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4])!=NIT_NULL
);
1814 if (UNTAG_Bool(REGB2
)) {
1816 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1818 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4]);
1819 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1820 if (UNTAG_Bool(REGB3
)) {
1822 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1824 /* ./../lib/standard//kernel.nit:232 */
1825 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
1826 /* ./../lib/standard//collection//array.nit:272 */
1827 if (UNTAG_Bool(REGB2
)) {
1828 /* ./../lib/standard//collection//array.nit:273 */
1829 REGB2
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
1830 if (UNTAG_Bool(REGB2
)) {
1831 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1833 /* ./../lib/standard//collection//array.nit:718 */
1834 fra
.me
.REG
[6] = ((Nit_NativeArray
)fra
.me
.REG
[5])->val
[UNTAG_Int(REGB1
)];
1835 /* ./../lib/opts.nit:267 */
1836 REGB2
= TAG_Bool(ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0])!=NIT_NULL
);
1837 if (UNTAG_Bool(REGB2
)) {
1839 nit_abort("Uninitialized attribute %s", "_optmap", LOCATE_opts
, 267);
1841 fra
.me
.REG
[7] = ATTR_opts___OptionContext____optmap(fra
.me
.REG
[0]);
1842 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[7])(fra
.me
.REG
[7], fra
.me
.REG
[6], fra
.me
.REG
[3]);
1843 /* ./../lib/standard//collection//array.nit:274 */
1845 /* ./../lib/standard//kernel.nit:235 */
1846 REGB2
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB2
));
1847 /* ./../lib/standard//collection//array.nit:274 */
1850 /* ./../lib/standard//collection//array.nit:272 */
1855 /* ./../lib/standard//collection//array.nit:274 */
1857 /* ./../lib/standard//kernel.nit:235 */
1858 REGB1
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB1
));
1859 /* ./../lib/standard//collection//array.nit:274 */
1862 /* ./../lib/standard//collection//array.nit:272 */
1867 stack_frame_head
= fra
.me
.prev
;