tools: clean Makefiles
[nit.git] / c_src / standard___file._sep.c
1 /* This C file is generated by NIT to compile module standard___file. */
2 #include "standard___file._sep.h"
3 void standard___file___Object___printn(val_t p0, val_t p1){
4 struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
5 val_t REGB0;
6 val_t tmp;
7 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
8 fra.me.file = LOCATE_standard___file;
9 fra.me.line = 25;
10 fra.me.meth = LOCATE_standard___file___Object___printn;
11 fra.me.has_broke = 0;
12 fra.me.REG_size = 3;
13 fra.me.REG[0] = NIT_NULL;
14 fra.me.REG[1] = NIT_NULL;
15 fra.me.REG[2] = NIT_NULL;
16 fra.me.REG[0] = p0;
17 fra.me.REG[1] = p1;
18 /* ./../lib/standard//file.nit:25 */
19 fra.me.REG[2] = fra.me.REG[0];
20 REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[1], COLOR_standard___collection___array___Array, ID_standard___collection___array___Array)) /*cast Array[Object]*/;
21 if (UNTAG_Bool(REGB0)) {
22 } else {
23 nit_abort("Cast failed", NULL, LOCATE_standard___file, 25);
24 }
25 /* ./../lib/standard//file.nit:28 */
26 fra.me.REG[2] = CALL_standard___file___Object___stdout(fra.me.REG[2])(fra.me.REG[2]);
27 fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
28 CALL_standard___stream___OStream___write(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
29 stack_frame_head = fra.me.prev;
30 return;
31 }
32 void standard___file___Object___print(val_t p0, val_t p1){
33 struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
34 val_t REGB0;
35 val_t tmp;
36 static val_t once_value_1; /* Once value */
37 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
38 fra.me.file = LOCATE_standard___file;
39 fra.me.line = 31;
40 fra.me.meth = LOCATE_standard___file___Object___print;
41 fra.me.has_broke = 0;
42 fra.me.REG_size = 3;
43 fra.me.REG[0] = NIT_NULL;
44 fra.me.REG[1] = NIT_NULL;
45 fra.me.REG[2] = NIT_NULL;
46 fra.me.REG[0] = p0;
47 fra.me.REG[1] = p1;
48 /* ./../lib/standard//file.nit:34 */
49 fra.me.REG[2] = CALL_standard___file___Object___stdout(fra.me.REG[0])(fra.me.REG[0]);
50 fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
51 CALL_standard___stream___OStream___write(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
52 /* ./../lib/standard//file.nit:35 */
53 fra.me.REG[0] = CALL_standard___file___Object___stdout(fra.me.REG[0])(fra.me.REG[0]);
54 if (!once_value_1) {
55 fra.me.REG[1] = BOX_NativeString("\n");
56 REGB0 = TAG_Int(1);
57 fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB0);
58 once_value_1 = fra.me.REG[1];
59 register_static_object(&once_value_1);
60 } else fra.me.REG[1] = once_value_1;
61 fra.me.REG[1] = fra.me.REG[1];
62 CALL_standard___stream___OStream___write(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
63 stack_frame_head = fra.me.prev;
64 return;
65 }
66 val_t standard___file___Object___getc(val_t p0){
67 struct {struct stack_frame_t me;} fra;
68 val_t REGB0;
69 val_t tmp;
70 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
71 fra.me.file = LOCATE_standard___file;
72 fra.me.line = 38;
73 fra.me.meth = LOCATE_standard___file___Object___getc;
74 fra.me.has_broke = 0;
75 fra.me.REG_size = 1;
76 fra.me.REG[0] = NIT_NULL;
77 fra.me.REG[0] = p0;
78 /* ./../lib/standard//file.nit:41 */
79 fra.me.REG[0] = CALL_standard___file___Object___stdin(fra.me.REG[0])(fra.me.REG[0]);
80 REGB0 = CALL_standard___stream___IStream___read_char(fra.me.REG[0])(fra.me.REG[0]);
81 /* ./../lib/standard//kernel.nit:297 */
82 REGB0 = TAG_Char(UNTAG_Int(REGB0));
83 /* ./../lib/standard//file.nit:41 */
84 goto label1;
85 label1: while(0);
86 stack_frame_head = fra.me.prev;
87 return REGB0;
88 }
89 val_t standard___file___Object___gets(val_t p0){
90 struct {struct stack_frame_t me;} fra;
91 val_t tmp;
92 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
93 fra.me.file = LOCATE_standard___file;
94 fra.me.line = 44;
95 fra.me.meth = LOCATE_standard___file___Object___gets;
96 fra.me.has_broke = 0;
97 fra.me.REG_size = 1;
98 fra.me.REG[0] = NIT_NULL;
99 fra.me.REG[0] = p0;
100 /* ./../lib/standard//file.nit:47 */
101 fra.me.REG[0] = CALL_standard___file___Object___stdin(fra.me.REG[0])(fra.me.REG[0]);
102 fra.me.REG[0] = CALL_standard___stream___IStream___read_line(fra.me.REG[0])(fra.me.REG[0]);
103 goto label1;
104 label1: while(0);
105 stack_frame_head = fra.me.prev;
106 return fra.me.REG[0];
107 }
108 val_t standard___file___Object___stdin(val_t p0){
109 struct {struct stack_frame_t me;} fra;
110 val_t tmp;
111 static val_t once_value_1; /* Once value */
112 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
113 fra.me.file = LOCATE_standard___file;
114 fra.me.line = 323;
115 fra.me.meth = LOCATE_standard___file___Object___stdin;
116 fra.me.has_broke = 0;
117 fra.me.REG_size = 1;
118 fra.me.REG[0] = NIT_NULL;
119 fra.me.REG[0] = p0;
120 /* ./../lib/standard//file.nit:324 */
121 if (!once_value_1) {
122 fra.me.REG[0] = NEW_Stdin_standard___file___Stdin___init();
123 once_value_1 = fra.me.REG[0];
124 register_static_object(&once_value_1);
125 } else fra.me.REG[0] = once_value_1;
126 fra.me.REG[0] = fra.me.REG[0];
127 goto label2;
128 label2: while(0);
129 stack_frame_head = fra.me.prev;
130 return fra.me.REG[0];
131 }
132 val_t standard___file___Object___stdout(val_t p0){
133 struct {struct stack_frame_t me;} fra;
134 val_t tmp;
135 static val_t once_value_1; /* Once value */
136 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
137 fra.me.file = LOCATE_standard___file;
138 fra.me.line = 326;
139 fra.me.meth = LOCATE_standard___file___Object___stdout;
140 fra.me.has_broke = 0;
141 fra.me.REG_size = 1;
142 fra.me.REG[0] = NIT_NULL;
143 fra.me.REG[0] = p0;
144 /* ./../lib/standard//file.nit:327 */
145 if (!once_value_1) {
146 fra.me.REG[0] = NEW_Stdout_standard___file___Stdout___init();
147 once_value_1 = fra.me.REG[0];
148 register_static_object(&once_value_1);
149 } else fra.me.REG[0] = once_value_1;
150 fra.me.REG[0] = fra.me.REG[0];
151 goto label2;
152 label2: while(0);
153 stack_frame_head = fra.me.prev;
154 return fra.me.REG[0];
155 }
156 val_t standard___file___Object___stderr(val_t p0){
157 struct {struct stack_frame_t me;} fra;
158 val_t tmp;
159 static val_t once_value_1; /* Once value */
160 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
161 fra.me.file = LOCATE_standard___file;
162 fra.me.line = 329;
163 fra.me.meth = LOCATE_standard___file___Object___stderr;
164 fra.me.has_broke = 0;
165 fra.me.REG_size = 1;
166 fra.me.REG[0] = NIT_NULL;
167 fra.me.REG[0] = p0;
168 /* ./../lib/standard//file.nit:330 */
169 if (!once_value_1) {
170 fra.me.REG[0] = NEW_Stderr_standard___file___Stderr___init();
171 once_value_1 = fra.me.REG[0];
172 register_static_object(&once_value_1);
173 } else fra.me.REG[0] = once_value_1;
174 fra.me.REG[0] = fra.me.REG[0];
175 goto label2;
176 label2: while(0);
177 stack_frame_head = fra.me.prev;
178 return fra.me.REG[0];
179 }
180 val_t standard___file___FStream___path(val_t p0){
181 struct {struct stack_frame_t me;} fra;
182 val_t tmp;
183 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
184 fra.me.file = LOCATE_standard___file;
185 fra.me.line = 55;
186 fra.me.meth = LOCATE_standard___file___FStream___path;
187 fra.me.has_broke = 0;
188 fra.me.REG_size = 1;
189 fra.me.REG[0] = NIT_NULL;
190 fra.me.REG[0] = p0;
191 /* ./../lib/standard//file.nit:55 */
192 fra.me.REG[0] = ATTR_standard___file___FStream____path(fra.me.REG[0]);
193 stack_frame_head = fra.me.prev;
194 return fra.me.REG[0];
195 }
196 val_t standard___file___FStream___file_stat(val_t p0){
197 struct {struct stack_frame_t me;} fra;
198 val_t REGB0;
199 val_t tmp;
200 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
201 fra.me.file = LOCATE_standard___file;
202 fra.me.line = 61;
203 fra.me.meth = LOCATE_standard___file___FStream___file_stat;
204 fra.me.has_broke = 0;
205 fra.me.REG_size = 1;
206 fra.me.REG[0] = NIT_NULL;
207 fra.me.REG[0] = p0;
208 /* ./../lib/standard//file.nit:62 */
209 fra.me.REG[0] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
210 REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
211 if (UNTAG_Bool(REGB0)) {
212 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 62);
213 }
214 fra.me.REG[0] = CALL_standard___file___NativeFile___file_stat(fra.me.REG[0])(fra.me.REG[0]);
215 goto label1;
216 label1: while(0);
217 stack_frame_head = fra.me.prev;
218 return fra.me.REG[0];
219 }
220 void standard___file___IFStream___reopen(val_t p0){
221 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
222 val_t REGB0;
223 val_t tmp;
224 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
225 fra.me.file = LOCATE_standard___file;
226 fra.me.line = 71;
227 fra.me.meth = LOCATE_standard___file___IFStream___reopen;
228 fra.me.has_broke = 0;
229 fra.me.REG_size = 2;
230 fra.me.REG[0] = NIT_NULL;
231 fra.me.REG[1] = NIT_NULL;
232 fra.me.REG[0] = p0;
233 /* ./../lib/standard//file.nit:75 */
234 REGB0 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
235 REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
236 if (UNTAG_Bool(REGB0)) {
237 CALL_standard___stream___IOS___close(fra.me.REG[0])(fra.me.REG[0]);
238 }
239 /* ./../lib/standard//file.nit:76 */
240 fra.me.REG[1] = ATTR_standard___file___FStream____path(fra.me.REG[0]);
241 REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
242 if (UNTAG_Bool(REGB0)) {
243 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 76);
244 }
245 fra.me.REG[1] = CALL_standard___string___String___to_cstring(fra.me.REG[1])(fra.me.REG[1]);
246 fra.me.REG[1] = CALL_standard___file___NativeFileCapable___io_open_read(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
247 ATTR_standard___file___FStream____file(fra.me.REG[0]) = fra.me.REG[1];
248 /* ./../lib/standard//file.nit:77 */
249 REGB0 = TAG_Bool(false);
250 ATTR_standard___file___IFStream____end_reached(fra.me.REG[0]) = REGB0;
251 /* ./../lib/standard//file.nit:78 */
252 REGB0 = TAG_Int(0);
253 ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB0;
254 /* ./../lib/standard//file.nit:79 */
255 fra.me.REG[0] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
256 REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
257 if (UNTAG_Bool(REGB0)) {
258 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 79);
259 }
260 CALL_standard___collection___abstract_collection___RemovableCollection___clear(fra.me.REG[0])(fra.me.REG[0]);
261 stack_frame_head = fra.me.prev;
262 return;
263 }
264 void standard___file___IFStream___close(val_t p0){
265 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
266 val_t REGB0;
267 val_t tmp;
268 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
269 fra.me.file = LOCATE_standard___file;
270 fra.me.line = 82;
271 fra.me.meth = LOCATE_standard___file___IFStream___close;
272 fra.me.has_broke = 0;
273 fra.me.REG_size = 2;
274 fra.me.REG[0] = NIT_NULL;
275 fra.me.REG[1] = NIT_NULL;
276 fra.me.REG[0] = p0;
277 /* ./../lib/standard//file.nit:84 */
278 fra.me.REG[1] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
279 REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
280 if (UNTAG_Bool(REGB0)) {
281 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 84);
282 }
283 REGB0 = CALL_standard___file___NativeFile___io_close(fra.me.REG[1])(fra.me.REG[1]);
284 /* ./../lib/standard//file.nit:85 */
285 REGB0 = TAG_Bool(true);
286 ATTR_standard___file___IFStream____end_reached(fra.me.REG[0]) = REGB0;
287 stack_frame_head = fra.me.prev;
288 return;
289 }
290 void standard___file___IFStream___fill_buffer(val_t p0){
291 struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
292 val_t REGB0;
293 val_t REGB1;
294 val_t REGB2;
295 val_t tmp;
296 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
297 fra.me.file = LOCATE_standard___file;
298 fra.me.line = 88;
299 fra.me.meth = LOCATE_standard___file___IFStream___fill_buffer;
300 fra.me.has_broke = 0;
301 fra.me.REG_size = 4;
302 fra.me.REG[0] = NIT_NULL;
303 fra.me.REG[1] = NIT_NULL;
304 fra.me.REG[2] = NIT_NULL;
305 fra.me.REG[3] = NIT_NULL;
306 fra.me.REG[0] = p0;
307 /* ./../lib/standard//file.nit:90 */
308 fra.me.REG[1] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
309 fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
310 REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
311 if (UNTAG_Bool(REGB0)) {
312 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 90);
313 }
314 REGB0 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[2])!=NIT_NULL);
315 if (UNTAG_Bool(REGB0)) {
316 } else {
317 nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___file, 90);
318 }
319 fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[2]);
320 fra.me.REG[3] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
321 REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
322 if (UNTAG_Bool(REGB0)) {
323 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 90);
324 }
325 REGB0 = TAG_Bool(ATTR_standard___string___Buffer____capacity(fra.me.REG[3])!=NIT_NULL);
326 if (UNTAG_Bool(REGB0)) {
327 } else {
328 nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___file, 90);
329 }
330 REGB0 = ATTR_standard___string___Buffer____capacity(fra.me.REG[3]);
331 REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
332 if (UNTAG_Bool(REGB1)) {
333 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 90);
334 }
335 REGB0 = CALL_standard___file___NativeFile___io_read(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2], REGB0);
336 /* ./../lib/standard//file.nit:91 */
337 REGB1 = TAG_Int(0);
338 REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
339 if (UNTAG_Bool(REGB2)) {
340 } else {
341 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
342 }
343 /* ./../lib/standard//kernel.nit:231 */
344 REGB1 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
345 /* ./../lib/standard//file.nit:91 */
346 if (UNTAG_Bool(REGB1)) {
347 /* ./../lib/standard//file.nit:92 */
348 REGB1 = TAG_Bool(true);
349 ATTR_standard___file___IFStream____end_reached(fra.me.REG[0]) = REGB1;
350 /* ./../lib/standard//file.nit:93 */
351 REGB1 = TAG_Int(0);
352 REGB0 = REGB1;
353 }
354 /* ./../lib/standard//file.nit:95 */
355 fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
356 REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
357 if (UNTAG_Bool(REGB1)) {
358 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 95);
359 }
360 ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]) = REGB0;
361 /* ./../lib/standard//file.nit:96 */
362 REGB0 = TAG_Int(0);
363 ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB0;
364 stack_frame_head = fra.me.prev;
365 return;
366 }
367 val_t standard___file___IFStream___end_reached(val_t p0){
368 struct {struct stack_frame_t me;} fra;
369 val_t REGB0;
370 val_t tmp;
371 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
372 fra.me.file = LOCATE_standard___file;
373 fra.me.line = 99;
374 fra.me.meth = LOCATE_standard___file___IFStream___end_reached;
375 fra.me.has_broke = 0;
376 fra.me.REG_size = 1;
377 fra.me.REG[0] = NIT_NULL;
378 fra.me.REG[0] = p0;
379 /* ./../lib/standard//file.nit:99 */
380 REGB0 = TAG_Bool(ATTR_standard___file___IFStream____end_reached(fra.me.REG[0])!=NIT_NULL);
381 if (UNTAG_Bool(REGB0)) {
382 } else {
383 nit_abort("Uninitialized attribute %s", "_end_reached", LOCATE_standard___file, 99);
384 }
385 REGB0 = ATTR_standard___file___IFStream____end_reached(fra.me.REG[0]);
386 stack_frame_head = fra.me.prev;
387 return REGB0;
388 }
389 void standard___file___IFStream___open(val_t p0, val_t p1, int* init_table){
390 int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___IFStream].i;
391 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
392 val_t REGB0;
393 val_t REGB1;
394 val_t tmp;
395 if (init_table[itpos0]) return;
396 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
397 fra.me.file = LOCATE_standard___file;
398 fra.me.line = 102;
399 fra.me.meth = LOCATE_standard___file___IFStream___open;
400 fra.me.has_broke = 0;
401 fra.me.REG_size = 2;
402 fra.me.REG[0] = NIT_NULL;
403 fra.me.REG[1] = NIT_NULL;
404 fra.me.REG[0] = p0;
405 fra.me.REG[1] = p1;
406 /* ./../lib/standard//file.nit:105 */
407 ATTR_standard___file___FStream____path(fra.me.REG[0]) = fra.me.REG[1];
408 /* ./../lib/standard//file.nit:106 */
409 REGB0 = TAG_Int(10);
410 CALL_standard___stream___BufferedIStream___prepare_buffer(fra.me.REG[0])(fra.me.REG[0], REGB0);
411 /* ./../lib/standard//file.nit:107 */
412 fra.me.REG[1] = ATTR_standard___file___FStream____path(fra.me.REG[0]);
413 REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
414 if (UNTAG_Bool(REGB0)) {
415 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 107);
416 }
417 fra.me.REG[1] = CALL_standard___string___String___to_cstring(fra.me.REG[1])(fra.me.REG[1]);
418 fra.me.REG[1] = CALL_standard___file___NativeFileCapable___io_open_read(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
419 ATTR_standard___file___FStream____file(fra.me.REG[0]) = fra.me.REG[1];
420 /* ./../lib/standard//file.nit:108 */
421 fra.me.REG[0] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
422 REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
423 if (UNTAG_Bool(REGB0)) {
424 } else {
425 REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
426 if (UNTAG_Bool(REGB1)) {
427 REGB1 = TAG_Bool(false);
428 REGB0 = REGB1;
429 } else {
430 REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL);
431 REGB0 = REGB1;
432 }
433 }
434 REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
435 if (UNTAG_Bool(REGB0)) {
436 } else {
437 nit_abort("Assert %s failed", "'cant_open_file'", LOCATE_standard___file, 108);
438 }
439 stack_frame_head = fra.me.prev;
440 init_table[itpos0] = 1;
441 return;
442 }
443 void standard___file___IFStream___init(val_t p0, int* init_table){
444 int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___IFStream].i;
445 struct {struct stack_frame_t me;} fra;
446 val_t tmp;
447 if (init_table[itpos1]) return;
448 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
449 fra.me.file = LOCATE_standard___file;
450 fra.me.line = 111;
451 fra.me.meth = LOCATE_standard___file___IFStream___init;
452 fra.me.has_broke = 0;
453 fra.me.REG_size = 1;
454 fra.me.REG[0] = NIT_NULL;
455 fra.me.REG[0] = p0;
456 stack_frame_head = fra.me.prev;
457 init_table[itpos1] = 1;
458 return;
459 }
460 void standard___file___IFStream___without_file(val_t p0, int* init_table){
461 int itpos2 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___IFStream].i;
462 struct {struct stack_frame_t me;} fra;
463 val_t tmp;
464 if (init_table[itpos2]) return;
465 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
466 fra.me.file = LOCATE_standard___file;
467 fra.me.line = 112;
468 fra.me.meth = LOCATE_standard___file___IFStream___without_file;
469 fra.me.has_broke = 0;
470 fra.me.REG_size = 1;
471 fra.me.REG[0] = NIT_NULL;
472 fra.me.REG[0] = p0;
473 stack_frame_head = fra.me.prev;
474 init_table[itpos2] = 1;
475 return;
476 }
477 void standard___file___OFStream___write(val_t p0, val_t p1){
478 struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
479 val_t REGB0;
480 val_t tmp;
481 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
482 fra.me.file = LOCATE_standard___file;
483 fra.me.line = 120;
484 fra.me.meth = LOCATE_standard___file___OFStream___write;
485 fra.me.has_broke = 0;
486 fra.me.REG_size = 3;
487 fra.me.REG[0] = NIT_NULL;
488 fra.me.REG[1] = NIT_NULL;
489 fra.me.REG[2] = NIT_NULL;
490 fra.me.REG[0] = p0;
491 fra.me.REG[1] = p1;
492 /* ./../lib/standard//file.nit:122 */
493 REGB0 = TAG_Bool(ATTR_standard___file___OFStream____writable(fra.me.REG[0])!=NIT_NULL);
494 if (UNTAG_Bool(REGB0)) {
495 } else {
496 nit_abort("Uninitialized attribute %s", "_writable", LOCATE_standard___file, 122);
497 }
498 REGB0 = ATTR_standard___file___OFStream____writable(fra.me.REG[0]);
499 if (UNTAG_Bool(REGB0)) {
500 } else {
501 nit_abort("Assert failed", NULL, LOCATE_standard___file, 122);
502 }
503 /* ./../lib/standard//file.nit:123 */
504 fra.me.REG[2] = CALL_standard___string___String___to_cstring(fra.me.REG[1])(fra.me.REG[1]);
505 /* ./../lib/standard//collection//array.nit:24 */
506 REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
507 if (UNTAG_Bool(REGB0)) {
508 } else {
509 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
510 }
511 REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
512 /* ./../lib/standard//file.nit:123 */
513 CALL_standard___file___OFStream___write_native(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2], REGB0);
514 stack_frame_head = fra.me.prev;
515 return;
516 }
517 val_t standard___file___OFStream___is_writable(val_t p0){
518 struct {struct stack_frame_t me;} fra;
519 val_t REGB0;
520 val_t tmp;
521 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
522 fra.me.file = LOCATE_standard___file;
523 fra.me.line = 126;
524 fra.me.meth = LOCATE_standard___file___OFStream___is_writable;
525 fra.me.has_broke = 0;
526 fra.me.REG_size = 1;
527 fra.me.REG[0] = NIT_NULL;
528 fra.me.REG[0] = p0;
529 /* ./../lib/standard//file.nit:126 */
530 REGB0 = TAG_Bool(ATTR_standard___file___OFStream____writable(fra.me.REG[0])!=NIT_NULL);
531 if (UNTAG_Bool(REGB0)) {
532 } else {
533 nit_abort("Uninitialized attribute %s", "_writable", LOCATE_standard___file, 126);
534 }
535 REGB0 = ATTR_standard___file___OFStream____writable(fra.me.REG[0]);
536 goto label1;
537 label1: while(0);
538 stack_frame_head = fra.me.prev;
539 return REGB0;
540 }
541 void standard___file___OFStream___close(val_t p0){
542 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
543 val_t REGB0;
544 val_t tmp;
545 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
546 fra.me.file = LOCATE_standard___file;
547 fra.me.line = 128;
548 fra.me.meth = LOCATE_standard___file___OFStream___close;
549 fra.me.has_broke = 0;
550 fra.me.REG_size = 2;
551 fra.me.REG[0] = NIT_NULL;
552 fra.me.REG[1] = NIT_NULL;
553 fra.me.REG[0] = p0;
554 /* ./../lib/standard//file.nit:130 */
555 fra.me.REG[1] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
556 REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
557 if (UNTAG_Bool(REGB0)) {
558 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 130);
559 }
560 REGB0 = CALL_standard___file___NativeFile___io_close(fra.me.REG[1])(fra.me.REG[1]);
561 /* ./../lib/standard//file.nit:131 */
562 REGB0 = TAG_Bool(false);
563 ATTR_standard___file___OFStream____writable(fra.me.REG[0]) = REGB0;
564 stack_frame_head = fra.me.prev;
565 return;
566 }
567 void standard___file___OFStream___write_native(val_t p0, val_t p1, val_t p2){
568 struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
569 val_t REGB0;
570 val_t REGB1;
571 val_t REGB2;
572 val_t REGB3;
573 val_t tmp;
574 static val_t once_value_1; /* Once value */
575 static val_t once_value_2; /* Once value */
576 static val_t once_value_3; /* Once value */
577 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
578 fra.me.file = LOCATE_standard___file;
579 fra.me.line = 137;
580 fra.me.meth = LOCATE_standard___file___OFStream___write_native;
581 fra.me.has_broke = 0;
582 fra.me.REG_size = 3;
583 fra.me.REG[0] = NIT_NULL;
584 fra.me.REG[1] = NIT_NULL;
585 fra.me.REG[2] = NIT_NULL;
586 fra.me.REG[0] = p0;
587 fra.me.REG[1] = p1;
588 REGB0 = p2;
589 /* ./../lib/standard//file.nit:140 */
590 REGB1 = TAG_Bool(ATTR_standard___file___OFStream____writable(fra.me.REG[0])!=NIT_NULL);
591 if (UNTAG_Bool(REGB1)) {
592 } else {
593 nit_abort("Uninitialized attribute %s", "_writable", LOCATE_standard___file, 140);
594 }
595 REGB1 = ATTR_standard___file___OFStream____writable(fra.me.REG[0]);
596 if (UNTAG_Bool(REGB1)) {
597 } else {
598 nit_abort("Assert failed", NULL, LOCATE_standard___file, 140);
599 }
600 /* ./../lib/standard//file.nit:141 */
601 fra.me.REG[2] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
602 REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
603 if (UNTAG_Bool(REGB1)) {
604 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 141);
605 }
606 REGB1 = CALL_standard___file___NativeFile___io_write(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1], REGB0);
607 /* ./../lib/standard//file.nit:142 */
608 REGB2 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB0));
609 if (UNTAG_Bool(REGB2)) {
610 } else {
611 /* ./../lib/standard//kernel.nit:227 */
612 REGB3 = TAG_Bool((REGB1)==(REGB0));
613 /* ./../lib/standard//file.nit:142 */
614 REGB2 = REGB3;
615 }
616 REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
617 if (UNTAG_Bool(REGB2)) {
618 /* ./../lib/standard//file.nit:144 */
619 REGB2 = TAG_Int(4);
620 fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB2);
621 if (!once_value_1) {
622 fra.me.REG[2] = BOX_NativeString("Problem in writing : ");
623 REGB2 = TAG_Int(21);
624 fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB2);
625 once_value_1 = fra.me.REG[2];
626 register_static_object(&once_value_1);
627 } else fra.me.REG[2] = once_value_1;
628 fra.me.REG[2] = fra.me.REG[2];
629 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
630 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB1);
631 if (!once_value_2) {
632 fra.me.REG[2] = BOX_NativeString(" ");
633 REGB1 = TAG_Int(1);
634 fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB1);
635 once_value_2 = fra.me.REG[2];
636 register_static_object(&once_value_2);
637 } else fra.me.REG[2] = once_value_2;
638 fra.me.REG[2] = fra.me.REG[2];
639 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
640 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB0);
641 if (!once_value_3) {
642 fra.me.REG[2] = BOX_NativeString("\n");
643 REGB0 = TAG_Int(1);
644 fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0);
645 once_value_3 = fra.me.REG[2];
646 register_static_object(&once_value_3);
647 } else fra.me.REG[2] = once_value_3;
648 fra.me.REG[2] = fra.me.REG[2];
649 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
650 CALL_standard___file___Object___printn(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
651 }
652 stack_frame_head = fra.me.prev;
653 return;
654 }
655 void standard___file___OFStream___open(val_t p0, val_t p1, int* init_table){
656 int itpos3 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___OFStream].i;
657 struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
658 val_t REGB0;
659 val_t REGB1;
660 val_t tmp;
661 if (init_table[itpos3]) return;
662 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
663 fra.me.file = LOCATE_standard___file;
664 fra.me.line = 148;
665 fra.me.meth = LOCATE_standard___file___OFStream___open;
666 fra.me.has_broke = 0;
667 fra.me.REG_size = 3;
668 fra.me.REG[0] = NIT_NULL;
669 fra.me.REG[1] = NIT_NULL;
670 fra.me.REG[2] = NIT_NULL;
671 fra.me.REG[0] = p0;
672 fra.me.REG[1] = p1;
673 /* ./../lib/standard//file.nit:151 */
674 fra.me.REG[2] = CALL_standard___string___String___to_cstring(fra.me.REG[1])(fra.me.REG[1]);
675 fra.me.REG[2] = CALL_standard___file___NativeFileCapable___io_open_write(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
676 ATTR_standard___file___FStream____file(fra.me.REG[0]) = fra.me.REG[2];
677 /* ./../lib/standard//file.nit:152 */
678 fra.me.REG[2] = ATTR_standard___file___FStream____file(fra.me.REG[0]);
679 REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
680 if (UNTAG_Bool(REGB0)) {
681 } else {
682 REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
683 if (UNTAG_Bool(REGB1)) {
684 REGB1 = TAG_Bool(false);
685 REGB0 = REGB1;
686 } else {
687 REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
688 REGB0 = REGB1;
689 }
690 }
691 REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
692 if (UNTAG_Bool(REGB0)) {
693 } else {
694 nit_abort("Assert %s failed", "'cant_open_file'", LOCATE_standard___file, 152);
695 }
696 /* ./../lib/standard//file.nit:153 */
697 ATTR_standard___file___FStream____path(fra.me.REG[0]) = fra.me.REG[1];
698 /* ./../lib/standard//file.nit:154 */
699 REGB0 = TAG_Bool(true);
700 ATTR_standard___file___OFStream____writable(fra.me.REG[0]) = REGB0;
701 stack_frame_head = fra.me.prev;
702 init_table[itpos3] = 1;
703 return;
704 }
705 void standard___file___OFStream___init(val_t p0, int* init_table){
706 int itpos4 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___OFStream].i;
707 struct {struct stack_frame_t me;} fra;
708 val_t tmp;
709 if (init_table[itpos4]) return;
710 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
711 fra.me.file = LOCATE_standard___file;
712 fra.me.line = 157;
713 fra.me.meth = LOCATE_standard___file___OFStream___init;
714 fra.me.has_broke = 0;
715 fra.me.REG_size = 1;
716 fra.me.REG[0] = NIT_NULL;
717 fra.me.REG[0] = p0;
718 stack_frame_head = fra.me.prev;
719 init_table[itpos4] = 1;
720 return;
721 }
722 void standard___file___OFStream___without_file(val_t p0, int* init_table){
723 int itpos5 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___OFStream].i;
724 struct {struct stack_frame_t me;} fra;
725 val_t tmp;
726 if (init_table[itpos5]) return;
727 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
728 fra.me.file = LOCATE_standard___file;
729 fra.me.line = 158;
730 fra.me.meth = LOCATE_standard___file___OFStream___without_file;
731 fra.me.has_broke = 0;
732 fra.me.REG_size = 1;
733 fra.me.REG[0] = NIT_NULL;
734 fra.me.REG[0] = p0;
735 stack_frame_head = fra.me.prev;
736 init_table[itpos5] = 1;
737 return;
738 }
739 void standard___file___Stdin___init(val_t p0, int* init_table){
740 int itpos6 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___Stdin].i;
741 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
742 val_t REGB0;
743 val_t tmp;
744 static val_t once_value_1; /* Once value */
745 if (init_table[itpos6]) return;
746 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
747 fra.me.file = LOCATE_standard___file;
748 fra.me.line = 165;
749 fra.me.meth = LOCATE_standard___file___Stdin___init;
750 fra.me.has_broke = 0;
751 fra.me.REG_size = 2;
752 fra.me.REG[0] = NIT_NULL;
753 fra.me.REG[1] = NIT_NULL;
754 fra.me.REG[0] = p0;
755 /* ./../lib/standard//file.nit:165 */
756 fra.me.REG[1] = fra.me.REG[0];
757 CALL_standard___file___IFStream___init(fra.me.REG[0])(fra.me.REG[0], init_table);
758 /* ./../lib/standard//file.nit:166 */
759 fra.me.REG[0] = CALL_standard___file___NativeFileCapable___native_stdin(fra.me.REG[1])(fra.me.REG[1]);
760 ATTR_standard___file___FStream____file(fra.me.REG[1]) = fra.me.REG[0];
761 /* ./../lib/standard//file.nit:167 */
762 if (!once_value_1) {
763 fra.me.REG[0] = BOX_NativeString("/dev/stdin");
764 REGB0 = TAG_Int(10);
765 fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
766 once_value_1 = fra.me.REG[0];
767 register_static_object(&once_value_1);
768 } else fra.me.REG[0] = once_value_1;
769 fra.me.REG[0] = fra.me.REG[0];
770 ATTR_standard___file___FStream____path(fra.me.REG[1]) = fra.me.REG[0];
771 /* ./../lib/standard//file.nit:168 */
772 REGB0 = TAG_Int(1);
773 CALL_standard___stream___BufferedIStream___prepare_buffer(fra.me.REG[1])(fra.me.REG[1], REGB0);
774 stack_frame_head = fra.me.prev;
775 init_table[itpos6] = 1;
776 return;
777 }
778 void standard___file___Stdout___init(val_t p0, int* init_table){
779 int itpos7 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___Stdout].i;
780 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
781 val_t REGB0;
782 val_t tmp;
783 static val_t once_value_1; /* Once value */
784 if (init_table[itpos7]) return;
785 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
786 fra.me.file = LOCATE_standard___file;
787 fra.me.line = 174;
788 fra.me.meth = LOCATE_standard___file___Stdout___init;
789 fra.me.has_broke = 0;
790 fra.me.REG_size = 2;
791 fra.me.REG[0] = NIT_NULL;
792 fra.me.REG[1] = NIT_NULL;
793 fra.me.REG[0] = p0;
794 /* ./../lib/standard//file.nit:174 */
795 fra.me.REG[1] = fra.me.REG[0];
796 CALL_standard___file___OFStream___init(fra.me.REG[0])(fra.me.REG[0], init_table);
797 /* ./../lib/standard//file.nit:175 */
798 fra.me.REG[0] = CALL_standard___file___NativeFileCapable___native_stdout(fra.me.REG[1])(fra.me.REG[1]);
799 ATTR_standard___file___FStream____file(fra.me.REG[1]) = fra.me.REG[0];
800 /* ./../lib/standard//file.nit:176 */
801 if (!once_value_1) {
802 fra.me.REG[0] = BOX_NativeString("/dev/stdout");
803 REGB0 = TAG_Int(11);
804 fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
805 once_value_1 = fra.me.REG[0];
806 register_static_object(&once_value_1);
807 } else fra.me.REG[0] = once_value_1;
808 fra.me.REG[0] = fra.me.REG[0];
809 ATTR_standard___file___FStream____path(fra.me.REG[1]) = fra.me.REG[0];
810 /* ./../lib/standard//file.nit:177 */
811 REGB0 = TAG_Bool(true);
812 ATTR_standard___file___OFStream____writable(fra.me.REG[1]) = REGB0;
813 stack_frame_head = fra.me.prev;
814 init_table[itpos7] = 1;
815 return;
816 }
817 void standard___file___Stderr___init(val_t p0, int* init_table){
818 int itpos8 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___file___Stderr].i;
819 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
820 val_t REGB0;
821 val_t tmp;
822 static val_t once_value_1; /* Once value */
823 if (init_table[itpos8]) return;
824 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
825 fra.me.file = LOCATE_standard___file;
826 fra.me.line = 183;
827 fra.me.meth = LOCATE_standard___file___Stderr___init;
828 fra.me.has_broke = 0;
829 fra.me.REG_size = 2;
830 fra.me.REG[0] = NIT_NULL;
831 fra.me.REG[1] = NIT_NULL;
832 fra.me.REG[0] = p0;
833 /* ./../lib/standard//file.nit:183 */
834 fra.me.REG[1] = fra.me.REG[0];
835 CALL_standard___file___OFStream___init(fra.me.REG[0])(fra.me.REG[0], init_table);
836 /* ./../lib/standard//file.nit:184 */
837 fra.me.REG[0] = CALL_standard___file___NativeFileCapable___native_stderr(fra.me.REG[1])(fra.me.REG[1]);
838 ATTR_standard___file___FStream____file(fra.me.REG[1]) = fra.me.REG[0];
839 /* ./../lib/standard//file.nit:185 */
840 if (!once_value_1) {
841 fra.me.REG[0] = BOX_NativeString("/dev/stderr");
842 REGB0 = TAG_Int(11);
843 fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
844 once_value_1 = fra.me.REG[0];
845 register_static_object(&once_value_1);
846 } else fra.me.REG[0] = once_value_1;
847 fra.me.REG[0] = fra.me.REG[0];
848 ATTR_standard___file___FStream____path(fra.me.REG[1]) = fra.me.REG[0];
849 /* ./../lib/standard//file.nit:186 */
850 REGB0 = TAG_Bool(true);
851 ATTR_standard___file___OFStream____writable(fra.me.REG[1]) = REGB0;
852 stack_frame_head = fra.me.prev;
853 init_table[itpos8] = 1;
854 return;
855 }
856 val_t standard___file___String___file_exists(val_t p0){
857 struct {struct stack_frame_t me;} fra;
858 val_t REGB0;
859 val_t tmp;
860 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
861 fra.me.file = LOCATE_standard___file;
862 fra.me.line = 193;
863 fra.me.meth = LOCATE_standard___file___String___file_exists;
864 fra.me.has_broke = 0;
865 fra.me.REG_size = 1;
866 fra.me.REG[0] = NIT_NULL;
867 fra.me.REG[0] = p0;
868 /* ./../lib/standard//file.nit:194 */
869 fra.me.REG[0] = CALL_standard___string___String___to_cstring(fra.me.REG[0])(fra.me.REG[0]);
870 REGB0 = CALL_standard___file___NativeString___file_exists(fra.me.REG[0])(fra.me.REG[0]);
871 goto label1;
872 label1: while(0);
873 stack_frame_head = fra.me.prev;
874 return REGB0;
875 }
876 val_t standard___file___String___file_stat(val_t p0){
877 struct {struct stack_frame_t me;} fra;
878 val_t tmp;
879 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
880 fra.me.file = LOCATE_standard___file;
881 fra.me.line = 196;
882 fra.me.meth = LOCATE_standard___file___String___file_stat;
883 fra.me.has_broke = 0;
884 fra.me.REG_size = 1;
885 fra.me.REG[0] = NIT_NULL;
886 fra.me.REG[0] = p0;
887 /* ./../lib/standard//file.nit:196 */
888 fra.me.REG[0] = CALL_standard___string___String___to_cstring(fra.me.REG[0])(fra.me.REG[0]);
889 fra.me.REG[0] = CALL_standard___file___NativeString___file_stat(fra.me.REG[0])(fra.me.REG[0]);
890 goto label1;
891 label1: while(0);
892 stack_frame_head = fra.me.prev;
893 return fra.me.REG[0];
894 }
895 val_t standard___file___String___file_delete(val_t p0){
896 struct {struct stack_frame_t me;} fra;
897 val_t REGB0;
898 val_t tmp;
899 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
900 fra.me.file = LOCATE_standard___file;
901 fra.me.line = 198;
902 fra.me.meth = LOCATE_standard___file___String___file_delete;
903 fra.me.has_broke = 0;
904 fra.me.REG_size = 1;
905 fra.me.REG[0] = NIT_NULL;
906 fra.me.REG[0] = p0;
907 /* ./../lib/standard//file.nit:199 */
908 fra.me.REG[0] = CALL_standard___string___String___to_cstring(fra.me.REG[0])(fra.me.REG[0]);
909 REGB0 = CALL_standard___file___NativeString___file_delete(fra.me.REG[0])(fra.me.REG[0]);
910 goto label1;
911 label1: while(0);
912 stack_frame_head = fra.me.prev;
913 return REGB0;
914 }
915 val_t standard___file___String___strip_extension(val_t p0, val_t p1){
916 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
917 val_t REGB0;
918 val_t REGB1;
919 val_t REGB2;
920 val_t tmp;
921 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
922 fra.me.file = LOCATE_standard___file;
923 fra.me.line = 201;
924 fra.me.meth = LOCATE_standard___file___String___strip_extension;
925 fra.me.has_broke = 0;
926 fra.me.REG_size = 2;
927 fra.me.REG[0] = NIT_NULL;
928 fra.me.REG[1] = NIT_NULL;
929 fra.me.REG[0] = p0;
930 fra.me.REG[1] = p1;
931 /* ./../lib/standard//file.nit:204 */
932 REGB0 = CALL_standard___string___AbstractString___has_suffix(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
933 if (UNTAG_Bool(REGB0)) {
934 /* ./../lib/standard//file.nit:205 */
935 REGB0 = TAG_Int(0);
936 /* ./../lib/standard//collection//array.nit:24 */
937 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
938 if (UNTAG_Bool(REGB1)) {
939 } else {
940 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
941 }
942 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
943 REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
944 if (UNTAG_Bool(REGB2)) {
945 } else {
946 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
947 }
948 REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
949 /* ./../lib/standard//kernel.nit:237 */
950 REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
951 /* ./../lib/standard//file.nit:205 */
952 fra.me.REG[1] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB2);
953 goto label1;
954 }
955 /* ./../lib/standard//file.nit:207 */
956 fra.me.REG[1] = fra.me.REG[0];
957 goto label1;
958 label1: while(0);
959 stack_frame_head = fra.me.prev;
960 return fra.me.REG[1];
961 }
962 val_t standard___file___String___basename(val_t p0, val_t p1){
963 struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
964 val_t REGB0;
965 val_t REGB1;
966 val_t REGB2;
967 val_t tmp;
968 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
969 fra.me.file = LOCATE_standard___file;
970 fra.me.line = 210;
971 fra.me.meth = LOCATE_standard___file___String___basename;
972 fra.me.has_broke = 0;
973 fra.me.REG_size = 3;
974 fra.me.REG[0] = NIT_NULL;
975 fra.me.REG[1] = NIT_NULL;
976 fra.me.REG[2] = NIT_NULL;
977 fra.me.REG[0] = p0;
978 fra.me.REG[1] = p1;
979 /* ./../lib/standard//file.nit:213 */
980 REGB0 = TAG_Char('/');
981 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
982 if (UNTAG_Bool(REGB1)) {
983 } else {
984 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___file, 213);
985 }
986 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
987 REGB2 = TAG_Int(1);
988 /* ./../lib/standard//kernel.nit:237 */
989 REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
990 /* ./../lib/standard//file.nit:213 */
991 REGB2 = CALL_standard___collection___array___AbstractArrayRead___last_index_of_from(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB2);
992 /* ./../lib/standard//file.nit:214 */
993 fra.me.REG[2] = fra.me.REG[0];
994 /* ./../lib/standard//file.nit:215 */
995 REGB0 = TAG_Int(0);
996 REGB1 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
997 if (UNTAG_Bool(REGB1)) {
998 } else {
999 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1000 }
1001 /* ./../lib/standard//kernel.nit:233 */
1002 REGB0 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB0));
1003 /* ./../lib/standard//file.nit:215 */
1004 if (UNTAG_Bool(REGB0)) {
1005 /* ./../lib/standard//file.nit:216 */
1006 REGB0 = TAG_Int(1);
1007 /* ./../lib/standard//kernel.nit:235 */
1008 REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
1009 /* ./../lib/standard//file.nit:216 */
1010 fra.me.REG[0] = CALL_standard___string___AbstractString___substring_from(fra.me.REG[0])(fra.me.REG[0], REGB0);
1011 fra.me.REG[2] = fra.me.REG[0];
1012 }
1013 /* ./../lib/standard//file.nit:218 */
1014 fra.me.REG[1] = CALL_standard___file___String___strip_extension(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
1015 goto label1;
1016 label1: while(0);
1017 stack_frame_head = fra.me.prev;
1018 return fra.me.REG[1];
1019 }
1020 val_t standard___file___String___dirname(val_t p0){
1021 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
1022 val_t REGB0;
1023 val_t REGB1;
1024 val_t REGB2;
1025 val_t tmp;
1026 static val_t once_value_2; /* Once value */
1027 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1028 fra.me.file = LOCATE_standard___file;
1029 fra.me.line = 221;
1030 fra.me.meth = LOCATE_standard___file___String___dirname;
1031 fra.me.has_broke = 0;
1032 fra.me.REG_size = 2;
1033 fra.me.REG[0] = NIT_NULL;
1034 fra.me.REG[1] = NIT_NULL;
1035 fra.me.REG[0] = p0;
1036 /* ./../lib/standard//file.nit:224 */
1037 REGB0 = TAG_Char('/');
1038 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
1039 if (UNTAG_Bool(REGB1)) {
1040 } else {
1041 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___file, 224);
1042 }
1043 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
1044 REGB2 = TAG_Int(1);
1045 /* ./../lib/standard//kernel.nit:237 */
1046 REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
1047 /* ./../lib/standard//file.nit:224 */
1048 REGB2 = CALL_standard___collection___array___AbstractArrayRead___last_index_of_from(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB2);
1049 /* ./../lib/standard//file.nit:225 */
1050 REGB0 = TAG_Int(0);
1051 REGB1 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
1052 if (UNTAG_Bool(REGB1)) {
1053 } else {
1054 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1055 }
1056 /* ./../lib/standard//kernel.nit:233 */
1057 REGB0 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB0));
1058 /* ./../lib/standard//file.nit:225 */
1059 if (UNTAG_Bool(REGB0)) {
1060 /* ./../lib/standard//file.nit:226 */
1061 REGB0 = TAG_Int(0);
1062 fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB2);
1063 goto label1;
1064 } else {
1065 /* ./../lib/standard//file.nit:228 */
1066 if (!once_value_2) {
1067 fra.me.REG[1] = BOX_NativeString(".");
1068 REGB2 = TAG_Int(1);
1069 fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB2);
1070 once_value_2 = fra.me.REG[1];
1071 register_static_object(&once_value_2);
1072 } else fra.me.REG[1] = once_value_2;
1073 fra.me.REG[1] = fra.me.REG[1];
1074 fra.me.REG[0] = fra.me.REG[1];
1075 goto label1;
1076 }
1077 label1: while(0);
1078 stack_frame_head = fra.me.prev;
1079 return fra.me.REG[0];
1080 }
1081 val_t standard___file___String___simplify_path(val_t p0){
1082 struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
1083 val_t REGB0;
1084 val_t REGB1;
1085 val_t REGB2;
1086 val_t tmp;
1087 static val_t once_value_1; /* Once value */
1088 static val_t once_value_2; /* Once value */
1089 static val_t once_value_4; /* Once value */
1090 static val_t once_value_5; /* Once value */
1091 static val_t once_value_7; /* Once value */
1092 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1093 fra.me.file = LOCATE_standard___file;
1094 fra.me.line = 232;
1095 fra.me.meth = LOCATE_standard___file___String___simplify_path;
1096 fra.me.has_broke = 0;
1097 fra.me.REG_size = 5;
1098 fra.me.REG[0] = NIT_NULL;
1099 fra.me.REG[1] = NIT_NULL;
1100 fra.me.REG[2] = NIT_NULL;
1101 fra.me.REG[3] = NIT_NULL;
1102 fra.me.REG[4] = NIT_NULL;
1103 fra.me.REG[0] = p0;
1104 /* ./../lib/standard//file.nit:247 */
1105 if (!once_value_1) {
1106 fra.me.REG[1] = BOX_NativeString("/");
1107 REGB0 = TAG_Int(1);
1108 fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB0);
1109 once_value_1 = fra.me.REG[1];
1110 register_static_object(&once_value_1);
1111 } else fra.me.REG[1] = once_value_1;
1112 fra.me.REG[1] = fra.me.REG[1];
1113 fra.me.REG[1] = CALL_standard___string_search___String___split_with(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
1114 /* ./../lib/standard//file.nit:248 */
1115 fra.me.REG[0] = NEW_Array_standard___collection___array___Array___init();
1116 /* ./../lib/standard//collection//array.nit:269 */
1117 REGB0 = TAG_Int(0);
1118 /* ./../lib/standard//collection//array.nit:270 */
1119 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
1120 if (UNTAG_Bool(REGB1)) {
1121 } else {
1122 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 270);
1123 }
1124 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
1125 /* ./../lib/standard//collection//array.nit:271 */
1126 fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[1]);
1127 /* ./../lib/standard//collection//array.nit:272 */
1128 while(1) {
1129 /* ./../lib/standard//collection//array.nit:24 */
1130 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
1131 if (UNTAG_Bool(REGB1)) {
1132 } else {
1133 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
1134 }
1135 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
1136 REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
1137 if (UNTAG_Bool(REGB2)) {
1138 } else {
1139 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1140 }
1141 /* ./../lib/standard//kernel.nit:232 */
1142 REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
1143 /* ./../lib/standard//collection//array.nit:272 */
1144 if (UNTAG_Bool(REGB1)) {
1145 /* ./../lib/standard//collection//array.nit:273 */
1146 REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
1147 if (UNTAG_Bool(REGB1)) {
1148 nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
1149 }
1150 /* ./../lib/standard//collection//array.nit:718 */
1151 fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
1152 /* ./../lib/standard//file.nit:250 */
1153 if (!once_value_2) {
1154 fra.me.REG[4] = BOX_NativeString(".");
1155 REGB1 = TAG_Int(1);
1156 fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1);
1157 once_value_2 = fra.me.REG[4];
1158 register_static_object(&once_value_2);
1159 } else fra.me.REG[4] = once_value_2;
1160 fra.me.REG[4] = fra.me.REG[4];
1161 REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[3],fra.me.REG[4]));
1162 if (UNTAG_Bool(REGB1)) {
1163 } else {
1164 REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
1165 REGB1 = REGB2;
1166 }
1167 if (UNTAG_Bool(REGB1)) {
1168 goto label3;
1169 }
1170 /* ./../lib/standard//file.nit:251 */
1171 if (!once_value_4) {
1172 fra.me.REG[4] = BOX_NativeString("");
1173 REGB1 = TAG_Int(0);
1174 fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1);
1175 once_value_4 = fra.me.REG[4];
1176 register_static_object(&once_value_4);
1177 } else fra.me.REG[4] = once_value_4;
1178 fra.me.REG[4] = fra.me.REG[4];
1179 REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[3],fra.me.REG[4]));
1180 if (UNTAG_Bool(REGB1)) {
1181 } else {
1182 REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
1183 REGB1 = REGB2;
1184 }
1185 if (UNTAG_Bool(REGB1)) {
1186 REGB1 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
1187 REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
1188 } else {
1189 REGB2 = TAG_Bool(false);
1190 REGB1 = REGB2;
1191 }
1192 if (UNTAG_Bool(REGB1)) {
1193 goto label3;
1194 }
1195 /* ./../lib/standard//file.nit:252 */
1196 if (!once_value_5) {
1197 fra.me.REG[4] = BOX_NativeString("..");
1198 REGB1 = TAG_Int(2);
1199 fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1);
1200 once_value_5 = fra.me.REG[4];
1201 register_static_object(&once_value_5);
1202 } else fra.me.REG[4] = once_value_5;
1203 fra.me.REG[4] = fra.me.REG[4];
1204 REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[3],fra.me.REG[4]));
1205 if (UNTAG_Bool(REGB1)) {
1206 } else {
1207 REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
1208 REGB1 = REGB2;
1209 }
1210 if (UNTAG_Bool(REGB1)) {
1211 REGB1 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
1212 REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
1213 } else {
1214 REGB2 = TAG_Bool(false);
1215 REGB1 = REGB2;
1216 }
1217 if (UNTAG_Bool(REGB1)) {
1218 /* ./../lib/standard//file.nit:253 */
1219 CALL_standard___collection___abstract_collection___Sequence___pop(fra.me.REG[0])(fra.me.REG[0]);
1220 /* ./../lib/standard//file.nit:254 */
1221 goto label3;
1222 }
1223 /* ./../lib/standard//file.nit:256 */
1224 CALL_standard___collection___abstract_collection___Sequence___push(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]);
1225 label3: while(0);
1226 /* ./../lib/standard//collection//array.nit:274 */
1227 REGB1 = TAG_Int(1);
1228 /* ./../lib/standard//kernel.nit:235 */
1229 REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
1230 /* ./../lib/standard//collection//array.nit:274 */
1231 REGB0 = REGB1;
1232 } else {
1233 /* ./../lib/standard//collection//array.nit:272 */
1234 goto label6;
1235 }
1236 }
1237 label6: while(0);
1238 /* ./../lib/standard//file.nit:258 */
1239 if (!once_value_7) {
1240 fra.me.REG[2] = BOX_NativeString("/");
1241 REGB0 = TAG_Int(1);
1242 fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0);
1243 once_value_7 = fra.me.REG[2];
1244 register_static_object(&once_value_7);
1245 } else fra.me.REG[2] = once_value_7;
1246 fra.me.REG[2] = fra.me.REG[2];
1247 fra.me.REG[2] = CALL_standard___string___Collection___join(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
1248 goto label8;
1249 label8: while(0);
1250 stack_frame_head = fra.me.prev;
1251 return fra.me.REG[2];
1252 }
1253 void standard___file___String___mkdir(val_t p0){
1254 struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
1255 val_t REGB0;
1256 val_t REGB1;
1257 val_t REGB2;
1258 val_t tmp;
1259 static val_t once_value_1; /* Once value */
1260 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1261 fra.me.file = LOCATE_standard___file;
1262 fra.me.line = 261;
1263 fra.me.meth = LOCATE_standard___file___String___mkdir;
1264 fra.me.has_broke = 0;
1265 fra.me.REG_size = 4;
1266 fra.me.REG[0] = NIT_NULL;
1267 fra.me.REG[1] = NIT_NULL;
1268 fra.me.REG[2] = NIT_NULL;
1269 fra.me.REG[3] = NIT_NULL;
1270 fra.me.REG[0] = p0;
1271 /* ./../lib/standard//file.nit:264 */
1272 if (!once_value_1) {
1273 fra.me.REG[1] = BOX_NativeString("/");
1274 REGB0 = TAG_Int(1);
1275 fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB0);
1276 once_value_1 = fra.me.REG[1];
1277 register_static_object(&once_value_1);
1278 } else fra.me.REG[1] = once_value_1;
1279 fra.me.REG[1] = fra.me.REG[1];
1280 fra.me.REG[1] = CALL_standard___string_search___String___split_with(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
1281 /* ./../lib/standard//file.nit:265 */
1282 fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___init();
1283 /* ./../lib/standard//file.nit:266 */
1284 REGB0 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[1])(fra.me.REG[1]);
1285 if (UNTAG_Bool(REGB0)) {
1286 goto label2;
1287 }
1288 /* ./../lib/standard//file.nit:267 */
1289 REGB0 = TAG_Int(0);
1290 /* ./../lib/standard//collection//array.nit:278 */
1291 fra.me.REG[2] = fra.me.REG[1];
1292 /* ./../lib/standard//collection//array.nit:280 */
1293 REGB1 = TAG_Int(0);
1294 REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
1295 if (UNTAG_Bool(REGB2)) {
1296 } else {
1297 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1298 }
1299 /* ./../lib/standard//kernel.nit:233 */
1300 REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
1301 /* ./../lib/standard//collection//array.nit:280 */
1302 if (UNTAG_Bool(REGB1)) {
1303 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
1304 if (UNTAG_Bool(REGB1)) {
1305 } else {
1306 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 280);
1307 }
1308 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
1309 REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
1310 if (UNTAG_Bool(REGB2)) {
1311 } else {
1312 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1313 }
1314 /* ./../lib/standard//kernel.nit:232 */
1315 REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
1316 } else {
1317 /* ./../lib/standard//collection//array.nit:280 */
1318 REGB2 = TAG_Bool(false);
1319 REGB1 = REGB2;
1320 }
1321 if (UNTAG_Bool(REGB1)) {
1322 } else {
1323 nit_abort("Assert %s failed", "'index'", LOCATE_standard___collection___array, 280);
1324 }
1325 /* ./../lib/standard//collection//array.nit:281 */
1326 fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
1327 REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
1328 if (UNTAG_Bool(REGB1)) {
1329 nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 281);
1330 }
1331 /* ./../lib/standard//collection//array.nit:718 */
1332 fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
1333 /* ./../lib/standard//collection//array.nit:281 */
1334 goto label3;
1335 label3: while(0);
1336 /* ./../lib/standard//file.nit:267 */
1337 REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
1338 if (UNTAG_Bool(REGB0)) {
1339 nit_abort("Reciever is null", NULL, LOCATE_standard___file, 267);
1340 }
1341 REGB0 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[2])(fra.me.REG[2]);
1342 if (UNTAG_Bool(REGB0)) {
1343 /* ./../lib/standard//file.nit:269 */
1344 REGB0 = TAG_Char('/');
1345 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB0);
1346 }
1347 /* ./../lib/standard//collection//array.nit:269 */
1348 REGB0 = TAG_Int(0);
1349 /* ./../lib/standard//collection//array.nit:270 */
1350 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
1351 if (UNTAG_Bool(REGB1)) {
1352 } else {
1353 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 270);
1354 }
1355 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
1356 /* ./../lib/standard//collection//array.nit:271 */
1357 fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[1]);
1358 /* ./../lib/standard//collection//array.nit:272 */
1359 while(1) {
1360 /* ./../lib/standard//collection//array.nit:24 */
1361 REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
1362 if (UNTAG_Bool(REGB1)) {
1363 } else {
1364 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
1365 }
1366 REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
1367 REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
1368 if (UNTAG_Bool(REGB2)) {
1369 } else {
1370 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1371 }
1372 /* ./../lib/standard//kernel.nit:232 */
1373 REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
1374 /* ./../lib/standard//collection//array.nit:272 */
1375 if (UNTAG_Bool(REGB1)) {
1376 /* ./../lib/standard//collection//array.nit:273 */
1377 REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
1378 if (UNTAG_Bool(REGB1)) {
1379 nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
1380 }
1381 /* ./../lib/standard//collection//array.nit:718 */
1382 fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
1383 /* ./../lib/standard//file.nit:272 */
1384 REGB1 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[3])(fra.me.REG[3]);
1385 if (UNTAG_Bool(REGB1)) {
1386 goto label4;
1387 }
1388 /* ./../lib/standard//file.nit:273 */
1389 CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]);
1390 /* ./../lib/standard//file.nit:274 */
1391 REGB1 = TAG_Char('/');
1392 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1);
1393 /* ./../lib/standard//file.nit:275 */
1394 fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
1395 fra.me.REG[3] = CALL_standard___string___String___to_cstring(fra.me.REG[3])(fra.me.REG[3]);
1396 CALL_standard___file___NativeString___file_mkdir(fra.me.REG[3])(fra.me.REG[3]);
1397 label4: while(0);
1398 /* ./../lib/standard//collection//array.nit:274 */
1399 REGB1 = TAG_Int(1);
1400 /* ./../lib/standard//kernel.nit:235 */
1401 REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
1402 /* ./../lib/standard//collection//array.nit:274 */
1403 REGB0 = REGB1;
1404 } else {
1405 /* ./../lib/standard//collection//array.nit:272 */
1406 goto label5;
1407 }
1408 }
1409 label5: while(0);
1410 label2: while(0);
1411 stack_frame_head = fra.me.prev;
1412 return;
1413 }
1414 val_t standard___file___String___file_extension(val_t p0){
1415 struct {struct stack_frame_t me;} fra;
1416 val_t REGB0;
1417 val_t REGB1;
1418 val_t REGB2;
1419 val_t tmp;
1420 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1421 fra.me.file = LOCATE_standard___file;
1422 fra.me.line = 279;
1423 fra.me.meth = LOCATE_standard___file___String___file_extension;
1424 fra.me.has_broke = 0;
1425 fra.me.REG_size = 1;
1426 fra.me.REG[0] = NIT_NULL;
1427 fra.me.REG[0] = p0;
1428 /* ./../lib/standard//file.nit:282 */
1429 REGB0 = TAG_Char('.');
1430 REGB0 = CALL_standard___collection___array___AbstractArrayRead___last_index_of(fra.me.REG[0])(fra.me.REG[0], REGB0);
1431 /* ./../lib/standard//file.nit:283 */
1432 REGB1 = TAG_Int(0);
1433 REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
1434 if (UNTAG_Bool(REGB2)) {
1435 } else {
1436 nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
1437 }
1438 /* ./../lib/standard//kernel.nit:233 */
1439 REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
1440 /* ./../lib/standard//file.nit:283 */
1441 if (UNTAG_Bool(REGB1)) {
1442 /* ./../lib/standard//file.nit:284 */
1443 REGB1 = TAG_Int(1);
1444 /* ./../lib/standard//kernel.nit:235 */
1445 REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
1446 /* ./../lib/standard//collection//array.nit:24 */
1447 REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
1448 if (UNTAG_Bool(REGB0)) {
1449 } else {
1450 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
1451 }
1452 REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
1453 /* ./../lib/standard//file.nit:284 */
1454 fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB1, REGB0);
1455 goto label1;
1456 } else {
1457 /* ./../lib/standard//file.nit:286 */
1458 fra.me.REG[0] = NIT_NULL;
1459 goto label1;
1460 }
1461 label1: while(0);
1462 stack_frame_head = fra.me.prev;
1463 return fra.me.REG[0];
1464 }
1465 val_t standard___file___NativeString___file_exists(val_t p0){
1466 struct {struct stack_frame_t me;} fra;
1467 val_t REGB0;
1468 val_t tmp;
1469 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1470 fra.me.file = LOCATE_standard___file;
1471 fra.me.line = 292;
1472 fra.me.meth = LOCATE_standard___file___NativeString___file_exists;
1473 fra.me.has_broke = 0;
1474 fra.me.REG_size = 1;
1475 fra.me.REG[0] = NIT_NULL;
1476 fra.me.REG[0] = p0;
1477 /* ./../lib/standard//file.nit:292 */
1478 REGB0 = NativeString_file_exists___out(fra.me.REG[0]);
1479 stack_frame_head = fra.me.prev;
1480 return REGB0;
1481 }
1482 val_t standard___file___NativeString___file_stat(val_t p0){
1483 struct {struct stack_frame_t me;} fra;
1484 val_t tmp;
1485 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1486 fra.me.file = LOCATE_standard___file;
1487 fra.me.line = 293;
1488 fra.me.meth = LOCATE_standard___file___NativeString___file_stat;
1489 fra.me.has_broke = 0;
1490 fra.me.REG_size = 1;
1491 fra.me.REG[0] = NIT_NULL;
1492 fra.me.REG[0] = p0;
1493 /* ./../lib/standard//file.nit:293 */
1494 fra.me.REG[0] = NativeString_file_stat___out(fra.me.REG[0]);
1495 stack_frame_head = fra.me.prev;
1496 return fra.me.REG[0];
1497 }
1498 val_t standard___file___NativeString___file_mkdir(val_t p0){
1499 struct {struct stack_frame_t me;} fra;
1500 val_t REGB0;
1501 val_t tmp;
1502 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1503 fra.me.file = LOCATE_standard___file;
1504 fra.me.line = 294;
1505 fra.me.meth = LOCATE_standard___file___NativeString___file_mkdir;
1506 fra.me.has_broke = 0;
1507 fra.me.REG_size = 1;
1508 fra.me.REG[0] = NIT_NULL;
1509 fra.me.REG[0] = p0;
1510 /* ./../lib/standard//file.nit:294 */
1511 REGB0 = NativeString_file_mkdir___out(fra.me.REG[0]);
1512 stack_frame_head = fra.me.prev;
1513 return REGB0;
1514 }
1515 val_t standard___file___NativeString___file_delete(val_t p0){
1516 struct {struct stack_frame_t me;} fra;
1517 val_t REGB0;
1518 val_t tmp;
1519 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1520 fra.me.file = LOCATE_standard___file;
1521 fra.me.line = 295;
1522 fra.me.meth = LOCATE_standard___file___NativeString___file_delete;
1523 fra.me.has_broke = 0;
1524 fra.me.REG_size = 1;
1525 fra.me.REG[0] = NIT_NULL;
1526 fra.me.REG[0] = p0;
1527 /* ./../lib/standard//file.nit:295 */
1528 REGB0 = NativeString_file_delete___out(fra.me.REG[0]);
1529 stack_frame_head = fra.me.prev;
1530 return REGB0;
1531 }
1532 val_t standard___file___FileStat___mode(val_t p0){
1533 struct {struct stack_frame_t me;} fra;
1534 val_t REGB0;
1535 val_t tmp;
1536 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1537 fra.me.file = LOCATE_standard___file;
1538 fra.me.line = 299;
1539 fra.me.meth = LOCATE_standard___file___FileStat___mode;
1540 fra.me.has_broke = 0;
1541 fra.me.REG_size = 1;
1542 fra.me.REG[0] = NIT_NULL;
1543 fra.me.REG[0] = p0;
1544 /* ./../lib/standard//file.nit:299 */
1545 REGB0 = FileStat_mode___out(fra.me.REG[0]);
1546 stack_frame_head = fra.me.prev;
1547 return REGB0;
1548 }
1549 val_t standard___file___FileStat___atime(val_t p0){
1550 struct {struct stack_frame_t me;} fra;
1551 val_t REGB0;
1552 val_t tmp;
1553 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1554 fra.me.file = LOCATE_standard___file;
1555 fra.me.line = 301;
1556 fra.me.meth = LOCATE_standard___file___FileStat___atime;
1557 fra.me.has_broke = 0;
1558 fra.me.REG_size = 1;
1559 fra.me.REG[0] = NIT_NULL;
1560 fra.me.REG[0] = p0;
1561 /* ./../lib/standard//file.nit:301 */
1562 REGB0 = FileStat_atime___out(fra.me.REG[0]);
1563 stack_frame_head = fra.me.prev;
1564 return REGB0;
1565 }
1566 val_t standard___file___FileStat___ctime(val_t p0){
1567 struct {struct stack_frame_t me;} fra;
1568 val_t REGB0;
1569 val_t tmp;
1570 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1571 fra.me.file = LOCATE_standard___file;
1572 fra.me.line = 302;
1573 fra.me.meth = LOCATE_standard___file___FileStat___ctime;
1574 fra.me.has_broke = 0;
1575 fra.me.REG_size = 1;
1576 fra.me.REG[0] = NIT_NULL;
1577 fra.me.REG[0] = p0;
1578 /* ./../lib/standard//file.nit:302 */
1579 REGB0 = FileStat_ctime___out(fra.me.REG[0]);
1580 stack_frame_head = fra.me.prev;
1581 return REGB0;
1582 }
1583 val_t standard___file___FileStat___mtime(val_t p0){
1584 struct {struct stack_frame_t me;} fra;
1585 val_t REGB0;
1586 val_t tmp;
1587 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1588 fra.me.file = LOCATE_standard___file;
1589 fra.me.line = 303;
1590 fra.me.meth = LOCATE_standard___file___FileStat___mtime;
1591 fra.me.has_broke = 0;
1592 fra.me.REG_size = 1;
1593 fra.me.REG[0] = NIT_NULL;
1594 fra.me.REG[0] = p0;
1595 /* ./../lib/standard//file.nit:303 */
1596 REGB0 = FileStat_mtime___out(fra.me.REG[0]);
1597 stack_frame_head = fra.me.prev;
1598 return REGB0;
1599 }
1600 val_t standard___file___FileStat___size(val_t p0){
1601 struct {struct stack_frame_t me;} fra;
1602 val_t REGB0;
1603 val_t tmp;
1604 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1605 fra.me.file = LOCATE_standard___file;
1606 fra.me.line = 304;
1607 fra.me.meth = LOCATE_standard___file___FileStat___size;
1608 fra.me.has_broke = 0;
1609 fra.me.REG_size = 1;
1610 fra.me.REG[0] = NIT_NULL;
1611 fra.me.REG[0] = p0;
1612 /* ./../lib/standard//file.nit:304 */
1613 REGB0 = FileStat_size___out(fra.me.REG[0]);
1614 stack_frame_head = fra.me.prev;
1615 return REGB0;
1616 }
1617 val_t standard___file___NativeFile___io_read(val_t p0, val_t p1, val_t p2){
1618 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
1619 val_t REGB0;
1620 val_t tmp;
1621 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1622 fra.me.file = LOCATE_standard___file;
1623 fra.me.line = 309;
1624 fra.me.meth = LOCATE_standard___file___NativeFile___io_read;
1625 fra.me.has_broke = 0;
1626 fra.me.REG_size = 2;
1627 fra.me.REG[0] = NIT_NULL;
1628 fra.me.REG[1] = NIT_NULL;
1629 fra.me.REG[0] = p0;
1630 fra.me.REG[1] = p1;
1631 REGB0 = p2;
1632 /* ./../lib/standard//file.nit:309 */
1633 REGB0 = NativeFile_io_read___out(fra.me.REG[0], fra.me.REG[1], REGB0);
1634 stack_frame_head = fra.me.prev;
1635 return REGB0;
1636 }
1637 val_t standard___file___NativeFile___io_write(val_t p0, val_t p1, val_t p2){
1638 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
1639 val_t REGB0;
1640 val_t tmp;
1641 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1642 fra.me.file = LOCATE_standard___file;
1643 fra.me.line = 310;
1644 fra.me.meth = LOCATE_standard___file___NativeFile___io_write;
1645 fra.me.has_broke = 0;
1646 fra.me.REG_size = 2;
1647 fra.me.REG[0] = NIT_NULL;
1648 fra.me.REG[1] = NIT_NULL;
1649 fra.me.REG[0] = p0;
1650 fra.me.REG[1] = p1;
1651 REGB0 = p2;
1652 /* ./../lib/standard//file.nit:310 */
1653 REGB0 = NativeFile_io_write___out(fra.me.REG[0], fra.me.REG[1], REGB0);
1654 stack_frame_head = fra.me.prev;
1655 return REGB0;
1656 }
1657 val_t standard___file___NativeFile___io_close(val_t p0){
1658 struct {struct stack_frame_t me;} fra;
1659 val_t REGB0;
1660 val_t tmp;
1661 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1662 fra.me.file = LOCATE_standard___file;
1663 fra.me.line = 311;
1664 fra.me.meth = LOCATE_standard___file___NativeFile___io_close;
1665 fra.me.has_broke = 0;
1666 fra.me.REG_size = 1;
1667 fra.me.REG[0] = NIT_NULL;
1668 fra.me.REG[0] = p0;
1669 /* ./../lib/standard//file.nit:311 */
1670 REGB0 = NativeFile_io_close___out(fra.me.REG[0]);
1671 stack_frame_head = fra.me.prev;
1672 return REGB0;
1673 }
1674 val_t standard___file___NativeFile___file_stat(val_t p0){
1675 struct {struct stack_frame_t me;} fra;
1676 val_t tmp;
1677 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1678 fra.me.file = LOCATE_standard___file;
1679 fra.me.line = 312;
1680 fra.me.meth = LOCATE_standard___file___NativeFile___file_stat;
1681 fra.me.has_broke = 0;
1682 fra.me.REG_size = 1;
1683 fra.me.REG[0] = NIT_NULL;
1684 fra.me.REG[0] = p0;
1685 /* ./../lib/standard//file.nit:312 */
1686 fra.me.REG[0] = NativeFile_file_stat___out(fra.me.REG[0]);
1687 stack_frame_head = fra.me.prev;
1688 return fra.me.REG[0];
1689 }
1690 val_t standard___file___NativeFileCapable___io_open_read(val_t p0, val_t p1){
1691 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
1692 val_t tmp;
1693 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1694 fra.me.file = LOCATE_standard___file;
1695 fra.me.line = 316;
1696 fra.me.meth = LOCATE_standard___file___NativeFileCapable___io_open_read;
1697 fra.me.has_broke = 0;
1698 fra.me.REG_size = 2;
1699 fra.me.REG[0] = NIT_NULL;
1700 fra.me.REG[1] = NIT_NULL;
1701 fra.me.REG[0] = p0;
1702 fra.me.REG[1] = p1;
1703 /* ./../lib/standard//file.nit:316 */
1704 fra.me.REG[1] = NativeFileCapable_io_open_read___out(fra.me.REG[0], fra.me.REG[1]);
1705 stack_frame_head = fra.me.prev;
1706 return fra.me.REG[1];
1707 }
1708 val_t standard___file___NativeFileCapable___io_open_write(val_t p0, val_t p1){
1709 struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
1710 val_t tmp;
1711 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1712 fra.me.file = LOCATE_standard___file;
1713 fra.me.line = 317;
1714 fra.me.meth = LOCATE_standard___file___NativeFileCapable___io_open_write;
1715 fra.me.has_broke = 0;
1716 fra.me.REG_size = 2;
1717 fra.me.REG[0] = NIT_NULL;
1718 fra.me.REG[1] = NIT_NULL;
1719 fra.me.REG[0] = p0;
1720 fra.me.REG[1] = p1;
1721 /* ./../lib/standard//file.nit:317 */
1722 fra.me.REG[1] = NativeFileCapable_io_open_write___out(fra.me.REG[0], fra.me.REG[1]);
1723 stack_frame_head = fra.me.prev;
1724 return fra.me.REG[1];
1725 }
1726 val_t standard___file___NativeFileCapable___native_stdin(val_t p0){
1727 struct {struct stack_frame_t me;} fra;
1728 val_t tmp;
1729 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1730 fra.me.file = LOCATE_standard___file;
1731 fra.me.line = 318;
1732 fra.me.meth = LOCATE_standard___file___NativeFileCapable___native_stdin;
1733 fra.me.has_broke = 0;
1734 fra.me.REG_size = 1;
1735 fra.me.REG[0] = NIT_NULL;
1736 fra.me.REG[0] = p0;
1737 /* ./../lib/standard//file.nit:318 */
1738 fra.me.REG[0] = NativeFileCapable_native_stdin___out(fra.me.REG[0]);
1739 stack_frame_head = fra.me.prev;
1740 return fra.me.REG[0];
1741 }
1742 val_t standard___file___NativeFileCapable___native_stdout(val_t p0){
1743 struct {struct stack_frame_t me;} fra;
1744 val_t tmp;
1745 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1746 fra.me.file = LOCATE_standard___file;
1747 fra.me.line = 319;
1748 fra.me.meth = LOCATE_standard___file___NativeFileCapable___native_stdout;
1749 fra.me.has_broke = 0;
1750 fra.me.REG_size = 1;
1751 fra.me.REG[0] = NIT_NULL;
1752 fra.me.REG[0] = p0;
1753 /* ./../lib/standard//file.nit:319 */
1754 fra.me.REG[0] = NativeFileCapable_native_stdout___out(fra.me.REG[0]);
1755 stack_frame_head = fra.me.prev;
1756 return fra.me.REG[0];
1757 }
1758 val_t standard___file___NativeFileCapable___native_stderr(val_t p0){
1759 struct {struct stack_frame_t me;} fra;
1760 val_t tmp;
1761 fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1762 fra.me.file = LOCATE_standard___file;
1763 fra.me.line = 320;
1764 fra.me.meth = LOCATE_standard___file___NativeFileCapable___native_stderr;
1765 fra.me.has_broke = 0;
1766 fra.me.REG_size = 1;
1767 fra.me.REG[0] = NIT_NULL;
1768 fra.me.REG[0] = p0;
1769 /* ./../lib/standard//file.nit:320 */
1770 fra.me.REG[0] = NativeFileCapable_native_stderr___out(fra.me.REG[0]);
1771 stack_frame_head = fra.me.prev;
1772 return fra.me.REG[0];
1773 }