1 /* This C file is generated by NIT to compile module stream. */
2 #include "stream._sep.h"
3 void stream___IOS___close(val_t p0
){
4 struct {struct stack_frame_t me
;} fra
;
6 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
7 fra
.me
.file
= LOCATE_stream
;
9 fra
.me
.meth
= LOCATE_stream___IOS___close
;
12 /* ./../lib/standard//stream.nit:20 */
13 fprintf(stderr
, "Deferred method called");
14 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 20);
16 stack_frame_head
= fra
.me
.prev
;
19 void stream___IOS___init(val_t p0
, int* init_table
){
20 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IOS
].i
;
21 struct {struct stack_frame_t me
;} fra
;
23 if (init_table
[itpos0
]) return;
24 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
25 fra
.me
.file
= LOCATE_stream
;
27 fra
.me
.meth
= LOCATE_stream___IOS___init
;
30 stack_frame_head
= fra
.me
.prev
;
31 init_table
[itpos0
] = 1;
34 val_t
stream___IStream___read_char(val_t p0
){
35 struct {struct stack_frame_t me
;} fra
;
37 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
38 fra
.me
.file
= LOCATE_stream
;
40 fra
.me
.meth
= LOCATE_stream___IStream___read_char
;
43 /* ./../lib/standard//stream.nit:27 */
44 fprintf(stderr
, "Deferred method called");
45 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 27);
47 stack_frame_head
= fra
.me
.prev
;
50 val_t
stream___IStream___read(val_t p0
, val_t p1
){
51 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
56 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
57 fra
.me
.file
= LOCATE_stream
;
59 fra
.me
.meth
= LOCATE_stream___IStream___read
;
62 fra
.me
.REG
[0] = NIT_NULL
;
63 fra
.me
.REG
[1] = NIT_NULL
;
66 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___with_capacity(REGB0
);
67 /* ./../lib/standard//stream.nit:34 */
70 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB1
));
71 /* ./../lib/standard//stream.nit:34 */
72 if (UNTAG_Bool(REGB1
)) {
73 REGB1
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
74 REGB1
= TAG_Bool(!UNTAG_Bool(REGB1
));
76 REGB2
= TAG_Bool(false);
79 if (UNTAG_Bool(REGB1
)) {
80 REGB1
= CALL_stream___IStream___read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
82 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB2
));
83 /* ./../lib/standard//stream.nit:36 */
84 if (UNTAG_Bool(REGB2
)) {
85 REGB1
= TAG_Char(UNTAG_Int(REGB1
));
86 /* ./../lib/standard//stream.nit:37 */
87 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB1
);
89 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
91 /* ./../lib/standard//stream.nit:38 */
94 /* ./../lib/standard//stream.nit:34 */
99 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
100 /* ./../lib/standard//stream.nit:41 */
103 stack_frame_head
= fra
.me
.prev
;
104 return fra
.me
.REG
[1];
106 val_t
stream___IStream___read_line(val_t p0
){
107 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
110 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
111 fra
.me
.file
= LOCATE_stream
;
113 fra
.me
.meth
= LOCATE_stream___IStream___read_line
;
114 fra
.me
.has_broke
= 0;
116 fra
.me
.REG
[0] = NIT_NULL
;
117 fra
.me
.REG
[1] = NIT_NULL
;
119 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
120 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
121 /* ./../lib/standard//stream.nit:47 */
122 if (UNTAG_Bool(REGB0
)) {
124 fprintf(stderr
, "Assert failed");
125 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 47);
128 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___init();
129 /* ./../lib/standard//stream.nit:49 */
130 CALL_stream___IStream___append_line_to(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
131 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
132 /* ./../lib/standard//stream.nit:50 */
135 stack_frame_head
= fra
.me
.prev
;
136 return fra
.me
.REG
[1];
138 val_t
stream___IStream___read_all(val_t p0
){
139 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
143 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
144 fra
.me
.file
= LOCATE_stream
;
146 fra
.me
.meth
= LOCATE_stream___IStream___read_all
;
147 fra
.me
.has_broke
= 0;
149 fra
.me
.REG
[0] = NIT_NULL
;
150 fra
.me
.REG
[1] = NIT_NULL
;
152 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___init();
153 /* ./../lib/standard//stream.nit:57 */
155 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
156 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
157 if (UNTAG_Bool(REGB0
)) {
158 REGB0
= CALL_stream___IStream___read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
160 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
161 /* ./../lib/standard//stream.nit:59 */
162 if (UNTAG_Bool(REGB1
)) {
163 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
164 /* ./../lib/standard//stream.nit:59 */
165 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB0
);
168 /* ./../lib/standard//stream.nit:57 */
173 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
174 /* ./../lib/standard//stream.nit:61 */
177 stack_frame_head
= fra
.me
.prev
;
178 return fra
.me
.REG
[1];
180 void stream___IStream___append_line_to(val_t p0
, val_t p1
){
181 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
186 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
187 fra
.me
.file
= LOCATE_stream
;
189 fra
.me
.meth
= LOCATE_stream___IStream___append_line_to
;
190 fra
.me
.has_broke
= 0;
192 fra
.me
.REG
[0] = NIT_NULL
;
193 fra
.me
.REG
[1] = NIT_NULL
;
196 /* ./../lib/standard//stream.nit:67 */
198 REGB0
= TAG_Bool(true);
199 if (UNTAG_Bool(REGB0
)) {
200 REGB0
= CALL_stream___IStream___read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
202 REGB1
= TAG_Int(-UNTAG_Int(REGB1
));
203 REGB2
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB1
));
204 /* ./../lib/standard//stream.nit:69 */
205 if (UNTAG_Bool(REGB2
)) {
207 REGB1
= TAG_Bool((REGB0
)==(REGB1
));
209 /* ./../lib/standard//stream.nit:69 */
211 if (UNTAG_Bool(REGB2
)) {
212 REGB2
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
213 /* ./../lib/standard//stream.nit:70 */
214 if (UNTAG_Bool(REGB2
)) {
218 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
219 /* ./../lib/standard//stream.nit:73 */
220 CALL_abstract_collection___Sequence___push(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB0
);
221 REGB2
= TAG_Char('\n');
222 REGB1
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB2
));
223 /* ./../lib/standard//stream.nit:74 */
224 if (UNTAG_Bool(REGB1
)) {
226 REGB2
= TAG_Bool((REGB0
)==(REGB2
));
228 /* ./../lib/standard//stream.nit:74 */
230 if (UNTAG_Bool(REGB1
)) {
235 /* ./../lib/standard//stream.nit:67 */
241 stack_frame_head
= fra
.me
.prev
;
244 val_t
stream___IStream___eof(val_t p0
){
245 struct {struct stack_frame_t me
;} fra
;
247 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
248 fra
.me
.file
= LOCATE_stream
;
250 fra
.me
.meth
= LOCATE_stream___IStream___eof
;
251 fra
.me
.has_broke
= 0;
253 /* ./../lib/standard//stream.nit:79 */
254 fprintf(stderr
, "Deferred method called");
255 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 79);
257 stack_frame_head
= fra
.me
.prev
;
260 void stream___OStream___write(val_t p0
, val_t p1
){
261 struct {struct stack_frame_t me
;} fra
;
263 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
264 fra
.me
.file
= LOCATE_stream
;
266 fra
.me
.meth
= LOCATE_stream___OStream___write
;
267 fra
.me
.has_broke
= 0;
269 /* ./../lib/standard//stream.nit:86 */
270 fprintf(stderr
, "Deferred method called");
271 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 86);
273 stack_frame_head
= fra
.me
.prev
;
276 val_t
stream___OStream___is_writable(val_t p0
){
277 struct {struct stack_frame_t me
;} fra
;
279 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
280 fra
.me
.file
= LOCATE_stream
;
282 fra
.me
.meth
= LOCATE_stream___OStream___is_writable
;
283 fra
.me
.has_broke
= 0;
285 /* ./../lib/standard//stream.nit:89 */
286 fprintf(stderr
, "Deferred method called");
287 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 89);
289 stack_frame_head
= fra
.me
.prev
;
292 val_t
stream___BufferedIStream___read_char(val_t p0
){
293 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
299 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
300 fra
.me
.file
= LOCATE_stream
;
302 fra
.me
.meth
= LOCATE_stream___BufferedIStream___read_char
;
303 fra
.me
.has_broke
= 0;
305 fra
.me
.REG
[0] = NIT_NULL
;
306 fra
.me
.REG
[1] = NIT_NULL
;
308 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
309 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
310 /* ./../lib/standard//stream.nit:98 */
311 if (UNTAG_Bool(REGB0
)) {
313 fprintf(stderr
, "Assert failed");
314 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 98);
317 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
318 /* ./../lib/standard//stream.nit:99 */
319 if (UNTAG_Bool(REGB0
)) {
321 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
322 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 99);
325 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
326 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
327 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
328 if (UNTAG_Bool(REGB1
)) {
329 fprintf(stderr
, "Reciever is null");
330 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 99);
333 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
334 /* ./../lib/standard//collection//array.nit:23 */
335 if (UNTAG_Bool(REGB1
)) {
337 fprintf(stderr
, "Uninitialized attribute %s", "_length");
338 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
341 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
342 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
343 /* ./../lib/standard//stream.nit:99 */
344 if (UNTAG_Bool(REGB1
)) {
345 /* ./../lib/standard//stream.nit:100 */
346 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
348 REGB1
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
349 /* ./../lib/standard//stream.nit:102 */
350 if (UNTAG_Bool(REGB1
)) {
352 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
353 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 102);
356 REGB1
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
357 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
358 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
359 if (UNTAG_Bool(REGB0
)) {
360 fprintf(stderr
, "Reciever is null");
361 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 102);
364 REGB0
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
365 /* ./../lib/standard//collection//array.nit:23 */
366 if (UNTAG_Bool(REGB0
)) {
368 fprintf(stderr
, "Uninitialized attribute %s", "_length");
369 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
372 REGB0
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
373 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB0
));
374 /* ./../lib/standard//stream.nit:102 */
375 if (UNTAG_Bool(REGB0
)) {
377 REGB0
= TAG_Int(-UNTAG_Int(REGB0
));
378 /* ./../lib/standard//stream.nit:103 */
381 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
382 REGB1
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
383 /* ./../lib/standard//stream.nit:105 */
384 if (UNTAG_Bool(REGB1
)) {
386 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
387 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 105);
390 REGB1
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
391 REGB2
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
392 if (UNTAG_Bool(REGB2
)) {
393 fprintf(stderr
, "Reciever is null");
394 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 105);
397 REGB1
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB1
);
398 REGB2
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
400 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
401 /* ./../lib/standard//stream.nit:106 */
402 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB3
;
403 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB1
));
405 /* ./../lib/standard//stream.nit:107 */
408 stack_frame_head
= fra
.me
.prev
;
411 val_t
stream___BufferedIStream___read(val_t p0
, val_t p1
){
412 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
419 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
420 fra
.me
.file
= LOCATE_stream
;
422 fra
.me
.meth
= LOCATE_stream___BufferedIStream___read
;
423 fra
.me
.has_broke
= 0;
425 fra
.me
.REG
[0] = NIT_NULL
;
426 fra
.me
.REG
[1] = NIT_NULL
;
427 fra
.me
.REG
[2] = NIT_NULL
;
428 fra
.me
.REG
[3] = NIT_NULL
;
431 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___with_capacity(REGB0
);
432 REGB1
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
433 /* ./../lib/standard//stream.nit:113 */
434 if (UNTAG_Bool(REGB1
)) {
436 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
437 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 113);
440 REGB1
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
441 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
442 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
443 /* ./../lib/standard//stream.nit:114 */
444 if (UNTAG_Bool(REGB2
)) {
445 fprintf(stderr
, "Reciever is null");
446 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 114);
449 REGB2
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
450 /* ./../lib/standard//collection//array.nit:23 */
451 if (UNTAG_Bool(REGB2
)) {
453 fprintf(stderr
, "Uninitialized attribute %s", "_length");
454 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
457 REGB2
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
458 /* ./../lib/standard//stream.nit:115 */
461 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB3
));
462 /* ./../lib/standard//stream.nit:115 */
463 if (UNTAG_Bool(REGB3
)) {
464 REGB3
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB2
));
465 /* ./../lib/standard//stream.nit:116 */
466 if (UNTAG_Bool(REGB3
)) {
467 /* ./../lib/standard//stream.nit:117 */
468 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
469 REGB3
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
470 /* ./../lib/standard//stream.nit:118 */
471 if (UNTAG_Bool(REGB3
)) {
472 fra
.me
.REG
[2] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
475 REGB3
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
476 /* ./../lib/standard//stream.nit:119 */
477 if (UNTAG_Bool(REGB3
)) {
479 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
480 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 119);
483 REGB3
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
485 fra
.me
.REG
[3] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
486 REGB3
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
487 /* ./../lib/standard//stream.nit:120 */
488 if (UNTAG_Bool(REGB3
)) {
489 fprintf(stderr
, "Reciever is null");
490 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 120);
493 REGB3
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
494 /* ./../lib/standard//collection//array.nit:23 */
495 if (UNTAG_Bool(REGB3
)) {
497 fprintf(stderr
, "Uninitialized attribute %s", "_length");
498 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
501 REGB3
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[3]);
503 /* ./../lib/standard//stream.nit:120 */
505 /* ./../lib/standard//stream.nit:122 */
507 REGB3
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
508 /* ./../lib/standard//stream.nit:122 */
509 if (UNTAG_Bool(REGB3
)) {
511 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB3
));
512 /* ./../lib/standard//stream.nit:122 */
514 REGB4
= TAG_Bool(false);
517 if (UNTAG_Bool(REGB3
)) {
518 fra
.me
.REG
[3] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
519 REGB3
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
520 /* ./../lib/standard//stream.nit:123 */
521 if (UNTAG_Bool(REGB3
)) {
522 fprintf(stderr
, "Reciever is null");
523 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 123);
526 REGB3
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB1
);
527 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB3
);
529 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
532 REGB3
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB3
));
534 /* ./../lib/standard//stream.nit:125 */
536 /* ./../lib/standard//stream.nit:122 */
542 /* ./../lib/standard//stream.nit:115 */
547 /* ./../lib/standard//stream.nit:128 */
548 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB1
;
549 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
550 fra
.me
.REG
[2] = fra
.me
.REG
[1];
551 /* ./../lib/standard//stream.nit:129 */
554 stack_frame_head
= fra
.me
.prev
;
555 return fra
.me
.REG
[2];
557 val_t
stream___BufferedIStream___read_all(val_t p0
){
558 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
563 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
564 fra
.me
.file
= LOCATE_stream
;
566 fra
.me
.meth
= LOCATE_stream___BufferedIStream___read_all
;
567 fra
.me
.has_broke
= 0;
569 fra
.me
.REG
[0] = NIT_NULL
;
570 fra
.me
.REG
[1] = NIT_NULL
;
571 fra
.me
.REG
[2] = NIT_NULL
;
573 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___init();
574 /* ./../lib/standard//stream.nit:135 */
576 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
577 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
578 if (UNTAG_Bool(REGB0
)) {
579 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
580 /* ./../lib/standard//stream.nit:136 */
581 if (UNTAG_Bool(REGB0
)) {
583 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
584 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 136);
587 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
588 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
589 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
590 /* ./../lib/standard//stream.nit:137 */
591 if (UNTAG_Bool(REGB1
)) {
592 fprintf(stderr
, "Reciever is null");
593 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 137);
596 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
597 /* ./../lib/standard//collection//array.nit:23 */
598 if (UNTAG_Bool(REGB1
)) {
600 fprintf(stderr
, "Uninitialized attribute %s", "_length");
601 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
604 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
605 /* ./../lib/standard//stream.nit:138 */
607 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
608 /* ./../lib/standard//stream.nit:138 */
609 if (UNTAG_Bool(REGB2
)) {
610 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
611 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
612 /* ./../lib/standard//stream.nit:139 */
613 if (UNTAG_Bool(REGB2
)) {
614 fprintf(stderr
, "Reciever is null");
615 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 139);
618 REGB2
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB0
);
619 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB2
);
621 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
623 /* ./../lib/standard//stream.nit:140 */
625 /* ./../lib/standard//stream.nit:138 */
630 /* ./../lib/standard//stream.nit:142 */
631 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB0
;
632 /* ./../lib/standard//stream.nit:143 */
633 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
635 /* ./../lib/standard//stream.nit:135 */
640 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
641 /* ./../lib/standard//stream.nit:145 */
644 stack_frame_head
= fra
.me
.prev
;
645 return fra
.me
.REG
[1];
647 void stream___BufferedIStream___append_line_to(val_t p0
, val_t p1
){
648 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
654 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
655 fra
.me
.file
= LOCATE_stream
;
657 fra
.me
.meth
= LOCATE_stream___BufferedIStream___append_line_to
;
658 fra
.me
.has_broke
= 0;
660 fra
.me
.REG
[0] = NIT_NULL
;
661 fra
.me
.REG
[1] = NIT_NULL
;
662 fra
.me
.REG
[2] = NIT_NULL
;
665 /* ./../lib/standard//stream.nit:150 */
667 REGB0
= TAG_Bool(true);
668 if (UNTAG_Bool(REGB0
)) {
669 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
670 /* ./../lib/standard//stream.nit:152 */
671 if (UNTAG_Bool(REGB0
)) {
673 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
674 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 152);
677 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
678 /* ./../lib/standard//stream.nit:153 */
680 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
681 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
682 if (UNTAG_Bool(REGB1
)) {
683 fprintf(stderr
, "Reciever is null");
684 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 153);
687 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
688 /* ./../lib/standard//collection//array.nit:23 */
689 if (UNTAG_Bool(REGB1
)) {
691 fprintf(stderr
, "Uninitialized attribute %s", "_length");
692 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
695 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
696 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
697 /* ./../lib/standard//stream.nit:153 */
698 if (UNTAG_Bool(REGB1
)) {
699 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
700 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
701 if (UNTAG_Bool(REGB1
)) {
702 fprintf(stderr
, "Reciever is null");
703 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 153);
706 REGB1
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB0
);
707 REGB2
= TAG_Char('\n');
708 REGB3
= TAG_Bool(IS_EQUAL_OO(REGB1
,REGB2
));
709 if (UNTAG_Bool(REGB3
)) {
711 REGB2
= TAG_Bool((REGB1
)==(REGB2
));
713 /* ./../lib/standard//stream.nit:153 */
715 REGB3
= TAG_Bool(!UNTAG_Bool(REGB3
));
717 REGB2
= TAG_Bool(false);
720 if (UNTAG_Bool(REGB3
)) {
722 REGB3
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB3
));
724 /* ./../lib/standard//stream.nit:153 */
730 REGB3
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
731 /* ./../lib/standard//stream.nit:156 */
732 if (UNTAG_Bool(REGB3
)) {
734 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
735 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 156);
738 REGB3
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
739 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB3
));
740 /* ./../lib/standard//stream.nit:156 */
741 if (UNTAG_Bool(REGB3
)) {
742 REGB3
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
743 /* ./../lib/standard//collection//array.nit:23 */
744 if (UNTAG_Bool(REGB3
)) {
746 fprintf(stderr
, "Uninitialized attribute %s", "_length");
747 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
750 REGB3
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
751 REGB3
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB0
));
752 REGB2
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
753 /* ./../lib/standard//stream.nit:158 */
754 if (UNTAG_Bool(REGB2
)) {
756 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
757 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 158);
760 REGB2
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
761 REGB2
= TAG_Int(UNTAG_Int(REGB3
)-UNTAG_Int(REGB2
));
762 /* ./../lib/standard//stream.nit:158 */
763 CALL_array___AbstractArray___enlarge(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB2
);
764 REGB2
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
765 /* ./../lib/standard//stream.nit:161 */
766 if (UNTAG_Bool(REGB2
)) {
768 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
769 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 161);
772 REGB2
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
773 /* ./../lib/standard//stream.nit:162 */
775 REGB3
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB0
));
776 /* ./../lib/standard//stream.nit:162 */
777 if (UNTAG_Bool(REGB3
)) {
778 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
779 REGB3
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
780 /* ./../lib/standard//stream.nit:163 */
781 if (UNTAG_Bool(REGB3
)) {
782 fprintf(stderr
, "Reciever is null");
783 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 163);
786 REGB3
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB2
);
787 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB3
);
789 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
791 /* ./../lib/standard//stream.nit:164 */
793 /* ./../lib/standard//stream.nit:162 */
799 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
800 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
801 /* ./../lib/standard//stream.nit:168 */
802 if (UNTAG_Bool(REGB2
)) {
803 fprintf(stderr
, "Reciever is null");
804 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 168);
807 REGB2
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
808 /* ./../lib/standard//collection//array.nit:23 */
809 if (UNTAG_Bool(REGB2
)) {
811 fprintf(stderr
, "Uninitialized attribute %s", "_length");
812 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
815 REGB2
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
816 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB2
));
817 /* ./../lib/standard//stream.nit:168 */
818 if (UNTAG_Bool(REGB2
)) {
820 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
821 /* ./../lib/standard//stream.nit:170 */
822 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB2
;
823 /* ./../lib/standard//stream.nit:171 */
826 /* ./../lib/standard//stream.nit:174 */
827 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB0
;
828 REGB0
= CALL_stream___BufferedIStream___end_reached(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
829 /* ./../lib/standard//stream.nit:175 */
830 if (UNTAG_Bool(REGB0
)) {
831 /* ./../lib/standard//stream.nit:176 */
834 /* ./../lib/standard//stream.nit:178 */
835 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
839 /* ./../lib/standard//stream.nit:150 */
845 stack_frame_head
= fra
.me
.prev
;
848 val_t
stream___BufferedIStream___eof(val_t p0
){
849 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
853 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
854 fra
.me
.file
= LOCATE_stream
;
856 fra
.me
.meth
= LOCATE_stream___BufferedIStream___eof
;
857 fra
.me
.has_broke
= 0;
859 fra
.me
.REG
[0] = NIT_NULL
;
860 fra
.me
.REG
[1] = NIT_NULL
;
862 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
863 /* ./../lib/standard//stream.nit:184 */
864 if (UNTAG_Bool(REGB0
)) {
866 fprintf(stderr
, "Uninitialized attribute %s", "_buffer_pos");
867 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 184);
870 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
871 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
872 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
873 if (UNTAG_Bool(REGB1
)) {
874 fprintf(stderr
, "Reciever is null");
875 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 184);
878 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
879 /* ./../lib/standard//collection//array.nit:23 */
880 if (UNTAG_Bool(REGB1
)) {
882 fprintf(stderr
, "Uninitialized attribute %s", "_length");
883 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
886 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
887 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
888 /* ./../lib/standard//stream.nit:184 */
889 if (UNTAG_Bool(REGB1
)) {
890 REGB1
= CALL_stream___BufferedIStream___end_reached(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
892 REGB0
= TAG_Bool(false);
897 stack_frame_head
= fra
.me
.prev
;
900 void stream___BufferedIStream___fill_buffer(val_t p0
){
901 struct {struct stack_frame_t me
;} fra
;
903 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
904 fra
.me
.file
= LOCATE_stream
;
906 fra
.me
.meth
= LOCATE_stream___BufferedIStream___fill_buffer
;
907 fra
.me
.has_broke
= 0;
909 /* ./../lib/standard//stream.nit:192 */
910 fprintf(stderr
, "Deferred method called");
911 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 192);
913 stack_frame_head
= fra
.me
.prev
;
916 val_t
stream___BufferedIStream___end_reached(val_t p0
){
917 struct {struct stack_frame_t me
;} fra
;
919 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
920 fra
.me
.file
= LOCATE_stream
;
922 fra
.me
.meth
= LOCATE_stream___BufferedIStream___end_reached
;
923 fra
.me
.has_broke
= 0;
925 /* ./../lib/standard//stream.nit:195 */
926 fprintf(stderr
, "Deferred method called");
927 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 195);
929 stack_frame_head
= fra
.me
.prev
;
932 void stream___BufferedIStream___prepare_buffer(val_t p0
, val_t p1
){
933 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
936 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
937 fra
.me
.file
= LOCATE_stream
;
939 fra
.me
.meth
= LOCATE_stream___BufferedIStream___prepare_buffer
;
940 fra
.me
.has_broke
= 0;
942 fra
.me
.REG
[0] = NIT_NULL
;
943 fra
.me
.REG
[1] = NIT_NULL
;
946 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___with_capacity(REGB0
);
947 /* ./../lib/standard//stream.nit:201 */
948 ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
950 /* ./../lib/standard//stream.nit:202 */
951 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB0
;
952 stack_frame_head
= fra
.me
.prev
;
955 void stream___FDStream___close(val_t p0
){
956 struct {struct stack_frame_t me
;} fra
;
959 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
960 fra
.me
.file
= LOCATE_stream
;
962 fra
.me
.meth
= LOCATE_stream___FDStream___close
;
963 fra
.me
.has_broke
= 0;
965 fra
.me
.REG
[0] = NIT_NULL
;
967 REGB0
= TAG_Bool(ATTR_stream___FDStream____fd(fra
.me
.REG
[0])!=NIT_NULL
);
968 /* ./../lib/standard//stream.nit:218 */
969 if (UNTAG_Bool(REGB0
)) {
971 fprintf(stderr
, "Uninitialized attribute %s", "_fd");
972 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 218);
975 REGB0
= ATTR_stream___FDStream____fd(fra
.me
.REG
[0]);
976 CALL_stream___FDStream___native_close(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
977 stack_frame_head
= fra
.me
.prev
;
980 val_t
stream___FDStream___native_close(val_t p0
, val_t p1
){
981 struct {struct stack_frame_t me
;} fra
;
984 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
985 fra
.me
.file
= LOCATE_stream
;
987 fra
.me
.meth
= LOCATE_stream___FDStream___native_close
;
988 fra
.me
.has_broke
= 0;
990 fra
.me
.REG
[0] = NIT_NULL
;
993 REGB0
= TAG_Int(stream_FDStream_FDStream_native_close_1(fra
.me
.REG
[0], UNTAG_Int(REGB0
)));
994 /* ./../lib/standard//stream.nit:220 */
995 stack_frame_head
= fra
.me
.prev
;
998 val_t
stream___FDStream___native_read_char(val_t p0
, val_t p1
){
999 struct {struct stack_frame_t me
;} fra
;
1002 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1003 fra
.me
.file
= LOCATE_stream
;
1005 fra
.me
.meth
= LOCATE_stream___FDStream___native_read_char
;
1006 fra
.me
.has_broke
= 0;
1007 fra
.me
.REG_size
= 1;
1008 fra
.me
.REG
[0] = NIT_NULL
;
1011 REGB0
= TAG_Int(stream_FDStream_FDStream_native_read_char_1(fra
.me
.REG
[0], UNTAG_Int(REGB0
)));
1012 /* ./../lib/standard//stream.nit:221 */
1013 stack_frame_head
= fra
.me
.prev
;
1016 val_t
stream___FDStream___native_read(val_t p0
, val_t p1
, val_t p2
, val_t p3
){
1017 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1021 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1022 fra
.me
.file
= LOCATE_stream
;
1024 fra
.me
.meth
= LOCATE_stream___FDStream___native_read
;
1025 fra
.me
.has_broke
= 0;
1026 fra
.me
.REG_size
= 2;
1027 fra
.me
.REG
[0] = NIT_NULL
;
1028 fra
.me
.REG
[1] = NIT_NULL
;
1033 REGB1
= TAG_Int(stream_FDStream_FDStream_native_read_3(fra
.me
.REG
[0], UNTAG_Int(REGB0
), UNBOX_NativeString(fra
.me
.REG
[1]), UNTAG_Int(REGB1
)));
1034 /* ./../lib/standard//stream.nit:222 */
1035 stack_frame_head
= fra
.me
.prev
;
1038 val_t
stream___FDStream___native_write(val_t p0
, val_t p1
, val_t p2
, val_t p3
){
1039 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1043 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1044 fra
.me
.file
= LOCATE_stream
;
1046 fra
.me
.meth
= LOCATE_stream___FDStream___native_write
;
1047 fra
.me
.has_broke
= 0;
1048 fra
.me
.REG_size
= 2;
1049 fra
.me
.REG
[0] = NIT_NULL
;
1050 fra
.me
.REG
[1] = NIT_NULL
;
1055 REGB1
= TAG_Int(stream_FDStream_FDStream_native_write_3(fra
.me
.REG
[0], UNTAG_Int(REGB0
), UNBOX_NativeString(fra
.me
.REG
[1]), UNTAG_Int(REGB1
)));
1056 /* ./../lib/standard//stream.nit:223 */
1057 stack_frame_head
= fra
.me
.prev
;
1060 void stream___FDStream___init(val_t p0
, val_t p1
, int* init_table
){
1061 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDStream
].i
;
1062 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1065 if (init_table
[itpos1
]) return;
1066 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1067 fra
.me
.file
= LOCATE_stream
;
1069 fra
.me
.meth
= LOCATE_stream___FDStream___init
;
1070 fra
.me
.has_broke
= 0;
1071 fra
.me
.REG_size
= 2;
1072 fra
.me
.REG
[0] = NIT_NULL
;
1073 fra
.me
.REG
[1] = NIT_NULL
;
1076 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1077 /* ./../lib/standard//stream.nit:225 */
1078 CALL_stream___IOS___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
1079 ATTR_stream___FDStream____fd(fra
.me
.REG
[1]) = REGB0
;
1080 stack_frame_head
= fra
.me
.prev
;
1081 init_table
[itpos1
] = 1;
1084 val_t
stream___FDIStream___read_char(val_t p0
){
1085 struct {struct stack_frame_t me
;} fra
;
1090 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1091 fra
.me
.file
= LOCATE_stream
;
1093 fra
.me
.meth
= LOCATE_stream___FDIStream___read_char
;
1094 fra
.me
.has_broke
= 0;
1095 fra
.me
.REG_size
= 1;
1096 fra
.me
.REG
[0] = NIT_NULL
;
1098 REGB0
= TAG_Bool(ATTR_stream___FDStream____fd(fra
.me
.REG
[0])!=NIT_NULL
);
1099 /* ./../lib/standard//stream.nit:235 */
1100 if (UNTAG_Bool(REGB0
)) {
1102 fprintf(stderr
, "Uninitialized attribute %s", "_fd");
1103 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 235);
1106 REGB0
= ATTR_stream___FDStream____fd(fra
.me
.REG
[0]);
1107 REGB0
= CALL_stream___FDStream___native_read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
1109 REGB1
= TAG_Int(-UNTAG_Int(REGB1
));
1110 REGB2
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB1
));
1111 /* ./../lib/standard//stream.nit:236 */
1112 if (UNTAG_Bool(REGB2
)) {
1114 REGB1
= TAG_Bool((REGB0
)==(REGB1
));
1116 /* ./../lib/standard//stream.nit:236 */
1118 if (UNTAG_Bool(REGB2
)) {
1119 REGB2
= TAG_Bool(true);
1120 ATTR_stream___FDIStream____eof(fra
.me
.REG
[0]) = REGB2
;
1122 /* ./../lib/standard//stream.nit:237 */
1125 stack_frame_head
= fra
.me
.prev
;
1128 val_t
stream___FDIStream___eof(val_t p0
){
1129 struct {struct stack_frame_t me
;} fra
;
1132 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1133 fra
.me
.file
= LOCATE_stream
;
1135 fra
.me
.meth
= LOCATE_stream___FDIStream___eof
;
1136 fra
.me
.has_broke
= 0;
1137 fra
.me
.REG_size
= 1;
1138 fra
.me
.REG
[0] = NIT_NULL
;
1140 REGB0
= TAG_Bool(ATTR_stream___FDIStream____eof(fra
.me
.REG
[0])!=NIT_NULL
);
1141 /* ./../lib/standard//stream.nit:231 */
1142 if (UNTAG_Bool(REGB0
)) {
1144 fprintf(stderr
, "Uninitialized attribute %s", "_eof");
1145 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 231);
1148 REGB0
= ATTR_stream___FDIStream____eof(fra
.me
.REG
[0]);
1149 stack_frame_head
= fra
.me
.prev
;
1152 void stream___FDIStream___init(val_t p0
, val_t p1
, int* init_table
){
1153 int itpos2
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDIStream
].i
;
1154 struct {struct stack_frame_t me
;} fra
;
1157 if (init_table
[itpos2
]) return;
1158 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1159 fra
.me
.file
= LOCATE_stream
;
1161 fra
.me
.meth
= LOCATE_stream___FDIStream___init
;
1162 fra
.me
.has_broke
= 0;
1163 fra
.me
.REG_size
= 1;
1164 fra
.me
.REG
[0] = NIT_NULL
;
1167 /* ./../lib/standard//stream.nit:240 */
1168 CALL_stream___FDStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1169 stack_frame_head
= fra
.me
.prev
;
1170 init_table
[itpos2
] = 1;
1173 void stream___FDOStream___write(val_t p0
, val_t p1
){
1174 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1178 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1179 fra
.me
.file
= LOCATE_stream
;
1181 fra
.me
.meth
= LOCATE_stream___FDOStream___write
;
1182 fra
.me
.has_broke
= 0;
1183 fra
.me
.REG_size
= 3;
1184 fra
.me
.REG
[0] = NIT_NULL
;
1185 fra
.me
.REG
[1] = NIT_NULL
;
1186 fra
.me
.REG
[2] = NIT_NULL
;
1189 REGB0
= TAG_Bool(ATTR_stream___FDStream____fd(fra
.me
.REG
[0])!=NIT_NULL
);
1190 /* ./../lib/standard//stream.nit:250 */
1191 if (UNTAG_Bool(REGB0
)) {
1193 fprintf(stderr
, "Uninitialized attribute %s", "_fd");
1194 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 250);
1197 REGB0
= ATTR_stream___FDStream____fd(fra
.me
.REG
[0]);
1198 fra
.me
.REG
[2] = CALL_string___String___to_cstring(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1199 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1200 /* ./../lib/standard//collection//array.nit:23 */
1201 if (UNTAG_Bool(REGB1
)) {
1203 fprintf(stderr
, "Uninitialized attribute %s", "_length");
1204 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
1207 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1208 REGB1
= CALL_stream___FDStream___native_write(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, fra
.me
.REG
[2], REGB1
);
1209 REGB0
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1210 /* ./../lib/standard//collection//array.nit:23 */
1211 if (UNTAG_Bool(REGB0
)) {
1213 fprintf(stderr
, "Uninitialized attribute %s", "_length");
1214 fprintf(stderr
, " (%s:%d)\n", LOCATE_array
, 23);
1217 REGB0
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1218 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
1219 /* ./../lib/standard//stream.nit:251 */
1220 if (UNTAG_Bool(REGB0
)) {
1221 REGB0
= TAG_Bool(false);
1222 ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[0]) = REGB0
;
1224 stack_frame_head
= fra
.me
.prev
;
1227 val_t
stream___FDOStream___is_writable(val_t p0
){
1228 struct {struct stack_frame_t me
;} fra
;
1231 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1232 fra
.me
.file
= LOCATE_stream
;
1234 fra
.me
.meth
= LOCATE_stream___FDOStream___is_writable
;
1235 fra
.me
.has_broke
= 0;
1236 fra
.me
.REG_size
= 1;
1237 fra
.me
.REG
[0] = NIT_NULL
;
1239 REGB0
= TAG_Bool(ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[0])!=NIT_NULL
);
1240 /* ./../lib/standard//stream.nit:246 */
1241 if (UNTAG_Bool(REGB0
)) {
1243 fprintf(stderr
, "Uninitialized attribute %s", "_is_writable");
1244 fprintf(stderr
, " (%s:%d)\n", LOCATE_stream
, 246);
1247 REGB0
= ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[0]);
1248 stack_frame_head
= fra
.me
.prev
;
1251 void stream___FDOStream___init(val_t p0
, val_t p1
, int* init_table
){
1252 int itpos3
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDOStream
].i
;
1253 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1256 if (init_table
[itpos3
]) return;
1257 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1258 fra
.me
.file
= LOCATE_stream
;
1260 fra
.me
.meth
= LOCATE_stream___FDOStream___init
;
1261 fra
.me
.has_broke
= 0;
1262 fra
.me
.REG_size
= 2;
1263 fra
.me
.REG
[0] = NIT_NULL
;
1264 fra
.me
.REG
[1] = NIT_NULL
;
1267 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1268 /* ./../lib/standard//stream.nit:254 */
1269 CALL_stream___FDStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1270 REGB0
= TAG_Bool(true);
1271 /* ./../lib/standard//stream.nit:256 */
1272 ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[1]) = REGB0
;
1273 stack_frame_head
= fra
.me
.prev
;
1274 init_table
[itpos3
] = 1;
1277 void stream___FDIOStream___init(val_t p0
, val_t p1
, int* init_table
){
1278 int itpos4
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDIOStream
].i
;
1279 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1283 if (init_table
[itpos4
]) return;
1284 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1285 fra
.me
.file
= LOCATE_stream
;
1287 fra
.me
.meth
= LOCATE_stream___FDIOStream___init
;
1288 fra
.me
.has_broke
= 0;
1289 fra
.me
.REG_size
= 2;
1290 fra
.me
.REG
[0] = NIT_NULL
;
1291 fra
.me
.REG
[1] = NIT_NULL
;
1294 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1296 /* ./../lib/standard//stream.nit:264 */
1297 CALL_stream___FDIStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1298 CALL_stream___FDOStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1299 /* ./../lib/standard//stream.nit:266 */
1300 ATTR_stream___FDStream____fd(fra
.me
.REG
[1]) = REGB1
;
1301 REGB1
= TAG_Bool(true);
1302 /* ./../lib/standard//stream.nit:267 */
1303 ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[1]) = REGB1
;
1304 stack_frame_head
= fra
.me
.prev
;
1305 init_table
[itpos4
] = 1;