1 /* This C file is generated by NIT to compile module toolcontext. */
2 #include "toolcontext._sep.h"
3 static const char LOCATE_toolcontext___Message___location
[] = "toolcontext::Message::location";
4 val_t
toolcontext___Message___location(val_t p0
){
5 struct {struct stack_frame_t me
;} fra
;
7 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
8 fra
.me
.file
= LOCATE_toolcontext
;
10 fra
.me
.meth
= LOCATE_toolcontext___Message___location
;
13 fra
.me
.nitni_local_ref_head
= NULL
;
14 fra
.me
.REG
[0] = NIT_NULL
;
16 /* toolcontext.nit:29 */
17 fra
.me
.REG
[0] = ATTR_toolcontext___Message____location(fra
.me
.REG
[0]);
18 stack_frame_head
= fra
.me
.prev
;
21 static const char LOCATE_toolcontext___Message___text
[] = "toolcontext::Message::text";
22 val_t
toolcontext___Message___text(val_t p0
){
23 struct {struct stack_frame_t me
;} fra
;
26 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
27 fra
.me
.file
= LOCATE_toolcontext
;
29 fra
.me
.meth
= LOCATE_toolcontext___Message___text
;
32 fra
.me
.nitni_local_ref_head
= NULL
;
33 fra
.me
.REG
[0] = NIT_NULL
;
35 /* toolcontext.nit:30 */
36 REGB0
= TAG_Bool(ATTR_toolcontext___Message____text(fra
.me
.REG
[0])!=NIT_NULL
);
37 if (UNTAG_Bool(REGB0
)) {
39 nit_abort("Uninitialized attribute %s", "_text", LOCATE_toolcontext
, 30);
41 fra
.me
.REG
[0] = ATTR_toolcontext___Message____text(fra
.me
.REG
[0]);
42 stack_frame_head
= fra
.me
.prev
;
45 static const char LOCATE_toolcontext___Message_____l
[] = "toolcontext::Message::(kernel::Comparable::<)";
46 val_t
toolcontext___Message_____l(val_t p0
, val_t p1
){
47 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
52 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
53 fra
.me
.file
= LOCATE_toolcontext
;
55 fra
.me
.meth
= LOCATE_toolcontext___Message_____l
;
58 fra
.me
.nitni_local_ref_head
= NULL
;
59 fra
.me
.REG
[0] = NIT_NULL
;
60 fra
.me
.REG
[1] = NIT_NULL
;
61 fra
.me
.REG
[2] = NIT_NULL
;
62 fra
.me
.REG
[3] = NIT_NULL
;
65 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*/;
66 if (UNTAG_Bool(REGB0
)) {
68 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 0);
70 /* toolcontext.nit:32 */
71 fra
.me
.REG
[2] = fra
.me
.REG
[0];
72 /* toolcontext.nit:34 */
73 fra
.me
.REG
[3] = CALL_toolcontext___Message___location(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
74 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
75 if (UNTAG_Bool(REGB0
)) {
77 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
78 if (UNTAG_Bool(REGB1
)) {
82 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
86 if (UNTAG_Bool(REGB0
)) {
90 /* toolcontext.nit:35 */
91 fra
.me
.REG
[3] = CALL_toolcontext___Message___location(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
92 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
93 if (UNTAG_Bool(REGB1
)) {
95 REGB2
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
96 if (UNTAG_Bool(REGB2
)) {
100 REGB2
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
104 if (UNTAG_Bool(REGB1
)) {
109 /* toolcontext.nit:37 */
110 fra
.me
.REG
[2] = CALL_toolcontext___Message___location(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
111 REGB1
= TAG_Bool(fra
.me
.REG
[2]!=NIT_NULL
);
112 if (UNTAG_Bool(REGB1
)) {
114 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 37);
116 fra
.me
.REG
[1] = CALL_toolcontext___Message___location(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
117 REGB1
= TAG_Bool(fra
.me
.REG
[1]!=NIT_NULL
);
118 if (UNTAG_Bool(REGB1
)) {
120 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 37);
122 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
123 if (UNTAG_Bool(REGB1
)) {
124 nit_abort("Reciever is null", NULL
, LOCATE_toolcontext
, 37);
126 REGB1
= CALL_standard___kernel___Comparable_____l(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
130 stack_frame_head
= fra
.me
.prev
;
133 static const char LOCATE_toolcontext___Message___to_s
[] = "toolcontext::Message::(string::Object::to_s)";
134 val_t
toolcontext___Message___to_s(val_t p0
){
135 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
139 static val_t once_value_2
; /* Once value */
140 static val_t once_value_3
; /* Once value */
141 static val_t once_value_4
; /* Once value */
142 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
143 fra
.me
.file
= LOCATE_toolcontext
;
145 fra
.me
.meth
= LOCATE_toolcontext___Message___to_s
;
146 fra
.me
.has_broke
= 0;
148 fra
.me
.nitni_local_ref_head
= NULL
;
149 fra
.me
.REG
[0] = NIT_NULL
;
150 fra
.me
.REG
[1] = NIT_NULL
;
151 fra
.me
.REG
[2] = NIT_NULL
;
152 fra
.me
.REG
[3] = NIT_NULL
;
153 fra
.me
.REG
[4] = NIT_NULL
;
155 /* toolcontext.nit:42 */
156 fra
.me
.REG
[1] = CALL_toolcontext___Message___location(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
157 /* toolcontext.nit:43 */
158 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
159 if (UNTAG_Bool(REGB0
)) {
161 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
162 if (UNTAG_Bool(REGB1
)) {
166 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], NIT_NULL
);
170 if (UNTAG_Bool(REGB0
)) {
171 /* toolcontext.nit:44 */
172 fra
.me
.REG
[2] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
175 /* toolcontext.nit:46 */
177 fra
.me
.REG
[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
179 fra
.me
.REG
[4] = BOX_NativeString("");
181 fra
.me
.REG
[4] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[4], REGB0
);
182 once_value_2
= fra
.me
.REG
[4];
183 register_static_object(&once_value_2
);
184 } else fra
.me
.REG
[4] = once_value_2
;
185 fra
.me
.REG
[4] = fra
.me
.REG
[4];
186 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[4]);
187 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
188 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1]);
190 fra
.me
.REG
[1] = BOX_NativeString(": ");
192 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
193 once_value_3
= fra
.me
.REG
[1];
194 register_static_object(&once_value_3
);
195 } else fra
.me
.REG
[1] = once_value_3
;
196 fra
.me
.REG
[1] = fra
.me
.REG
[1];
197 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1]);
198 fra
.me
.REG
[0] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
199 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[0]);
201 fra
.me
.REG
[0] = BOX_NativeString("");
203 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
204 once_value_4
= fra
.me
.REG
[0];
205 register_static_object(&once_value_4
);
206 } else fra
.me
.REG
[0] = once_value_4
;
207 fra
.me
.REG
[0] = fra
.me
.REG
[0];
208 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[0]);
209 fra
.me
.REG
[3] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
210 fra
.me
.REG
[2] = fra
.me
.REG
[3];
214 stack_frame_head
= fra
.me
.prev
;
215 return fra
.me
.REG
[2];
217 static const char LOCATE_toolcontext___Message___to_color_string
[] = "toolcontext::Message::to_color_string";
218 val_t
toolcontext___Message___to_color_string(val_t p0
){
219 struct {struct stack_frame_t me
; val_t MORE_REG
[6];} fra
;
223 static val_t once_value_1
; /* Once value */
224 static val_t once_value_2
; /* Once value */
225 static val_t once_value_3
; /* Once value */
226 static val_t once_value_4
; /* Once value */
227 static val_t once_value_5
; /* Once value */
228 static val_t once_value_6
; /* Once value */
229 static val_t once_value_7
; /* Once value */
230 static val_t once_value_8
; /* Once value */
231 static val_t once_value_9
; /* Once value */
232 static val_t once_value_10
; /* Once value */
233 static val_t once_value_12
; /* Once value */
234 static val_t once_value_13
; /* Once value */
235 static val_t once_value_14
; /* Once value */
236 static val_t once_value_15
; /* Once value */
237 static val_t once_value_16
; /* Once value */
238 static val_t once_value_17
; /* Once value */
239 static val_t once_value_18
; /* Once value */
240 static val_t once_value_19
; /* Once value */
241 static val_t once_value_20
; /* Once value */
242 static val_t once_value_21
; /* Once value */
243 static val_t once_value_22
; /* Once value */
244 static val_t once_value_23
; /* Once value */
245 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
246 fra
.me
.file
= LOCATE_toolcontext
;
248 fra
.me
.meth
= LOCATE_toolcontext___Message___to_color_string
;
249 fra
.me
.has_broke
= 0;
251 fra
.me
.nitni_local_ref_head
= NULL
;
252 fra
.me
.REG
[0] = NIT_NULL
;
253 fra
.me
.REG
[1] = NIT_NULL
;
254 fra
.me
.REG
[2] = NIT_NULL
;
255 fra
.me
.REG
[3] = NIT_NULL
;
256 fra
.me
.REG
[4] = NIT_NULL
;
257 fra
.me
.REG
[5] = NIT_NULL
;
258 fra
.me
.REG
[6] = NIT_NULL
;
260 /* toolcontext.nit:52 */
262 /* ../lib/standard/kernel.nit:300 */
263 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
264 /* toolcontext.nit:53 */
266 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
268 fra
.me
.REG
[2] = BOX_NativeString("");
270 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
271 once_value_1
= fra
.me
.REG
[2];
272 register_static_object(&once_value_1
);
273 } else fra
.me
.REG
[2] = once_value_1
;
274 fra
.me
.REG
[2] = fra
.me
.REG
[2];
275 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
276 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
277 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
279 fra
.me
.REG
[2] = BOX_NativeString("[0;31m");
281 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
282 once_value_2
= fra
.me
.REG
[2];
283 register_static_object(&once_value_2
);
284 } else fra
.me
.REG
[2] = once_value_2
;
285 fra
.me
.REG
[2] = fra
.me
.REG
[2];
286 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
287 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
288 /* toolcontext.nit:54 */
290 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
292 fra
.me
.REG
[2] = BOX_NativeString("");
294 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
295 once_value_3
= fra
.me
.REG
[2];
296 register_static_object(&once_value_3
);
297 } else fra
.me
.REG
[2] = once_value_3
;
298 fra
.me
.REG
[2] = fra
.me
.REG
[2];
299 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
300 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
301 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
303 fra
.me
.REG
[2] = BOX_NativeString("[1;31m");
305 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
306 once_value_4
= fra
.me
.REG
[2];
307 register_static_object(&once_value_4
);
308 } else fra
.me
.REG
[2] = once_value_4
;
309 fra
.me
.REG
[2] = fra
.me
.REG
[2];
310 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
311 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
312 /* toolcontext.nit:55 */
314 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
316 fra
.me
.REG
[2] = BOX_NativeString("");
318 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
319 once_value_5
= fra
.me
.REG
[2];
320 register_static_object(&once_value_5
);
321 } else fra
.me
.REG
[2] = once_value_5
;
322 fra
.me
.REG
[2] = fra
.me
.REG
[2];
323 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
324 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
325 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
327 fra
.me
.REG
[2] = BOX_NativeString("[0;32m");
329 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
330 once_value_6
= fra
.me
.REG
[2];
331 register_static_object(&once_value_6
);
332 } else fra
.me
.REG
[2] = once_value_6
;
333 fra
.me
.REG
[2] = fra
.me
.REG
[2];
334 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
335 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
336 /* toolcontext.nit:56 */
338 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
340 fra
.me
.REG
[2] = BOX_NativeString("");
342 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
343 once_value_7
= fra
.me
.REG
[2];
344 register_static_object(&once_value_7
);
345 } else fra
.me
.REG
[2] = once_value_7
;
346 fra
.me
.REG
[2] = fra
.me
.REG
[2];
347 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
348 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
349 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
351 fra
.me
.REG
[2] = BOX_NativeString("[0;33m");
353 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB1
);
354 once_value_8
= fra
.me
.REG
[2];
355 register_static_object(&once_value_8
);
356 } else fra
.me
.REG
[2] = once_value_8
;
357 fra
.me
.REG
[2] = fra
.me
.REG
[2];
358 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
359 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
360 /* toolcontext.nit:57 */
362 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
364 fra
.me
.REG
[3] = BOX_NativeString("");
366 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB1
);
367 once_value_9
= fra
.me
.REG
[3];
368 register_static_object(&once_value_9
);
369 } else fra
.me
.REG
[3] = once_value_9
;
370 fra
.me
.REG
[3] = fra
.me
.REG
[3];
371 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
372 fra
.me
.REG
[3] = CALL_standard___string___Object___to_s(REGB0
)(REGB0
);
373 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
374 if (!once_value_10
) {
375 fra
.me
.REG
[3] = BOX_NativeString("[0m");
377 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
378 once_value_10
= fra
.me
.REG
[3];
379 register_static_object(&once_value_10
);
380 } else fra
.me
.REG
[3] = once_value_10
;
381 fra
.me
.REG
[3] = fra
.me
.REG
[3];
382 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
383 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
384 /* toolcontext.nit:59 */
385 fra
.me
.REG
[3] = CALL_toolcontext___Message___location(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
386 /* toolcontext.nit:60 */
387 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
388 if (UNTAG_Bool(REGB0
)) {
390 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
391 if (UNTAG_Bool(REGB1
)) {
395 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
399 if (UNTAG_Bool(REGB0
)) {
400 /* toolcontext.nit:61 */
401 fra
.me
.REG
[4] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
404 /* toolcontext.nit:62 */
405 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
406 if (UNTAG_Bool(REGB0
)) {
407 nit_abort("Reciever is null", NULL
, LOCATE_toolcontext
, 62);
409 fra
.me
.REG
[5] = CALL_location___Location___file(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
410 REGB0
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
411 if (UNTAG_Bool(REGB0
)) {
413 REGB1
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
414 if (UNTAG_Bool(REGB1
)) {
418 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[5])(fra
.me
.REG
[5], NIT_NULL
);
422 if (UNTAG_Bool(REGB0
)) {
423 /* toolcontext.nit:63 */
425 fra
.me
.REG
[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
426 if (!once_value_12
) {
427 fra
.me
.REG
[6] = BOX_NativeString("");
429 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
430 once_value_12
= fra
.me
.REG
[6];
431 register_static_object(&once_value_12
);
432 } else fra
.me
.REG
[6] = once_value_12
;
433 fra
.me
.REG
[6] = fra
.me
.REG
[6];
434 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
435 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
436 if (!once_value_13
) {
437 fra
.me
.REG
[6] = BOX_NativeString("");
439 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
440 once_value_13
= fra
.me
.REG
[6];
441 register_static_object(&once_value_13
);
442 } else fra
.me
.REG
[6] = once_value_13
;
443 fra
.me
.REG
[6] = fra
.me
.REG
[6];
444 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
445 fra
.me
.REG
[6] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
446 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
447 if (!once_value_14
) {
448 fra
.me
.REG
[6] = BOX_NativeString("");
450 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
451 once_value_14
= fra
.me
.REG
[6];
452 register_static_object(&once_value_14
);
453 } else fra
.me
.REG
[6] = once_value_14
;
454 fra
.me
.REG
[6] = fra
.me
.REG
[6];
455 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
456 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[2]);
457 if (!once_value_15
) {
458 fra
.me
.REG
[6] = BOX_NativeString(": ");
460 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
461 once_value_15
= fra
.me
.REG
[6];
462 register_static_object(&once_value_15
);
463 } else fra
.me
.REG
[6] = once_value_15
;
464 fra
.me
.REG
[6] = fra
.me
.REG
[6];
465 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
466 fra
.me
.REG
[6] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
467 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
468 if (!once_value_16
) {
469 fra
.me
.REG
[6] = BOX_NativeString("");
471 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
472 once_value_16
= fra
.me
.REG
[6];
473 register_static_object(&once_value_16
);
474 } else fra
.me
.REG
[6] = once_value_16
;
475 fra
.me
.REG
[6] = fra
.me
.REG
[6];
476 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
477 fra
.me
.REG
[5] = CALL_standard___string___Object___to_s(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
478 fra
.me
.REG
[4] = fra
.me
.REG
[5];
481 /* toolcontext.nit:65 */
483 fra
.me
.REG
[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
484 if (!once_value_17
) {
485 fra
.me
.REG
[6] = BOX_NativeString("");
487 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
488 once_value_17
= fra
.me
.REG
[6];
489 register_static_object(&once_value_17
);
490 } else fra
.me
.REG
[6] = once_value_17
;
491 fra
.me
.REG
[6] = fra
.me
.REG
[6];
492 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
493 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
494 if (!once_value_18
) {
495 fra
.me
.REG
[1] = BOX_NativeString("");
497 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
498 once_value_18
= fra
.me
.REG
[1];
499 register_static_object(&once_value_18
);
500 } else fra
.me
.REG
[1] = once_value_18
;
501 fra
.me
.REG
[1] = fra
.me
.REG
[1];
502 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
503 fra
.me
.REG
[1] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
504 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
505 if (!once_value_19
) {
506 fra
.me
.REG
[1] = BOX_NativeString("");
508 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
509 once_value_19
= fra
.me
.REG
[1];
510 register_static_object(&once_value_19
);
511 } else fra
.me
.REG
[1] = once_value_19
;
512 fra
.me
.REG
[1] = fra
.me
.REG
[1];
513 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[1]);
514 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[2]);
515 if (!once_value_20
) {
516 fra
.me
.REG
[2] = BOX_NativeString(": ");
518 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB0
);
519 once_value_20
= fra
.me
.REG
[2];
520 register_static_object(&once_value_20
);
521 } else fra
.me
.REG
[2] = once_value_20
;
522 fra
.me
.REG
[2] = fra
.me
.REG
[2];
523 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[2]);
524 fra
.me
.REG
[0] = CALL_toolcontext___Message___text(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
525 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
526 if (!once_value_21
) {
527 fra
.me
.REG
[0] = BOX_NativeString("\n");
529 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
530 once_value_21
= fra
.me
.REG
[0];
531 register_static_object(&once_value_21
);
532 } else fra
.me
.REG
[0] = once_value_21
;
533 fra
.me
.REG
[0] = fra
.me
.REG
[0];
534 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
535 if (!once_value_22
) {
536 fra
.me
.REG
[0] = BOX_NativeString("1;31");
538 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
539 once_value_22
= fra
.me
.REG
[0];
540 register_static_object(&once_value_22
);
541 } else fra
.me
.REG
[0] = once_value_22
;
542 fra
.me
.REG
[0] = fra
.me
.REG
[0];
543 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
544 if (UNTAG_Bool(REGB0
)) {
545 nit_abort("Reciever is null", NULL
, LOCATE_toolcontext
, 65);
547 fra
.me
.REG
[0] = CALL_location___Location___colored_line(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[0]);
548 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
549 if (!once_value_23
) {
550 fra
.me
.REG
[0] = BOX_NativeString("");
552 fra
.me
.REG
[0] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[0], REGB0
);
553 once_value_23
= fra
.me
.REG
[0];
554 register_static_object(&once_value_23
);
555 } else fra
.me
.REG
[0] = once_value_23
;
556 fra
.me
.REG
[0] = fra
.me
.REG
[0];
557 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[0]);
558 fra
.me
.REG
[5] = CALL_standard___string___Object___to_s(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
559 fra
.me
.REG
[4] = fra
.me
.REG
[5];
564 stack_frame_head
= fra
.me
.prev
;
565 return fra
.me
.REG
[4];
567 static const char LOCATE_toolcontext___Message___init
[] = "toolcontext::Message::init";
568 void toolcontext___Message___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
569 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_toolcontext___Message
].i
;
570 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
572 if (init_table
[itpos0
]) return;
573 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
574 fra
.me
.file
= LOCATE_toolcontext
;
576 fra
.me
.meth
= LOCATE_toolcontext___Message___init
;
577 fra
.me
.has_broke
= 0;
579 fra
.me
.nitni_local_ref_head
= NULL
;
580 fra
.me
.REG
[0] = NIT_NULL
;
581 fra
.me
.REG
[1] = NIT_NULL
;
582 fra
.me
.REG
[2] = NIT_NULL
;
586 ATTR_toolcontext___Message____location(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
587 ATTR_toolcontext___Message____text(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
588 stack_frame_head
= fra
.me
.prev
;
589 init_table
[itpos0
] = 1;
592 static const char LOCATE_toolcontext___ToolContext___error_count
[] = "toolcontext::ToolContext::error_count";
593 val_t
toolcontext___ToolContext___error_count(val_t p0
){
594 struct {struct stack_frame_t me
;} fra
;
597 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
598 fra
.me
.file
= LOCATE_toolcontext
;
600 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___error_count
;
601 fra
.me
.has_broke
= 0;
603 fra
.me
.nitni_local_ref_head
= NULL
;
604 fra
.me
.REG
[0] = NIT_NULL
;
606 /* toolcontext.nit:72 */
607 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0])!=NIT_NULL
);
608 if (UNTAG_Bool(REGB0
)) {
610 nit_abort("Uninitialized attribute %s", "_error_count", LOCATE_toolcontext
, 72);
612 REGB0
= ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0]);
613 stack_frame_head
= fra
.me
.prev
;
616 static const char LOCATE_toolcontext___ToolContext___warning_count
[] = "toolcontext::ToolContext::warning_count";
617 val_t
toolcontext___ToolContext___warning_count(val_t p0
){
618 struct {struct stack_frame_t me
;} fra
;
621 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
622 fra
.me
.file
= LOCATE_toolcontext
;
624 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___warning_count
;
625 fra
.me
.has_broke
= 0;
627 fra
.me
.nitni_local_ref_head
= NULL
;
628 fra
.me
.REG
[0] = NIT_NULL
;
630 /* toolcontext.nit:75 */
631 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0])!=NIT_NULL
);
632 if (UNTAG_Bool(REGB0
)) {
634 nit_abort("Uninitialized attribute %s", "_warning_count", LOCATE_toolcontext
, 75);
636 REGB0
= ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0]);
637 stack_frame_head
= fra
.me
.prev
;
640 static const char LOCATE_toolcontext___ToolContext___log_directory
[] = "toolcontext::ToolContext::log_directory";
641 val_t
toolcontext___ToolContext___log_directory(val_t p0
){
642 struct {struct stack_frame_t me
;} fra
;
645 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
646 fra
.me
.file
= LOCATE_toolcontext
;
648 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___log_directory
;
649 fra
.me
.has_broke
= 0;
651 fra
.me
.nitni_local_ref_head
= NULL
;
652 fra
.me
.REG
[0] = NIT_NULL
;
654 /* toolcontext.nit:78 */
655 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____log_directory(fra
.me
.REG
[0])!=NIT_NULL
);
656 if (UNTAG_Bool(REGB0
)) {
658 nit_abort("Uninitialized attribute %s", "_log_directory", LOCATE_toolcontext
, 78);
660 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____log_directory(fra
.me
.REG
[0]);
661 stack_frame_head
= fra
.me
.prev
;
662 return fra
.me
.REG
[0];
664 static const char LOCATE_toolcontext___ToolContext___check_errors
[] = "toolcontext::ToolContext::check_errors";
665 void toolcontext___ToolContext___check_errors(val_t p0
){
666 struct {struct stack_frame_t me
; val_t MORE_REG
[6];} fra
;
671 static val_t once_value_1
; /* Once value */
672 static val_t once_value_2
; /* Once value */
673 static val_t once_value_3
; /* Once value */
674 static val_t once_value_4
; /* Once value */
675 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
676 fra
.me
.file
= LOCATE_toolcontext
;
678 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___check_errors
;
679 fra
.me
.has_broke
= 0;
681 fra
.me
.nitni_local_ref_head
= NULL
;
682 fra
.me
.REG
[0] = NIT_NULL
;
683 fra
.me
.REG
[1] = NIT_NULL
;
684 fra
.me
.REG
[2] = NIT_NULL
;
685 fra
.me
.REG
[3] = NIT_NULL
;
686 fra
.me
.REG
[4] = NIT_NULL
;
687 fra
.me
.REG
[5] = NIT_NULL
;
688 fra
.me
.REG
[6] = NIT_NULL
;
690 /* toolcontext.nit:87 */
691 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
692 if (UNTAG_Bool(REGB0
)) {
694 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 87);
696 fra
.me
.REG
[1] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
697 /* ../lib/standard/collection/array.nit:24 */
698 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
699 if (UNTAG_Bool(REGB0
)) {
701 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
703 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
704 /* toolcontext.nit:87 */
706 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
707 if (UNTAG_Bool(REGB2
)) {
709 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
711 /* ../lib/standard/kernel.nit:237 */
712 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB1
));
713 /* toolcontext.nit:87 */
714 if (UNTAG_Bool(REGB1
)) {
715 /* toolcontext.nit:88 */
716 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____message_sorter(fra
.me
.REG
[0])!=NIT_NULL
);
717 if (UNTAG_Bool(REGB1
)) {
719 nit_abort("Uninitialized attribute %s", "_message_sorter", LOCATE_toolcontext
, 88);
721 fra
.me
.REG
[1] = ATTR_toolcontext___ToolContext____message_sorter(fra
.me
.REG
[0]);
722 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
723 if (UNTAG_Bool(REGB1
)) {
725 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 88);
727 fra
.me
.REG
[2] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
728 CALL_standard___collection___sorter___AbstractSorter___sort(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
729 /* toolcontext.nit:90 */
730 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
731 if (UNTAG_Bool(REGB1
)) {
733 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 90);
735 fra
.me
.REG
[2] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
736 /* ../lib/standard/collection/array.nit:269 */
738 /* ../lib/standard/collection/array.nit:270 */
739 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
740 if (UNTAG_Bool(REGB0
)) {
742 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
744 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2]);
745 /* ../lib/standard/collection/array.nit:271 */
746 fra
.me
.REG
[1] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[2]);
747 /* ../lib/standard/collection/array.nit:272 */
749 /* ../lib/standard/collection/array.nit:24 */
750 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
751 if (UNTAG_Bool(REGB0
)) {
753 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
755 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[2]);
756 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
757 if (UNTAG_Bool(REGB2
)) {
759 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
761 /* ../lib/standard/kernel.nit:235 */
762 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
763 /* ../lib/standard/collection/array.nit:272 */
764 if (UNTAG_Bool(REGB0
)) {
765 /* ../lib/standard/collection/array.nit:273 */
766 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
767 if (UNTAG_Bool(REGB0
)) {
768 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
770 /* ../lib/standard/collection/array.nit:718 */
771 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[1])->val
[UNTAG_Int(REGB1
)];
772 /* toolcontext.nit:91 */
773 fra
.me
.REG
[4] = CALL_toolcontext___ToolContext___opt_no_color(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
774 fra
.me
.REG
[4] = CALL_opts___Option___value(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
775 if (UNTAG_Bool(fra
.me
.REG
[4])) {
776 /* toolcontext.nit:92 */
777 fra
.me
.REG
[4] = CALL_standard___file___Object___stderr(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
779 fra
.me
.REG
[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
781 fra
.me
.REG
[6] = BOX_NativeString("");
783 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
784 once_value_1
= fra
.me
.REG
[6];
785 register_static_object(&once_value_1
);
786 } else fra
.me
.REG
[6] = once_value_1
;
787 fra
.me
.REG
[6] = fra
.me
.REG
[6];
788 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
789 fra
.me
.REG
[6] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
790 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
792 fra
.me
.REG
[6] = BOX_NativeString("\n");
794 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
795 once_value_2
= fra
.me
.REG
[6];
796 register_static_object(&once_value_2
);
797 } else fra
.me
.REG
[6] = once_value_2
;
798 fra
.me
.REG
[6] = fra
.me
.REG
[6];
799 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[6]);
800 fra
.me
.REG
[5] = CALL_standard___string___Object___to_s(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
801 CALL_standard___stream___OStream___write(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[5]);
803 /* toolcontext.nit:94 */
804 fra
.me
.REG
[5] = CALL_standard___file___Object___stderr(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
806 fra
.me
.REG
[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
808 fra
.me
.REG
[6] = BOX_NativeString("");
810 fra
.me
.REG
[6] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[6], REGB0
);
811 once_value_3
= fra
.me
.REG
[6];
812 register_static_object(&once_value_3
);
813 } else fra
.me
.REG
[6] = once_value_3
;
814 fra
.me
.REG
[6] = fra
.me
.REG
[6];
815 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[6]);
816 fra
.me
.REG
[3] = CALL_toolcontext___Message___to_color_string(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
817 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
819 fra
.me
.REG
[3] = BOX_NativeString("\n");
821 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
822 once_value_4
= fra
.me
.REG
[3];
823 register_static_object(&once_value_4
);
824 } else fra
.me
.REG
[3] = once_value_4
;
825 fra
.me
.REG
[3] = fra
.me
.REG
[3];
826 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
827 fra
.me
.REG
[4] = CALL_standard___string___Object___to_s(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
828 CALL_standard___stream___OStream___write(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[4]);
830 /* ../lib/standard/collection/array.nit:274 */
832 /* ../lib/standard/kernel.nit:238 */
833 REGB0
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB0
));
834 /* ../lib/standard/collection/array.nit:274 */
837 /* ../lib/standard/collection/array.nit:272 */
842 /* toolcontext.nit:98 */
843 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
844 if (UNTAG_Bool(REGB1
)) {
846 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 98);
848 fra
.me
.REG
[1] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
849 CALL_standard___collection___abstract_collection___RemovableCollection___clear(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
851 /* toolcontext.nit:101 */
852 REGB1
= CALL_toolcontext___ToolContext___error_count(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
854 REGB2
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
855 if (UNTAG_Bool(REGB2
)) {
857 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
859 /* ../lib/standard/kernel.nit:237 */
860 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>UNTAG_Int(REGB0
));
861 /* toolcontext.nit:101 */
862 if (UNTAG_Bool(REGB0
)) {
864 CALL_standard___kernel___Object___exit(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
866 stack_frame_head
= fra
.me
.prev
;
869 static const char LOCATE_toolcontext___ToolContext___error
[] = "toolcontext::ToolContext::error";
870 void toolcontext___ToolContext___error(val_t p0
, val_t p1
, val_t p2
){
871 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
875 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
876 fra
.me
.file
= LOCATE_toolcontext
;
878 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___error
;
879 fra
.me
.has_broke
= 0;
881 fra
.me
.nitni_local_ref_head
= NULL
;
882 fra
.me
.REG
[0] = NIT_NULL
;
883 fra
.me
.REG
[1] = NIT_NULL
;
884 fra
.me
.REG
[2] = NIT_NULL
;
885 fra
.me
.REG
[3] = NIT_NULL
;
889 /* toolcontext.nit:107 */
890 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
891 if (UNTAG_Bool(REGB0
)) {
893 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 107);
895 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
896 fra
.me
.REG
[2] = NEW_Message_toolcontext___Message___init(fra
.me
.REG
[1], fra
.me
.REG
[2]);
897 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[2]);
898 /* toolcontext.nit:108 */
899 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0])!=NIT_NULL
);
900 if (UNTAG_Bool(REGB0
)) {
902 nit_abort("Uninitialized attribute %s", "_error_count", LOCATE_toolcontext
, 108);
904 REGB0
= ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0]);
906 /* ../lib/standard/kernel.nit:238 */
907 REGB1
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB1
));
908 /* toolcontext.nit:108 */
909 ATTR_toolcontext___ToolContext____error_count(fra
.me
.REG
[0]) = REGB1
;
910 /* toolcontext.nit:109 */
911 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___opt_stop_on_first_error(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
912 fra
.me
.REG
[2] = CALL_opts___Option___value(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
913 if (UNTAG_Bool(fra
.me
.REG
[2])) {
914 CALL_toolcontext___ToolContext___check_errors(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
916 stack_frame_head
= fra
.me
.prev
;
919 static const char LOCATE_toolcontext___ToolContext___fatal_error
[] = "toolcontext::ToolContext::fatal_error";
920 void toolcontext___ToolContext___fatal_error(val_t p0
, val_t p1
, val_t p2
){
921 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
923 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
924 fra
.me
.file
= LOCATE_toolcontext
;
926 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___fatal_error
;
927 fra
.me
.has_broke
= 0;
929 fra
.me
.nitni_local_ref_head
= NULL
;
930 fra
.me
.REG
[0] = NIT_NULL
;
931 fra
.me
.REG
[1] = NIT_NULL
;
932 fra
.me
.REG
[2] = NIT_NULL
;
936 /* toolcontext.nit:115 */
937 CALL_toolcontext___ToolContext___error(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2]);
938 /* toolcontext.nit:116 */
939 CALL_toolcontext___ToolContext___check_errors(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
940 stack_frame_head
= fra
.me
.prev
;
943 static const char LOCATE_toolcontext___ToolContext___warning
[] = "toolcontext::ToolContext::warning";
944 void toolcontext___ToolContext___warning(val_t p0
, val_t p1
, val_t p2
){
945 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
950 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
951 fra
.me
.file
= LOCATE_toolcontext
;
953 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___warning
;
954 fra
.me
.has_broke
= 0;
956 fra
.me
.nitni_local_ref_head
= NULL
;
957 fra
.me
.REG
[0] = NIT_NULL
;
958 fra
.me
.REG
[1] = NIT_NULL
;
959 fra
.me
.REG
[2] = NIT_NULL
;
960 fra
.me
.REG
[3] = NIT_NULL
;
964 /* toolcontext.nit:122 */
965 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0])!=NIT_NULL
);
966 if (UNTAG_Bool(REGB0
)) {
968 nit_abort("Uninitialized attribute %s", "_opt_warn", LOCATE_toolcontext
, 122);
970 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0]);
971 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
973 REGB1
= TAG_Bool(IS_EQUAL_ON(REGB0
,fra
.me
.REG
[3]));
974 if (UNTAG_Bool(REGB1
)) {
976 REGB2
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
977 if (UNTAG_Bool(REGB2
)) {
981 /* ../lib/standard/kernel.nit:230 */
982 REGB0
= TAG_Bool((fra
.me
.REG
[3])==(REGB0
));
983 /* toolcontext.nit:122 */
987 if (UNTAG_Bool(REGB1
)) {
990 /* toolcontext.nit:123 */
991 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0])!=NIT_NULL
);
992 if (UNTAG_Bool(REGB1
)) {
994 nit_abort("Uninitialized attribute %s", "_messages", LOCATE_toolcontext
, 123);
996 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____messages(fra
.me
.REG
[0]);
997 fra
.me
.REG
[2] = NEW_Message_toolcontext___Message___init(fra
.me
.REG
[1], fra
.me
.REG
[2]);
998 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[2]);
999 /* toolcontext.nit:124 */
1000 REGB1
= TAG_Bool(ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0])!=NIT_NULL
);
1001 if (UNTAG_Bool(REGB1
)) {
1003 nit_abort("Uninitialized attribute %s", "_warning_count", LOCATE_toolcontext
, 124);
1005 REGB1
= ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0]);
1007 /* ../lib/standard/kernel.nit:238 */
1008 REGB0
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB0
));
1009 /* toolcontext.nit:124 */
1010 ATTR_toolcontext___ToolContext____warning_count(fra
.me
.REG
[0]) = REGB0
;
1011 /* toolcontext.nit:125 */
1012 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___opt_stop_on_first_error(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1013 fra
.me
.REG
[2] = CALL_opts___Option___value(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1014 if (UNTAG_Bool(fra
.me
.REG
[2])) {
1015 CALL_toolcontext___ToolContext___check_errors(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1018 stack_frame_head
= fra
.me
.prev
;
1021 static const char LOCATE_toolcontext___ToolContext___info
[] = "toolcontext::ToolContext::info";
1022 void toolcontext___ToolContext___info(val_t p0
, val_t p1
, val_t p2
){
1023 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1028 static val_t once_value_1
; /* Once value */
1029 static val_t once_value_2
; /* Once value */
1030 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1031 fra
.me
.file
= LOCATE_toolcontext
;
1033 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___info
;
1034 fra
.me
.has_broke
= 0;
1035 fra
.me
.REG_size
= 4;
1036 fra
.me
.nitni_local_ref_head
= NULL
;
1037 fra
.me
.REG
[0] = NIT_NULL
;
1038 fra
.me
.REG
[1] = NIT_NULL
;
1039 fra
.me
.REG
[2] = NIT_NULL
;
1040 fra
.me
.REG
[3] = NIT_NULL
;
1044 /* toolcontext.nit:131 */
1045 REGB1
= CALL_toolcontext___ToolContext___verbose_level(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1046 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1047 if (UNTAG_Bool(REGB2
)) {
1049 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1051 /* ../lib/standard/kernel.nit:234 */
1052 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<=UNTAG_Int(REGB1
));
1053 /* toolcontext.nit:131 */
1054 if (UNTAG_Bool(REGB1
)) {
1055 /* toolcontext.nit:132 */
1057 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1
);
1058 if (!once_value_1
) {
1059 fra
.me
.REG
[3] = BOX_NativeString("");
1061 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB1
);
1062 once_value_1
= fra
.me
.REG
[3];
1063 register_static_object(&once_value_1
);
1064 } else fra
.me
.REG
[3] = once_value_1
;
1065 fra
.me
.REG
[3] = fra
.me
.REG
[3];
1066 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1067 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
1068 if (!once_value_2
) {
1069 fra
.me
.REG
[1] = BOX_NativeString("");
1071 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB1
);
1072 once_value_2
= fra
.me
.REG
[1];
1073 register_static_object(&once_value_2
);
1074 } else fra
.me
.REG
[1] = once_value_2
;
1075 fra
.me
.REG
[1] = fra
.me
.REG
[1];
1076 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1]);
1077 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1078 CALL_standard___file___Object___print(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
1080 stack_frame_head
= fra
.me
.prev
;
1083 static const char LOCATE_toolcontext___ToolContext___option_context
[] = "toolcontext::ToolContext::option_context";
1084 val_t
toolcontext___ToolContext___option_context(val_t p0
){
1085 struct {struct stack_frame_t me
;} fra
;
1088 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1089 fra
.me
.file
= LOCATE_toolcontext
;
1091 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___option_context
;
1092 fra
.me
.has_broke
= 0;
1093 fra
.me
.REG_size
= 1;
1094 fra
.me
.nitni_local_ref_head
= NULL
;
1095 fra
.me
.REG
[0] = NIT_NULL
;
1097 /* toolcontext.nit:136 */
1098 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____option_context(fra
.me
.REG
[0])!=NIT_NULL
);
1099 if (UNTAG_Bool(REGB0
)) {
1101 nit_abort("Uninitialized attribute %s", "_option_context", LOCATE_toolcontext
, 136);
1103 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____option_context(fra
.me
.REG
[0]);
1104 stack_frame_head
= fra
.me
.prev
;
1105 return fra
.me
.REG
[0];
1107 static const char LOCATE_toolcontext___ToolContext___opt_warn
[] = "toolcontext::ToolContext::opt_warn";
1108 val_t
toolcontext___ToolContext___opt_warn(val_t p0
){
1109 struct {struct stack_frame_t me
;} fra
;
1112 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1113 fra
.me
.file
= LOCATE_toolcontext
;
1115 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_warn
;
1116 fra
.me
.has_broke
= 0;
1117 fra
.me
.REG_size
= 1;
1118 fra
.me
.nitni_local_ref_head
= NULL
;
1119 fra
.me
.REG
[0] = NIT_NULL
;
1121 /* toolcontext.nit:139 */
1122 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0])!=NIT_NULL
);
1123 if (UNTAG_Bool(REGB0
)) {
1125 nit_abort("Uninitialized attribute %s", "_opt_warn", LOCATE_toolcontext
, 139);
1127 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_warn(fra
.me
.REG
[0]);
1128 stack_frame_head
= fra
.me
.prev
;
1129 return fra
.me
.REG
[0];
1131 static const char LOCATE_toolcontext___ToolContext___opt_quiet
[] = "toolcontext::ToolContext::opt_quiet";
1132 val_t
toolcontext___ToolContext___opt_quiet(val_t p0
){
1133 struct {struct stack_frame_t me
;} fra
;
1136 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1137 fra
.me
.file
= LOCATE_toolcontext
;
1139 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_quiet
;
1140 fra
.me
.has_broke
= 0;
1141 fra
.me
.REG_size
= 1;
1142 fra
.me
.nitni_local_ref_head
= NULL
;
1143 fra
.me
.REG
[0] = NIT_NULL
;
1145 /* toolcontext.nit:142 */
1146 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_quiet(fra
.me
.REG
[0])!=NIT_NULL
);
1147 if (UNTAG_Bool(REGB0
)) {
1149 nit_abort("Uninitialized attribute %s", "_opt_quiet", LOCATE_toolcontext
, 142);
1151 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_quiet(fra
.me
.REG
[0]);
1152 stack_frame_head
= fra
.me
.prev
;
1153 return fra
.me
.REG
[0];
1155 static const char LOCATE_toolcontext___ToolContext___opt_log
[] = "toolcontext::ToolContext::opt_log";
1156 val_t
toolcontext___ToolContext___opt_log(val_t p0
){
1157 struct {struct stack_frame_t me
;} fra
;
1160 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1161 fra
.me
.file
= LOCATE_toolcontext
;
1163 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_log
;
1164 fra
.me
.has_broke
= 0;
1165 fra
.me
.REG_size
= 1;
1166 fra
.me
.nitni_local_ref_head
= NULL
;
1167 fra
.me
.REG
[0] = NIT_NULL
;
1169 /* toolcontext.nit:145 */
1170 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[0])!=NIT_NULL
);
1171 if (UNTAG_Bool(REGB0
)) {
1173 nit_abort("Uninitialized attribute %s", "_opt_log", LOCATE_toolcontext
, 145);
1175 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[0]);
1176 stack_frame_head
= fra
.me
.prev
;
1177 return fra
.me
.REG
[0];
1179 static const char LOCATE_toolcontext___ToolContext___opt_log_dir
[] = "toolcontext::ToolContext::opt_log_dir";
1180 val_t
toolcontext___ToolContext___opt_log_dir(val_t p0
){
1181 struct {struct stack_frame_t me
;} fra
;
1184 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1185 fra
.me
.file
= LOCATE_toolcontext
;
1187 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_log_dir
;
1188 fra
.me
.has_broke
= 0;
1189 fra
.me
.REG_size
= 1;
1190 fra
.me
.nitni_local_ref_head
= NULL
;
1191 fra
.me
.REG
[0] = NIT_NULL
;
1193 /* toolcontext.nit:148 */
1194 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_log_dir(fra
.me
.REG
[0])!=NIT_NULL
);
1195 if (UNTAG_Bool(REGB0
)) {
1197 nit_abort("Uninitialized attribute %s", "_opt_log_dir", LOCATE_toolcontext
, 148);
1199 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_log_dir(fra
.me
.REG
[0]);
1200 stack_frame_head
= fra
.me
.prev
;
1201 return fra
.me
.REG
[0];
1203 static const char LOCATE_toolcontext___ToolContext___opt_help
[] = "toolcontext::ToolContext::opt_help";
1204 val_t
toolcontext___ToolContext___opt_help(val_t p0
){
1205 struct {struct stack_frame_t me
;} fra
;
1208 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1209 fra
.me
.file
= LOCATE_toolcontext
;
1211 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_help
;
1212 fra
.me
.has_broke
= 0;
1213 fra
.me
.REG_size
= 1;
1214 fra
.me
.nitni_local_ref_head
= NULL
;
1215 fra
.me
.REG
[0] = NIT_NULL
;
1217 /* toolcontext.nit:151 */
1218 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_help(fra
.me
.REG
[0])!=NIT_NULL
);
1219 if (UNTAG_Bool(REGB0
)) {
1221 nit_abort("Uninitialized attribute %s", "_opt_help", LOCATE_toolcontext
, 151);
1223 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_help(fra
.me
.REG
[0]);
1224 stack_frame_head
= fra
.me
.prev
;
1225 return fra
.me
.REG
[0];
1227 static const char LOCATE_toolcontext___ToolContext___opt_version
[] = "toolcontext::ToolContext::opt_version";
1228 val_t
toolcontext___ToolContext___opt_version(val_t p0
){
1229 struct {struct stack_frame_t me
;} fra
;
1232 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1233 fra
.me
.file
= LOCATE_toolcontext
;
1235 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_version
;
1236 fra
.me
.has_broke
= 0;
1237 fra
.me
.REG_size
= 1;
1238 fra
.me
.nitni_local_ref_head
= NULL
;
1239 fra
.me
.REG
[0] = NIT_NULL
;
1241 /* toolcontext.nit:154 */
1242 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_version(fra
.me
.REG
[0])!=NIT_NULL
);
1243 if (UNTAG_Bool(REGB0
)) {
1245 nit_abort("Uninitialized attribute %s", "_opt_version", LOCATE_toolcontext
, 154);
1247 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_version(fra
.me
.REG
[0]);
1248 stack_frame_head
= fra
.me
.prev
;
1249 return fra
.me
.REG
[0];
1251 static const char LOCATE_toolcontext___ToolContext___opt_verbose
[] = "toolcontext::ToolContext::opt_verbose";
1252 val_t
toolcontext___ToolContext___opt_verbose(val_t p0
){
1253 struct {struct stack_frame_t me
;} fra
;
1256 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1257 fra
.me
.file
= LOCATE_toolcontext
;
1259 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_verbose
;
1260 fra
.me
.has_broke
= 0;
1261 fra
.me
.REG_size
= 1;
1262 fra
.me
.nitni_local_ref_head
= NULL
;
1263 fra
.me
.REG
[0] = NIT_NULL
;
1265 /* toolcontext.nit:157 */
1266 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_verbose(fra
.me
.REG
[0])!=NIT_NULL
);
1267 if (UNTAG_Bool(REGB0
)) {
1269 nit_abort("Uninitialized attribute %s", "_opt_verbose", LOCATE_toolcontext
, 157);
1271 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_verbose(fra
.me
.REG
[0]);
1272 stack_frame_head
= fra
.me
.prev
;
1273 return fra
.me
.REG
[0];
1275 static const char LOCATE_toolcontext___ToolContext___opt_stop_on_first_error
[] = "toolcontext::ToolContext::opt_stop_on_first_error";
1276 val_t
toolcontext___ToolContext___opt_stop_on_first_error(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_stop_on_first_error
;
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:160 */
1290 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_stop_on_first_error(fra
.me
.REG
[0])!=NIT_NULL
);
1291 if (UNTAG_Bool(REGB0
)) {
1293 nit_abort("Uninitialized attribute %s", "_opt_stop_on_first_error", LOCATE_toolcontext
, 160);
1295 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_stop_on_first_error(fra
.me
.REG
[0]);
1296 stack_frame_head
= fra
.me
.prev
;
1297 return fra
.me
.REG
[0];
1299 static const char LOCATE_toolcontext___ToolContext___opt_no_color
[] = "toolcontext::ToolContext::opt_no_color";
1300 val_t
toolcontext___ToolContext___opt_no_color(val_t p0
){
1301 struct {struct stack_frame_t me
;} fra
;
1304 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1305 fra
.me
.file
= LOCATE_toolcontext
;
1307 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___opt_no_color
;
1308 fra
.me
.has_broke
= 0;
1309 fra
.me
.REG_size
= 1;
1310 fra
.me
.nitni_local_ref_head
= NULL
;
1311 fra
.me
.REG
[0] = NIT_NULL
;
1313 /* toolcontext.nit:163 */
1314 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_no_color(fra
.me
.REG
[0])!=NIT_NULL
);
1315 if (UNTAG_Bool(REGB0
)) {
1317 nit_abort("Uninitialized attribute %s", "_opt_no_color", LOCATE_toolcontext
, 163);
1319 fra
.me
.REG
[0] = ATTR_toolcontext___ToolContext____opt_no_color(fra
.me
.REG
[0]);
1320 stack_frame_head
= fra
.me
.prev
;
1321 return fra
.me
.REG
[0];
1323 static const char LOCATE_toolcontext___ToolContext___verbose_level
[] = "toolcontext::ToolContext::verbose_level";
1324 val_t
toolcontext___ToolContext___verbose_level(val_t p0
){
1325 struct {struct stack_frame_t me
;} fra
;
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___verbose_level
;
1332 fra
.me
.has_broke
= 0;
1333 fra
.me
.REG_size
= 1;
1334 fra
.me
.nitni_local_ref_head
= NULL
;
1335 fra
.me
.REG
[0] = NIT_NULL
;
1337 /* toolcontext.nit:166 */
1338 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____verbose_level(fra
.me
.REG
[0])!=NIT_NULL
);
1339 if (UNTAG_Bool(REGB0
)) {
1341 nit_abort("Uninitialized attribute %s", "_verbose_level", LOCATE_toolcontext
, 166);
1343 REGB0
= ATTR_toolcontext___ToolContext____verbose_level(fra
.me
.REG
[0]);
1344 stack_frame_head
= fra
.me
.prev
;
1347 static const char LOCATE_toolcontext___ToolContext___init
[] = "toolcontext::ToolContext::init";
1348 void toolcontext___ToolContext___init(val_t p0
, int* init_table
){
1349 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_toolcontext___ToolContext
].i
;
1350 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1353 if (init_table
[itpos1
]) return;
1354 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1355 fra
.me
.file
= LOCATE_toolcontext
;
1357 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___init
;
1358 fra
.me
.has_broke
= 0;
1359 fra
.me
.REG_size
= 4;
1360 fra
.me
.nitni_local_ref_head
= NULL
;
1361 fra
.me
.REG
[0] = NIT_NULL
;
1362 fra
.me
.REG
[1] = NIT_NULL
;
1363 fra
.me
.REG
[2] = NIT_NULL
;
1364 fra
.me
.REG
[3] = NIT_NULL
;
1366 /* toolcontext.nit:171 */
1367 fra
.me
.REG
[1] = CALL_toolcontext___ToolContext___option_context(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1369 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
1370 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_warn(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1371 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1372 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_quiet(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1373 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1374 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_stop_on_first_error(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1375 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1376 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_no_color(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1377 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1378 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1379 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1380 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log_dir(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1381 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1382 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_help(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1383 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1384 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_version(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1385 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1386 fra
.me
.REG
[0] = CALL_toolcontext___ToolContext___opt_verbose(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1387 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[0]);
1388 CALL_opts___OptionContext___add_option(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2]);
1389 stack_frame_head
= fra
.me
.prev
;
1390 init_table
[itpos1
] = 1;
1393 static const char LOCATE_toolcontext___ToolContext___process_options
[] = "toolcontext::ToolContext::process_options";
1394 void toolcontext___ToolContext___process_options(val_t p0
){
1395 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1399 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1400 fra
.me
.file
= LOCATE_toolcontext
;
1402 fra
.me
.meth
= LOCATE_toolcontext___ToolContext___process_options
;
1403 fra
.me
.has_broke
= 0;
1404 fra
.me
.REG_size
= 4;
1405 fra
.me
.nitni_local_ref_head
= NULL
;
1406 fra
.me
.REG
[0] = NIT_NULL
;
1407 fra
.me
.REG
[1] = NIT_NULL
;
1408 fra
.me
.REG
[2] = NIT_NULL
;
1409 fra
.me
.REG
[3] = NIT_NULL
;
1411 /* toolcontext.nit:174 */
1412 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1413 /* toolcontext.nit:177 */
1414 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___opt_warn(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1416 CALL_opts___Option___value__eq(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB0
);
1417 /* toolcontext.nit:180 */
1418 fra
.me
.REG
[2] = CALL_toolcontext___ToolContext___option_context(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1419 fra
.me
.REG
[3] = CALL_standard___string___Object___args(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1420 CALL_opts___OptionContext___parse(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
1421 /* toolcontext.nit:183 */
1422 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_verbose(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1423 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1424 ATTR_toolcontext___ToolContext____verbose_level(fra
.me
.REG
[1]) = fra
.me
.REG
[3];
1425 /* toolcontext.nit:185 */
1426 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_quiet(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1427 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1428 if (UNTAG_Bool(fra
.me
.REG
[3])) {
1429 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_warn(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1431 CALL_opts___Option___value__eq(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB0
);
1433 /* toolcontext.nit:187 */
1434 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log_dir(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1435 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1436 REGB0
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
1437 if (UNTAG_Bool(REGB0
)) {
1439 REGB1
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
1440 if (UNTAG_Bool(REGB1
)) {
1441 REGB1
= TAG_Bool(0);
1444 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], NIT_NULL
);
1448 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
1449 if (UNTAG_Bool(REGB0
)) {
1450 fra
.me
.REG
[3] = CALL_toolcontext___ToolContext___opt_log_dir(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1451 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1452 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*/;
1453 if (UNTAG_Bool(REGB0
)) {
1455 nit_abort("Cast failed", NULL
, LOCATE_toolcontext
, 187);
1457 ATTR_toolcontext___ToolContext____log_directory(fra
.me
.REG
[1]) = fra
.me
.REG
[3];
1459 /* toolcontext.nit:188 */
1460 REGB0
= TAG_Bool(ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[1])!=NIT_NULL
);
1461 if (UNTAG_Bool(REGB0
)) {
1463 nit_abort("Uninitialized attribute %s", "_opt_log", LOCATE_toolcontext
, 188);
1465 fra
.me
.REG
[3] = ATTR_toolcontext___ToolContext____opt_log(fra
.me
.REG
[1]);
1466 fra
.me
.REG
[3] = CALL_opts___Option___value(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
1467 if (UNTAG_Bool(fra
.me
.REG
[3])) {
1468 /* toolcontext.nit:190 */
1469 fra
.me
.REG
[1] = CALL_toolcontext___ToolContext___log_directory(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1470 CALL_standard___file___String___mkdir(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1472 stack_frame_head
= fra
.me
.prev
;