1 /* This C file is generated by NIT to compile module toolcontext. */
2 #include "toolcontext._sep.h"
3 val_t
toolcontext___Message___location(val_t p0
){
4 struct {struct stack_frame_t me
;} fra
;
6 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
7 fra
.me
.file
= LOCATE_toolcontext
;
9 fra
.me
.meth
= LOCATE_toolcontext___Message___location
;
12 fra
.me
.nitni_local_ref_head
= NULL
;
13 fra
.me
.REG
[0] = NIT_NULL
;
15 /* toolcontext.nit:29 */
16 fra
.me
.REG
[0] = ATTR_toolcontext___Message____location(fra
.me
.REG
[0]);
17 stack_frame_head
= fra
.me
.prev
;
20 val_t
toolcontext___Message___text(val_t p0
){
21 struct {struct stack_frame_t me
;} fra
;
24 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
25 fra
.me
.file
= LOCATE_toolcontext
;
27 fra
.me
.meth
= LOCATE_toolcontext___Message___text
;
30 fra
.me
.nitni_local_ref_head
= NULL
;
31 fra
.me
.REG
[0] = NIT_NULL
;
33 /* toolcontext.nit:30 */
34 REGB0
= TAG_Bool(ATTR_toolcontext___Message____text(fra
.me
.REG
[0])!=NIT_NULL
);
35 if (UNTAG_Bool(REGB0
)) {
37 nit_abort("Uninitialized attribute %s", "_text", LOCATE_toolcontext
, 30);
39 fra
.me
.REG
[0] = ATTR_toolcontext___Message____text(fra
.me
.REG
[0]);
40 stack_frame_head
= fra
.me
.prev
;
43 val_t
toolcontext___Message_____l(val_t p0
, val_t p1
){
44 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
49 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
50 fra
.me
.file
= LOCATE_toolcontext
;
52 fra
.me
.meth
= LOCATE_toolcontext___Message_____l
;
55 fra
.me
.nitni_local_ref_head
= NULL
;
56 fra
.me
.REG
[0] = NIT_NULL
;
57 fra
.me
.REG
[1] = NIT_NULL
;
58 fra
.me
.REG
[2] = NIT_NULL
;
59 fra
.me
.REG
[3] = NIT_NULL
;
62 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*/;
63 if (UNTAG_Bool(REGB0
)) {
65 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 0);
67 /* toolcontext.nit:32 */
68 fra
.me
.REG
[2] = fra
.me
.REG
[0];
69 /* toolcontext.nit:33 */
70 fra
.me
.REG
[3] = CALL_toolcontext___Message___location(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
71 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
72 if (UNTAG_Bool(REGB0
)) {
74 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
75 if (UNTAG_Bool(REGB1
)) {
76 REGB1
= TAG_Bool(false);
79 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
83 if (UNTAG_Bool(REGB0
)) {
84 REGB0
= TAG_Bool(true);
87 /* toolcontext.nit:34 */
88 fra
.me
.REG
[3] = CALL_toolcontext___Message___location(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
89 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
90 if (UNTAG_Bool(REGB1
)) {
92 REGB2
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
93 if (UNTAG_Bool(REGB2
)) {
94 REGB2
= TAG_Bool(false);
97 REGB2
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
101 if (UNTAG_Bool(REGB1
)) {
102 REGB1
= TAG_Bool(false);
106 /* toolcontext.nit:36 */
107 fra
.me
.REG
[2] = CALL_toolcontext___Message___location(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
108 REGB1
= TAG_Bool(fra
.me
.REG
[2]!=NIT_NULL
);
109 if (UNTAG_Bool(REGB1
)) {
111 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 36);
113 fra
.me
.REG
[1] = CALL_toolcontext___Message___location(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
114 REGB1
= TAG_Bool(fra
.me
.REG
[1]!=NIT_NULL
);
115 if (UNTAG_Bool(REGB1
)) {
117 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 36);
119 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
120 if (UNTAG_Bool(REGB1
)) {
121 nit_abort("Reciever is null", NULL
, LOCATE_toolcontext
, 36);
123 REGB1
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
127 stack_frame_head
= fra
.me
.prev
;
130 val_t
toolcontext___Message___to_s(val_t p0
){
131 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
135 static val_t once_value_2
; /* Once value */
136 static val_t once_value_3
; /* Once value */
137 static val_t once_value_4
; /* Once value */
138 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
139 fra
.me
.file
= LOCATE_toolcontext
;
141 fra
.me
.meth
= LOCATE_toolcontext___Message___to_s
;
142 fra
.me
.has_broke
= 0;
144 fra
.me
.nitni_local_ref_head
= NULL
;
145 fra
.me
.REG
[0] = NIT_NULL
;
146 fra
.me
.REG
[1] = NIT_NULL
;
147 fra
.me
.REG
[2] = NIT_NULL
;
148 fra
.me
.REG
[3] = NIT_NULL
;
149 fra
.me
.REG
[4] = NIT_NULL
;
151 /* toolcontext.nit:41 */
152 fra
.me
.REG
[1] = CALL_toolcontext___Message___location(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
153 /* toolcontext.nit:42 */
154 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
155 if (UNTAG_Bool(REGB0
)) {
157 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
158 if (UNTAG_Bool(REGB1
)) {
159 REGB1
= TAG_Bool(false);
162 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], NIT_NULL
);
166 if (UNTAG_Bool(REGB0
)) {
167 /* toolcontext.nit:43 */
168 fra
.me
.REG
[2] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
171 /* toolcontext.nit:45 */
173 fra
.me
.REG
[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
175 fra
.me
.REG
[4] = BOX_NativeString("");
177 fra
.me
.REG
[4] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[4], REGB0
);
178 once_value_2
= fra
.me
.REG
[4];
179 register_static_object(&once_value_2
);
180 } else fra
.me
.REG
[4] = once_value_2
;
181 fra
.me
.REG
[4] = fra
.me
.REG
[4];
182 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[4]);
183 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
184 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1]);
186 fra
.me
.REG
[1] = BOX_NativeString(": ");
188 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
189 once_value_3
= fra
.me
.REG
[1];
190 register_static_object(&once_value_3
);
191 } else fra
.me
.REG
[1] = once_value_3
;
192 fra
.me
.REG
[1] = fra
.me
.REG
[1];
193 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1]);
194 fra
.me
.REG
[0] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
195 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[0]);
197 fra
.me
.REG
[0] = BOX_NativeString("");
199 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
200 once_value_4
= fra
.me
.REG
[0];
201 register_static_object(&once_value_4
);
202 } else fra
.me
.REG
[0] = once_value_4
;
203 fra
.me
.REG
[0] = fra
.me
.REG
[0];
204 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[0]);
205 fra
.me
.REG
[3] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
206 fra
.me
.REG
[2] = fra
.me
.REG
[3];
210 stack_frame_head
= fra
.me
.prev
;
211 return fra
.me
.REG
[2];
213 val_t
toolcontext___Message___to_color_string(val_t p0
){
214 struct {struct stack_frame_t me
; val_t MORE_REG
[6];} fra
;
218 static val_t once_value_1
; /* Once value */
219 static val_t once_value_2
; /* Once value */
220 static val_t once_value_3
; /* Once value */
221 static val_t once_value_4
; /* Once value */
222 static val_t once_value_5
; /* Once value */
223 static val_t once_value_6
; /* Once value */
224 static val_t once_value_7
; /* Once value */
225 static val_t once_value_8
; /* Once value */
226 static val_t once_value_9
; /* Once value */
227 static val_t once_value_10
; /* Once value */
228 static val_t once_value_12
; /* Once value */
229 static val_t once_value_13
; /* Once value */
230 static val_t once_value_14
; /* Once value */
231 static val_t once_value_15
; /* Once value */
232 static val_t once_value_16
; /* Once value */
233 static val_t once_value_17
; /* Once value */
234 static val_t once_value_18
; /* Once value */
235 static val_t once_value_19
; /* Once value */
236 static val_t once_value_20
; /* Once value */
237 static val_t once_value_21
; /* Once value */
238 static val_t once_value_22
; /* Once value */
239 static val_t once_value_23
; /* Once value */
240 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
241 fra
.me
.file
= LOCATE_toolcontext
;
243 fra
.me
.meth
= LOCATE_toolcontext___Message___to_color_string
;
244 fra
.me
.has_broke
= 0;
246 fra
.me
.nitni_local_ref_head
= NULL
;
247 fra
.me
.REG
[0] = NIT_NULL
;
248 fra
.me
.REG
[1] = NIT_NULL
;
249 fra
.me
.REG
[2] = NIT_NULL
;
250 fra
.me
.REG
[3] = NIT_NULL
;
251 fra
.me
.REG
[4] = NIT_NULL
;
252 fra
.me
.REG
[5] = NIT_NULL
;
253 fra
.me
.REG
[6] = NIT_NULL
;
255 /* toolcontext.nit:51 */
257 /* ../lib/standard/kernel.nit:297 */
258 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
259 /* toolcontext.nit:52 */
261 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
263 fra
.me
.REG
[2] = BOX_NativeString("");
265 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
266 once_value_1
= fra
.me
.REG
[2];
267 register_static_object(&once_value_1
);
268 } else fra
.me
.REG
[2] = once_value_1
;
269 fra
.me
.REG
[2] = fra
.me
.REG
[2];
270 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
271 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
272 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
274 fra
.me
.REG
[2] = BOX_NativeString("[0;31m");
276 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
277 once_value_2
= fra
.me
.REG
[2];
278 register_static_object(&once_value_2
);
279 } else fra
.me
.REG
[2] = once_value_2
;
280 fra
.me
.REG
[2] = fra
.me
.REG
[2];
281 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
282 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
283 /* toolcontext.nit:53 */
285 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
287 fra
.me
.REG
[2] = BOX_NativeString("");
289 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
290 once_value_3
= fra
.me
.REG
[2];
291 register_static_object(&once_value_3
);
292 } else fra
.me
.REG
[2] = once_value_3
;
293 fra
.me
.REG
[2] = fra
.me
.REG
[2];
294 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
295 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
296 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
298 fra
.me
.REG
[2] = BOX_NativeString("[1;31m");
300 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
301 once_value_4
= fra
.me
.REG
[2];
302 register_static_object(&once_value_4
);
303 } else fra
.me
.REG
[2] = once_value_4
;
304 fra
.me
.REG
[2] = fra
.me
.REG
[2];
305 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
306 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
307 /* toolcontext.nit:54 */
309 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
311 fra
.me
.REG
[2] = BOX_NativeString("");
313 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
314 once_value_5
= fra
.me
.REG
[2];
315 register_static_object(&once_value_5
);
316 } else fra
.me
.REG
[2] = once_value_5
;
317 fra
.me
.REG
[2] = fra
.me
.REG
[2];
318 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
319 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
320 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
322 fra
.me
.REG
[2] = BOX_NativeString("[0;32m");
324 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
325 once_value_6
= fra
.me
.REG
[2];
326 register_static_object(&once_value_6
);
327 } else fra
.me
.REG
[2] = once_value_6
;
328 fra
.me
.REG
[2] = fra
.me
.REG
[2];
329 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
330 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
331 /* toolcontext.nit:55 */
333 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
335 fra
.me
.REG
[2] = BOX_NativeString("");
337 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
338 once_value_7
= fra
.me
.REG
[2];
339 register_static_object(&once_value_7
);
340 } else fra
.me
.REG
[2] = once_value_7
;
341 fra
.me
.REG
[2] = fra
.me
.REG
[2];
342 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
343 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
344 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
346 fra
.me
.REG
[2] = BOX_NativeString("[0;33m");
348 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
349 once_value_8
= fra
.me
.REG
[2];
350 register_static_object(&once_value_8
);
351 } else fra
.me
.REG
[2] = once_value_8
;
352 fra
.me
.REG
[2] = fra
.me
.REG
[2];
353 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
354 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
355 /* toolcontext.nit:56 */
357 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
359 fra
.me
.REG
[3] = BOX_NativeString("");
361 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB1
);
362 once_value_9
= fra
.me
.REG
[3];
363 register_static_object(&once_value_9
);
364 } else fra
.me
.REG
[3] = once_value_9
;
365 fra
.me
.REG
[3] = fra
.me
.REG
[3];
366 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
367 fra
.me
.REG
[3] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
368 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
369 if (!once_value_10
) {
370 fra
.me
.REG
[3] = BOX_NativeString("[0m");
372 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
373 once_value_10
= fra
.me
.REG
[3];
374 register_static_object(&once_value_10
);
375 } else fra
.me
.REG
[3] = once_value_10
;
376 fra
.me
.REG
[3] = fra
.me
.REG
[3];
377 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
378 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
379 /* toolcontext.nit:58 */
380 fra
.me
.REG
[3] = CALL_toolcontext___Message___location(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
381 /* toolcontext.nit:59 */
382 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
383 if (UNTAG_Bool(REGB0
)) {
385 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
386 if (UNTAG_Bool(REGB1
)) {
387 REGB1
= TAG_Bool(false);
390 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
394 if (UNTAG_Bool(REGB0
)) {
395 /* toolcontext.nit:60 */
396 fra
.me
.REG
[4] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
399 /* toolcontext.nit:61 */
400 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
401 if (UNTAG_Bool(REGB0
)) {
402 nit_abort("Reciever is null", NULL
, LOCATE_toolcontext
, 61);
404 fra
.me
.REG
[5] = CALL_location___Location___file(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
405 REGB0
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
406 if (UNTAG_Bool(REGB0
)) {
408 REGB1
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
409 if (UNTAG_Bool(REGB1
)) {
410 REGB1
= TAG_Bool(false);
413 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[5])(fra
.me
.REG
[5], NIT_NULL
);
417 if (UNTAG_Bool(REGB0
)) {
418 /* toolcontext.nit:62 */
420 fra
.me
.REG
[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
421 if (!once_value_12
) {
422 fra
.me
.REG
[6] = BOX_NativeString("");
424 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
425 once_value_12
= fra
.me
.REG
[6];
426 register_static_object(&once_value_12
);
427 } else fra
.me
.REG
[6] = once_value_12
;
428 fra
.me
.REG
[6] = fra
.me
.REG
[6];
429 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
430 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
431 if (!once_value_13
) {
432 fra
.me
.REG
[6] = BOX_NativeString("");
434 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
435 once_value_13
= fra
.me
.REG
[6];
436 register_static_object(&once_value_13
);
437 } else fra
.me
.REG
[6] = once_value_13
;
438 fra
.me
.REG
[6] = fra
.me
.REG
[6];
439 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
440 fra
.me
.REG
[6] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
441 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
442 if (!once_value_14
) {
443 fra
.me
.REG
[6] = BOX_NativeString("");
445 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
446 once_value_14
= fra
.me
.REG
[6];
447 register_static_object(&once_value_14
);
448 } else fra
.me
.REG
[6] = once_value_14
;
449 fra
.me
.REG
[6] = fra
.me
.REG
[6];
450 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
451 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[2]);
452 if (!once_value_15
) {
453 fra
.me
.REG
[6] = BOX_NativeString(": ");
455 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
456 once_value_15
= fra
.me
.REG
[6];
457 register_static_object(&once_value_15
);
458 } else fra
.me
.REG
[6] = once_value_15
;
459 fra
.me
.REG
[6] = fra
.me
.REG
[6];
460 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
461 fra
.me
.REG
[6] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
462 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
463 if (!once_value_16
) {
464 fra
.me
.REG
[6] = BOX_NativeString("");
466 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
467 once_value_16
= fra
.me
.REG
[6];
468 register_static_object(&once_value_16
);
469 } else fra
.me
.REG
[6] = once_value_16
;
470 fra
.me
.REG
[6] = fra
.me
.REG
[6];
471 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
472 fra
.me
.REG
[5] = CALL_standard___string___Object___to_s(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
473 fra
.me
.REG
[4] = fra
.me
.REG
[5];
476 /* toolcontext.nit:64 */
478 fra
.me
.REG
[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
479 if (!once_value_17
) {
480 fra
.me
.REG
[6] = BOX_NativeString("");
482 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
483 once_value_17
= fra
.me
.REG
[6];
484 register_static_object(&once_value_17
);
485 } else fra
.me
.REG
[6] = once_value_17
;
486 fra
.me
.REG
[6] = fra
.me
.REG
[6];
487 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
488 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
489 if (!once_value_18
) {
490 fra
.me
.REG
[1] = BOX_NativeString("");
492 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
493 once_value_18
= fra
.me
.REG
[1];
494 register_static_object(&once_value_18
);
495 } else fra
.me
.REG
[1] = once_value_18
;
496 fra
.me
.REG
[1] = fra
.me
.REG
[1];
497 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
498 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
499 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
500 if (!once_value_19
) {
501 fra
.me
.REG
[1] = BOX_NativeString("");
503 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
504 once_value_19
= fra
.me
.REG
[1];
505 register_static_object(&once_value_19
);
506 } else fra
.me
.REG
[1] = once_value_19
;
507 fra
.me
.REG
[1] = fra
.me
.REG
[1];
508 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
509 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[2]);
510 if (!once_value_20
) {
511 fra
.me
.REG
[2] = BOX_NativeString(": ");
513 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB0
);
514 once_value_20
= fra
.me
.REG
[2];
515 register_static_object(&once_value_20
);
516 } else fra
.me
.REG
[2] = once_value_20
;
517 fra
.me
.REG
[2] = fra
.me
.REG
[2];
518 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[2]);
519 fra
.me
.REG
[0] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
520 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
521 if (!once_value_21
) {
522 fra
.me
.REG
[0] = BOX_NativeString("\n");
524 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
525 once_value_21
= fra
.me
.REG
[0];
526 register_static_object(&once_value_21
);
527 } else fra
.me
.REG
[0] = once_value_21
;
528 fra
.me
.REG
[0] = fra
.me
.REG
[0];
529 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
530 if (!once_value_22
) {
531 fra
.me
.REG
[0] = BOX_NativeString("1;31");
533 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
534 once_value_22
= fra
.me
.REG
[0];
535 register_static_object(&once_value_22
);
536 } else fra
.me
.REG
[0] = once_value_22
;
537 fra
.me
.REG
[0] = fra
.me
.REG
[0];
538 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
539 if (UNTAG_Bool(REGB0
)) {
540 nit_abort("Reciever is null", NULL
, LOCATE_toolcontext
, 64);
542 fra
.me
.REG
[0] = CALL_location___Location___colored_line(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[0]);
543 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
544 if (!once_value_23
) {
545 fra
.me
.REG
[0] = BOX_NativeString("");
547 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
548 once_value_23
= fra
.me
.REG
[0];
549 register_static_object(&once_value_23
);
550 } else fra
.me
.REG
[0] = once_value_23
;
551 fra
.me
.REG
[0] = fra
.me
.REG
[0];
552 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
553 fra
.me
.REG
[5] = CALL_standard___string___Object___to_s(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
554 fra
.me
.REG
[4] = fra
.me
.REG
[5];
559 stack_frame_head
= fra
.me
.prev
;
560 return fra
.me
.REG
[4];
562 void toolcontext___Message___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
563 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_toolcontext___Message
].i
;
564 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
566 if (init_table
[itpos0
]) return;
567 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
568 fra
.me
.file
= LOCATE_toolcontext
;
570 fra
.me
.meth
= LOCATE_toolcontext___Message___init
;
571 fra
.me
.has_broke
= 0;
573 fra
.me
.nitni_local_ref_head
= NULL
;
574 fra
.me
.REG
[0] = NIT_NULL
;
575 fra
.me
.REG
[1] = NIT_NULL
;
576 fra
.me
.REG
[2] = NIT_NULL
;
580 ATTR_toolcontext___Message____location(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
581 ATTR_toolcontext___Message____text(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
582 stack_frame_head
= fra
.me
.prev
;
583 init_table
[itpos0
] = 1;
586 val_t
toolcontext___ToolContext___error_count(val_t p0
){
587 struct {struct stack_frame_t me
;} fra
;
590 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
591 fra
.me
.file
= LOCATE_toolcontext
;
593 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___error_count
;
594 fra
.me
.has_broke
= 0;
596 fra
.me
.nitni_local_ref_head
= NULL
;
597 fra
.me
.REG
[0] = NIT_NULL
;
599 /* toolcontext.nit:71 */
600 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0])!=NIT_NULL
);
601 if (UNTAG_Bool(REGB0
)) {
603 nit_abort("Uninitialized attribute %s", "_error_count", LOCATE_toolcontext
, 71);
605 REGB0
= ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0]);
606 stack_frame_head
= fra
.me
.prev
;
609 val_t
toolcontext___ToolContext___warning_count(val_t p0
){
610 struct {struct stack_frame_t me
;} fra
;
613 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
614 fra
.me
.file
= LOCATE_toolcontext
;
616 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___warning_count
;
617 fra
.me
.has_broke
= 0;
619 fra
.me
.nitni_local_ref_head
= NULL
;
620 fra
.me
.REG
[0] = NIT_NULL
;
622 /* toolcontext.nit:74 */
623 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0])!=NIT_NULL
);
624 if (UNTAG_Bool(REGB0
)) {
626 nit_abort("Uninitialized attribute %s", "_warning_count", LOCATE_toolcontext
, 74);
628 REGB0
= ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0]);
629 stack_frame_head
= fra
.me
.prev
;
632 val_t
toolcontext___ToolContext___log_directory(val_t p0
){
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_toolcontext
;
639 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___log_directory
;
640 fra
.me
.has_broke
= 0;
642 fra
.me
.nitni_local_ref_head
= NULL
;
643 fra
.me
.REG
[0] = NIT_NULL
;
645 /* toolcontext.nit:77 */
646 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____log_directory(fra
.me
.REG
[0])!=NIT_NULL
);
647 if (UNTAG_Bool(REGB0
)) {
649 nit_abort("Uninitialized attribute %s", "_log_directory", LOCATE_toolcontext
, 77);
651 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____log_directory(fra
.me
.REG
[0]);
652 stack_frame_head
= fra
.me
.prev
;
653 return fra
.me
.REG
[0];
655 void toolcontext___ToolContext___check_errors(val_t p0
){
656 struct {struct stack_frame_t me
; val_t MORE_REG
[6];} fra
;
661 static val_t once_value_1
; /* Once value */
662 static val_t once_value_2
; /* Once value */
663 static val_t once_value_3
; /* Once value */
664 static val_t once_value_4
; /* Once value */
665 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
666 fra
.me
.file
= LOCATE_toolcontext
;
668 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___check_errors
;
669 fra
.me
.has_broke
= 0;
671 fra
.me
.nitni_local_ref_head
= NULL
;
672 fra
.me
.REG
[0] = NIT_NULL
;
673 fra
.me
.REG
[1] = NIT_NULL
;
674 fra
.me
.REG
[2] = NIT_NULL
;
675 fra
.me
.REG
[3] = NIT_NULL
;
676 fra
.me
.REG
[4] = NIT_NULL
;
677 fra
.me
.REG
[5] = NIT_NULL
;
678 fra
.me
.REG
[6] = NIT_NULL
;
680 /* toolcontext.nit:86 */
681 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
682 if (UNTAG_Bool(REGB0
)) {
684 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 86);
686 fra
.me
.REG
[1] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
687 /* ../lib/standard/collection/array.nit:24 */
688 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
689 if (UNTAG_Bool(REGB0
)) {
691 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
693 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
694 /* toolcontext.nit:86 */
696 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
697 if (UNTAG_Bool(REGB2
)) {
699 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
701 /* ../lib/standard/kernel.nit:234 */
702 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB1
));
703 /* toolcontext.nit:86 */
704 if (UNTAG_Bool(REGB1
)) {
705 /* toolcontext.nit:87 */
706 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____message_sorter(fra
.me
.REG
[0])!=NIT_NULL
);
707 if (UNTAG_Bool(REGB1
)) {
709 nit_abort("Uninitialized attribute %s", "_message_sorter", LOCATE_toolcontext
, 87);
711 fra
.me
.REG
[1] = ATTR_toolcontext___ToolContext____message_sorter(fra
.me
.REG
[0]);
712 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
713 if (UNTAG_Bool(REGB1
)) {
715 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 87);
717 fra
.me
.REG
[2] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
718 CALL_standard___collection___sorter___AbstractSorter___sort(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
719 /* toolcontext.nit:89 */
720 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
721 if (UNTAG_Bool(REGB1
)) {
723 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 89);
725 fra
.me
.REG
[2] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
726 /* ../lib/standard/collection/array.nit:269 */
728 /* ../lib/standard/collection/array.nit:270 */
729 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
730 if (UNTAG_Bool(REGB0
)) {
732 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
734 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2]);
735 /* ../lib/standard/collection/array.nit:271 */
736 fra
.me
.REG
[1] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[2]);
737 /* ../lib/standard/collection/array.nit:272 */
739 /* ../lib/standard/collection/array.nit:24 */
740 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
741 if (UNTAG_Bool(REGB0
)) {
743 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
745 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2]);
746 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
747 if (UNTAG_Bool(REGB2
)) {
749 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
751 /* ../lib/standard/kernel.nit:232 */
752 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
753 /* ../lib/standard/collection/array.nit:272 */
754 if (UNTAG_Bool(REGB0
)) {
755 /* ../lib/standard/collection/array.nit:273 */
756 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
757 if (UNTAG_Bool(REGB0
)) {
758 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
760 /* ../lib/standard/collection/array.nit:718 */
761 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[1])->val
[UNTAG_Int(REGB1
)];
762 /* toolcontext.nit:90 */
763 fra
.me
.REG
[4] = CALL_toolcontext___ToolContext___opt_no_color(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
764 fra
.me
.REG
[4] = CALL_opts___Option___value(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
765 if (UNTAG_Bool(fra
.me
.REG
[4])) {
766 /* toolcontext.nit:91 */
767 fra
.me
.REG
[4] = CALL_standard___file___Object___stderr(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
769 fra
.me
.REG
[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
771 fra
.me
.REG
[6] = BOX_NativeString("");
773 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
774 once_value_1
= fra
.me
.REG
[6];
775 register_static_object(&once_value_1
);
776 } else fra
.me
.REG
[6] = once_value_1
;
777 fra
.me
.REG
[6] = fra
.me
.REG
[6];
778 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
779 fra
.me
.REG
[6] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
780 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
782 fra
.me
.REG
[6] = BOX_NativeString("\n");
784 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
785 once_value_2
= fra
.me
.REG
[6];
786 register_static_object(&once_value_2
);
787 } else fra
.me
.REG
[6] = once_value_2
;
788 fra
.me
.REG
[6] = fra
.me
.REG
[6];
789 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
790 fra
.me
.REG
[5] = CALL_standard___string___Object___to_s(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
791 CALL_standard___stream___OStream___write(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[5]);
793 /* toolcontext.nit:93 */
794 fra
.me
.REG
[5] = CALL_standard___file___Object___stderr(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
796 fra
.me
.REG
[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
798 fra
.me
.REG
[6] = BOX_NativeString("");
800 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
801 once_value_3
= fra
.me
.REG
[6];
802 register_static_object(&once_value_3
);
803 } else fra
.me
.REG
[6] = once_value_3
;
804 fra
.me
.REG
[6] = fra
.me
.REG
[6];
805 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[6]);
806 fra
.me
.REG
[3] = CALL_toolcontext___Message___to_color_string(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
807 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
809 fra
.me
.REG
[3] = BOX_NativeString("\n");
811 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
812 once_value_4
= fra
.me
.REG
[3];
813 register_static_object(&once_value_4
);
814 } else fra
.me
.REG
[3] = once_value_4
;
815 fra
.me
.REG
[3] = fra
.me
.REG
[3];
816 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
817 fra
.me
.REG
[4] = CALL_standard___string___Object___to_s(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
818 CALL_standard___stream___OStream___write(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[4]);
820 /* ../lib/standard/collection/array.nit:274 */
822 /* ../lib/standard/kernel.nit:235 */
823 REGB0
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB0
));
824 /* ../lib/standard/collection/array.nit:274 */
827 /* ../lib/standard/collection/array.nit:272 */
832 /* toolcontext.nit:97 */
833 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
834 if (UNTAG_Bool(REGB1
)) {
836 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 97);
838 fra
.me
.REG
[1] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
839 CALL_standard___collection___abstract_collection___RemovableCollection___clear(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
841 /* toolcontext.nit:100 */
842 REGB1
= CALL_toolcontext___ToolContext___error_count(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
844 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
845 if (UNTAG_Bool(REGB2
)) {
847 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
849 /* ../lib/standard/kernel.nit:234 */
850 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>UNTAG_Int(REGB0
));
851 /* toolcontext.nit:100 */
852 if (UNTAG_Bool(REGB0
)) {
854 CALL_standard___kernel___Object___exit(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
856 stack_frame_head
= fra
.me
.prev
;
859 void toolcontext___ToolContext___error(val_t p0
, val_t p1
, val_t p2
){
860 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
864 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
865 fra
.me
.file
= LOCATE_toolcontext
;
867 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___error
;
868 fra
.me
.has_broke
= 0;
870 fra
.me
.nitni_local_ref_head
= NULL
;
871 fra
.me
.REG
[0] = NIT_NULL
;
872 fra
.me
.REG
[1] = NIT_NULL
;
873 fra
.me
.REG
[2] = NIT_NULL
;
874 fra
.me
.REG
[3] = NIT_NULL
;
878 /* toolcontext.nit:106 */
879 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
880 if (UNTAG_Bool(REGB0
)) {
882 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 106);
884 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
885 fra
.me
.REG
[2] = NEW_Message_toolcontext___Message___init(fra
.me
.REG
[1], fra
.me
.REG
[2]);
886 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[2]);
887 /* toolcontext.nit:107 */
888 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0])!=NIT_NULL
);
889 if (UNTAG_Bool(REGB0
)) {
891 nit_abort("Uninitialized attribute %s", "_error_count", LOCATE_toolcontext
, 107);
893 REGB0
= ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0]);
895 /* ../lib/standard/kernel.nit:235 */
896 REGB1
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB1
));
897 /* toolcontext.nit:107 */
898 ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0]) = REGB1
;
899 /* toolcontext.nit:108 */
900 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___opt_stop_on_first_error(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
901 fra
.me
.REG
[2] = CALL_opts___Option___value(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
902 if (UNTAG_Bool(fra
.me
.REG
[2])) {
903 CALL_toolcontext___ToolContext___check_errors(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
905 stack_frame_head
= fra
.me
.prev
;
908 void toolcontext___ToolContext___fatal_error(val_t p0
, val_t p1
, val_t p2
){
909 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
911 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
912 fra
.me
.file
= LOCATE_toolcontext
;
914 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___fatal_error
;
915 fra
.me
.has_broke
= 0;
917 fra
.me
.nitni_local_ref_head
= NULL
;
918 fra
.me
.REG
[0] = NIT_NULL
;
919 fra
.me
.REG
[1] = NIT_NULL
;
920 fra
.me
.REG
[2] = NIT_NULL
;
924 /* toolcontext.nit:114 */
925 CALL_toolcontext___ToolContext___error(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2]);
926 /* toolcontext.nit:115 */
927 CALL_toolcontext___ToolContext___check_errors(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
928 stack_frame_head
= fra
.me
.prev
;
931 void toolcontext___ToolContext___warning(val_t p0
, val_t p1
, val_t p2
){
932 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
937 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
938 fra
.me
.file
= LOCATE_toolcontext
;
940 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___warning
;
941 fra
.me
.has_broke
= 0;
943 fra
.me
.nitni_local_ref_head
= NULL
;
944 fra
.me
.REG
[0] = NIT_NULL
;
945 fra
.me
.REG
[1] = NIT_NULL
;
946 fra
.me
.REG
[2] = NIT_NULL
;
947 fra
.me
.REG
[3] = NIT_NULL
;
951 /* toolcontext.nit:121 */
952 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0])!=NIT_NULL
);
953 if (UNTAG_Bool(REGB0
)) {
955 nit_abort("Uninitialized attribute %s", "_opt_warn", LOCATE_toolcontext
, 121);
957 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0]);
958 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
960 REGB1
= TAG_Bool(IS_EQUAL_ON(REGB0
,fra
.me
.REG
[3]));
961 if (UNTAG_Bool(REGB1
)) {
963 REGB2
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
964 if (UNTAG_Bool(REGB2
)) {
965 REGB2
= TAG_Bool(false);
968 /* ../lib/standard/kernel.nit:227 */
969 REGB0
= TAG_Bool((fra
.me
.REG
[3])==(REGB0
));
970 /* toolcontext.nit:121 */
974 if (UNTAG_Bool(REGB1
)) {
977 /* toolcontext.nit:122 */
978 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
979 if (UNTAG_Bool(REGB1
)) {
981 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 122);
983 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
984 fra
.me
.REG
[2] = NEW_Message_toolcontext___Message___init(fra
.me
.REG
[1], fra
.me
.REG
[2]);
985 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[2]);
986 /* toolcontext.nit:123 */
987 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0])!=NIT_NULL
);
988 if (UNTAG_Bool(REGB1
)) {
990 nit_abort("Uninitialized attribute %s", "_warning_count", LOCATE_toolcontext
, 123);
992 REGB1
= ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0]);
994 /* ../lib/standard/kernel.nit:235 */
995 REGB0
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB0
));
996 /* toolcontext.nit:123 */
997 ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0]) = REGB0
;
998 /* toolcontext.nit:124 */
999 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___opt_stop_on_first_error(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1000 fra
.me
.REG
[2] = CALL_opts___Option___value(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1001 if (UNTAG_Bool(fra
.me
.REG
[2])) {
1002 CALL_toolcontext___ToolContext___check_errors(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1005 stack_frame_head
= fra
.me
.prev
;
1008 void toolcontext___ToolContext___info(val_t p0
, val_t p1
, val_t p2
){
1009 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1014 static val_t once_value_1
; /* Once value */
1015 static val_t once_value_2
; /* Once value */
1016 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1017 fra
.me
.file
= LOCATE_toolcontext
;
1019 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___info
;
1020 fra
.me
.has_broke
= 0;
1021 fra
.me
.REG_size
= 4;
1022 fra
.me
.nitni_local_ref_head
= NULL
;
1023 fra
.me
.REG
[0] = NIT_NULL
;
1024 fra
.me
.REG
[1] = NIT_NULL
;
1025 fra
.me
.REG
[2] = NIT_NULL
;
1026 fra
.me
.REG
[3] = NIT_NULL
;
1030 /* toolcontext.nit:130 */
1031 REGB1
= CALL_toolcontext___ToolContext___verbose_level(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
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:231 */
1038 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<=UNTAG_Int(REGB1
));
1039 /* toolcontext.nit:130 */
1040 if (UNTAG_Bool(REGB1
)) {
1041 /* toolcontext.nit:131 */
1043 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
1044 if (!once_value_1
) {
1045 fra
.me
.REG
[3] = BOX_NativeString("");
1047 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB1
);
1048 once_value_1
= fra
.me
.REG
[3];
1049 register_static_object(&once_value_1
);
1050 } else fra
.me
.REG
[3] = once_value_1
;
1051 fra
.me
.REG
[3] = fra
.me
.REG
[3];
1052 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1053 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
1054 if (!once_value_2
) {
1055 fra
.me
.REG
[1] = BOX_NativeString("");
1057 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB1
);
1058 once_value_2
= fra
.me
.REG
[1];
1059 register_static_object(&once_value_2
);
1060 } else fra
.me
.REG
[1] = once_value_2
;
1061 fra
.me
.REG
[1] = fra
.me
.REG
[1];
1062 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
1063 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1064 CALL_standard___file___Object___print(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
1066 stack_frame_head
= fra
.me
.prev
;
1069 val_t
toolcontext___ToolContext___option_context(val_t p0
){
1070 struct {struct stack_frame_t me
;} fra
;
1073 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1074 fra
.me
.file
= LOCATE_toolcontext
;
1076 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___option_context
;
1077 fra
.me
.has_broke
= 0;
1078 fra
.me
.REG_size
= 1;
1079 fra
.me
.nitni_local_ref_head
= NULL
;
1080 fra
.me
.REG
[0] = NIT_NULL
;
1082 /* toolcontext.nit:135 */
1083 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____option_context(fra
.me
.REG
[0])!=NIT_NULL
);
1084 if (UNTAG_Bool(REGB0
)) {
1086 nit_abort("Uninitialized attribute %s", "_option_context", LOCATE_toolcontext
, 135);
1088 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____option_context(fra
.me
.REG
[0]);
1089 stack_frame_head
= fra
.me
.prev
;
1090 return fra
.me
.REG
[0];
1092 val_t
toolcontext___ToolContext___opt_warn(val_t p0
){
1093 struct {struct stack_frame_t me
;} fra
;
1096 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1097 fra
.me
.file
= LOCATE_toolcontext
;
1099 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_warn
;
1100 fra
.me
.has_broke
= 0;
1101 fra
.me
.REG_size
= 1;
1102 fra
.me
.nitni_local_ref_head
= NULL
;
1103 fra
.me
.REG
[0] = NIT_NULL
;
1105 /* toolcontext.nit:138 */
1106 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0])!=NIT_NULL
);
1107 if (UNTAG_Bool(REGB0
)) {
1109 nit_abort("Uninitialized attribute %s", "_opt_warn", LOCATE_toolcontext
, 138);
1111 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0]);
1112 stack_frame_head
= fra
.me
.prev
;
1113 return fra
.me
.REG
[0];
1115 val_t
toolcontext___ToolContext___opt_quiet(val_t p0
){
1116 struct {struct stack_frame_t me
;} fra
;
1119 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1120 fra
.me
.file
= LOCATE_toolcontext
;
1122 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_quiet
;
1123 fra
.me
.has_broke
= 0;
1124 fra
.me
.REG_size
= 1;
1125 fra
.me
.nitni_local_ref_head
= NULL
;
1126 fra
.me
.REG
[0] = NIT_NULL
;
1128 /* toolcontext.nit:141 */
1129 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_quiet(fra
.me
.REG
[0])!=NIT_NULL
);
1130 if (UNTAG_Bool(REGB0
)) {
1132 nit_abort("Uninitialized attribute %s", "_opt_quiet", LOCATE_toolcontext
, 141);
1134 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_quiet(fra
.me
.REG
[0]);
1135 stack_frame_head
= fra
.me
.prev
;
1136 return fra
.me
.REG
[0];
1138 val_t
toolcontext___ToolContext___opt_log(val_t p0
){
1139 struct {struct stack_frame_t me
;} fra
;
1142 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1143 fra
.me
.file
= LOCATE_toolcontext
;
1145 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_log
;
1146 fra
.me
.has_broke
= 0;
1147 fra
.me
.REG_size
= 1;
1148 fra
.me
.nitni_local_ref_head
= NULL
;
1149 fra
.me
.REG
[0] = NIT_NULL
;
1151 /* toolcontext.nit:144 */
1152 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[0])!=NIT_NULL
);
1153 if (UNTAG_Bool(REGB0
)) {
1155 nit_abort("Uninitialized attribute %s", "_opt_log", LOCATE_toolcontext
, 144);
1157 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[0]);
1158 stack_frame_head
= fra
.me
.prev
;
1159 return fra
.me
.REG
[0];
1161 val_t
toolcontext___ToolContext___opt_log_dir(val_t p0
){
1162 struct {struct stack_frame_t me
;} fra
;
1165 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1166 fra
.me
.file
= LOCATE_toolcontext
;
1168 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_log_dir
;
1169 fra
.me
.has_broke
= 0;
1170 fra
.me
.REG_size
= 1;
1171 fra
.me
.nitni_local_ref_head
= NULL
;
1172 fra
.me
.REG
[0] = NIT_NULL
;
1174 /* toolcontext.nit:147 */
1175 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_log_dir(fra
.me
.REG
[0])!=NIT_NULL
);
1176 if (UNTAG_Bool(REGB0
)) {
1178 nit_abort("Uninitialized attribute %s", "_opt_log_dir", LOCATE_toolcontext
, 147);
1180 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_log_dir(fra
.me
.REG
[0]);
1181 stack_frame_head
= fra
.me
.prev
;
1182 return fra
.me
.REG
[0];
1184 val_t
toolcontext___ToolContext___opt_help(val_t p0
){
1185 struct {struct stack_frame_t me
;} fra
;
1188 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1189 fra
.me
.file
= LOCATE_toolcontext
;
1191 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_help
;
1192 fra
.me
.has_broke
= 0;
1193 fra
.me
.REG_size
= 1;
1194 fra
.me
.nitni_local_ref_head
= NULL
;
1195 fra
.me
.REG
[0] = NIT_NULL
;
1197 /* toolcontext.nit:150 */
1198 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_help(fra
.me
.REG
[0])!=NIT_NULL
);
1199 if (UNTAG_Bool(REGB0
)) {
1201 nit_abort("Uninitialized attribute %s", "_opt_help", LOCATE_toolcontext
, 150);
1203 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_help(fra
.me
.REG
[0]);
1204 stack_frame_head
= fra
.me
.prev
;
1205 return fra
.me
.REG
[0];
1207 val_t
toolcontext___ToolContext___opt_version(val_t p0
){
1208 struct {struct stack_frame_t me
;} fra
;
1211 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1212 fra
.me
.file
= LOCATE_toolcontext
;
1214 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_version
;
1215 fra
.me
.has_broke
= 0;
1216 fra
.me
.REG_size
= 1;
1217 fra
.me
.nitni_local_ref_head
= NULL
;
1218 fra
.me
.REG
[0] = NIT_NULL
;
1220 /* toolcontext.nit:153 */
1221 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_version(fra
.me
.REG
[0])!=NIT_NULL
);
1222 if (UNTAG_Bool(REGB0
)) {
1224 nit_abort("Uninitialized attribute %s", "_opt_version", LOCATE_toolcontext
, 153);
1226 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_version(fra
.me
.REG
[0]);
1227 stack_frame_head
= fra
.me
.prev
;
1228 return fra
.me
.REG
[0];
1230 val_t
toolcontext___ToolContext___opt_verbose(val_t p0
){
1231 struct {struct stack_frame_t me
;} fra
;
1234 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1235 fra
.me
.file
= LOCATE_toolcontext
;
1237 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_verbose
;
1238 fra
.me
.has_broke
= 0;
1239 fra
.me
.REG_size
= 1;
1240 fra
.me
.nitni_local_ref_head
= NULL
;
1241 fra
.me
.REG
[0] = NIT_NULL
;
1243 /* toolcontext.nit:156 */
1244 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_verbose(fra
.me
.REG
[0])!=NIT_NULL
);
1245 if (UNTAG_Bool(REGB0
)) {
1247 nit_abort("Uninitialized attribute %s", "_opt_verbose", LOCATE_toolcontext
, 156);
1249 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_verbose(fra
.me
.REG
[0]);
1250 stack_frame_head
= fra
.me
.prev
;
1251 return fra
.me
.REG
[0];
1253 val_t
toolcontext___ToolContext___opt_stop_on_first_error(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_toolcontext
;
1260 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_stop_on_first_error
;
1261 fra
.me
.has_broke
= 0;
1262 fra
.me
.REG_size
= 1;
1263 fra
.me
.nitni_local_ref_head
= NULL
;
1264 fra
.me
.REG
[0] = NIT_NULL
;
1266 /* toolcontext.nit:159 */
1267 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_stop_on_first_error(fra
.me
.REG
[0])!=NIT_NULL
);
1268 if (UNTAG_Bool(REGB0
)) {
1270 nit_abort("Uninitialized attribute %s", "_opt_stop_on_first_error", LOCATE_toolcontext
, 159);
1272 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_stop_on_first_error(fra
.me
.REG
[0]);
1273 stack_frame_head
= fra
.me
.prev
;
1274 return fra
.me
.REG
[0];
1276 val_t
toolcontext___ToolContext___opt_no_color(val_t p0
){
1277 struct {struct stack_frame_t me
;} fra
;
1280 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1281 fra
.me
.file
= LOCATE_toolcontext
;
1283 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_no_color
;
1284 fra
.me
.has_broke
= 0;
1285 fra
.me
.REG_size
= 1;
1286 fra
.me
.nitni_local_ref_head
= NULL
;
1287 fra
.me
.REG
[0] = NIT_NULL
;
1289 /* toolcontext.nit:162 */
1290 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_no_color(fra
.me
.REG
[0])!=NIT_NULL
);
1291 if (UNTAG_Bool(REGB0
)) {
1293 nit_abort("Uninitialized attribute %s", "_opt_no_color", LOCATE_toolcontext
, 162);
1295 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_no_color(fra
.me
.REG
[0]);
1296 stack_frame_head
= fra
.me
.prev
;
1297 return fra
.me
.REG
[0];
1299 val_t
toolcontext___ToolContext___verbose_level(val_t p0
){
1300 struct {struct stack_frame_t me
;} fra
;
1303 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1304 fra
.me
.file
= LOCATE_toolcontext
;
1306 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___verbose_level
;
1307 fra
.me
.has_broke
= 0;
1308 fra
.me
.REG_size
= 1;
1309 fra
.me
.nitni_local_ref_head
= NULL
;
1310 fra
.me
.REG
[0] = NIT_NULL
;
1312 /* toolcontext.nit:165 */
1313 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____verbose_level(fra
.me
.REG
[0])!=NIT_NULL
);
1314 if (UNTAG_Bool(REGB0
)) {
1316 nit_abort("Uninitialized attribute %s", "_verbose_level", LOCATE_toolcontext
, 165);
1318 REGB0
= ATTR_toolcontext___ToolContext____verbose_level(fra
.me
.REG
[0]);
1319 stack_frame_head
= fra
.me
.prev
;
1322 void toolcontext___ToolContext___init(val_t p0
, int* init_table
){
1323 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_toolcontext___ToolContext
].i
;
1324 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1327 if (init_table
[itpos1
]) return;
1328 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1329 fra
.me
.file
= LOCATE_toolcontext
;
1331 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___init
;
1332 fra
.me
.has_broke
= 0;
1333 fra
.me
.REG_size
= 4;
1334 fra
.me
.nitni_local_ref_head
= NULL
;
1335 fra
.me
.REG
[0] = NIT_NULL
;
1336 fra
.me
.REG
[1] = NIT_NULL
;
1337 fra
.me
.REG
[2] = NIT_NULL
;
1338 fra
.me
.REG
[3] = NIT_NULL
;
1340 /* toolcontext.nit:170 */
1341 fra
.me
.REG
[1] = CALL_toolcontext___ToolContext___option_context(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1343 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
1344 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_warn(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1345 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1346 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_quiet(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1347 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1348 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_stop_on_first_error(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1349 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1350 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_no_color(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1351 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1352 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1353 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1354 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log_dir(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1355 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1356 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_help(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1357 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1358 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_version(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1359 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1360 fra
.me
.REG
[0] = CALL_toolcontext___ToolContext___opt_verbose(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1361 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[0]);
1362 CALL_opts___OptionContext___add_option(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
1363 stack_frame_head
= fra
.me
.prev
;
1364 init_table
[itpos1
] = 1;
1367 void toolcontext___ToolContext___process_options(val_t p0
){
1368 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1372 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1373 fra
.me
.file
= LOCATE_toolcontext
;
1375 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___process_options
;
1376 fra
.me
.has_broke
= 0;
1377 fra
.me
.REG_size
= 4;
1378 fra
.me
.nitni_local_ref_head
= NULL
;
1379 fra
.me
.REG
[0] = NIT_NULL
;
1380 fra
.me
.REG
[1] = NIT_NULL
;
1381 fra
.me
.REG
[2] = NIT_NULL
;
1382 fra
.me
.REG
[3] = NIT_NULL
;
1384 /* toolcontext.nit:173 */
1385 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1386 /* toolcontext.nit:176 */
1387 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___opt_warn(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1389 CALL_opts___Option___value__eq(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB0
);
1390 /* toolcontext.nit:179 */
1391 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___option_context(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1392 fra
.me
.REG
[3] = CALL_standard___string___Object___args(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1393 CALL_opts___OptionContext___parse(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1394 /* toolcontext.nit:182 */
1395 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_verbose(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1396 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1397 ATTR_toolcontext___ToolContext____verbose_level(fra
.me
.REG
[1]) = fra
.me
.REG
[3];
1398 /* toolcontext.nit:184 */
1399 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_quiet(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1400 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1401 if (UNTAG_Bool(fra
.me
.REG
[3])) {
1402 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_warn(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1404 CALL_opts___Option___value__eq(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB0
);
1406 /* toolcontext.nit:186 */
1407 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log_dir(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1408 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1409 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
1410 if (UNTAG_Bool(REGB0
)) {
1412 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
1413 if (UNTAG_Bool(REGB1
)) {
1414 REGB1
= TAG_Bool(false);
1417 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
1421 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
1422 if (UNTAG_Bool(REGB0
)) {
1423 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log_dir(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1424 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1425 REGB0
= TAG_Bool((fra
.me
.REG
[3]!=NIT_NULL
) && VAL_ISA(fra
.me
.REG
[3], COLOR_standard___string___String
, ID_standard___string___String
)) /*cast String*/;
1426 if (UNTAG_Bool(REGB0
)) {
1428 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 186);
1430 ATTR_toolcontext___ToolContext____log_directory(fra
.me
.REG
[1]) = fra
.me
.REG
[3];
1432 /* toolcontext.nit:187 */
1433 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[1])!=NIT_NULL
);
1434 if (UNTAG_Bool(REGB0
)) {
1436 nit_abort("Uninitialized attribute %s", "_opt_log", LOCATE_toolcontext
, 187);
1438 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[1]);
1439 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1440 if (UNTAG_Bool(fra
.me
.REG
[3])) {
1441 /* toolcontext.nit:189 */
1442 fra
.me
.REG
[1] = CALL_toolcontext___ToolContext___log_directory(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1443 CALL_standard___file___String___mkdir(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1445 stack_frame_head
= fra
.me
.prev
;