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 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 20);
14 stack_frame_head
= fra
.me
.prev
;
17 void stream___IOS___init(val_t p0
, int* init_table
){
18 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IOS
].i
;
19 struct {struct stack_frame_t me
;} fra
;
21 if (init_table
[itpos0
]) return;
22 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
23 fra
.me
.file
= LOCATE_stream
;
25 fra
.me
.meth
= LOCATE_stream___IOS___init
;
28 stack_frame_head
= fra
.me
.prev
;
29 init_table
[itpos0
] = 1;
32 val_t
stream___IStream___read_char(val_t p0
){
33 struct {struct stack_frame_t me
;} fra
;
35 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
36 fra
.me
.file
= LOCATE_stream
;
38 fra
.me
.meth
= LOCATE_stream___IStream___read_char
;
41 /* ./../lib/standard//stream.nit:27 */
42 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 27);
43 stack_frame_head
= fra
.me
.prev
;
46 val_t
stream___IStream___read(val_t p0
, val_t p1
){
47 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
52 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
53 fra
.me
.file
= LOCATE_stream
;
55 fra
.me
.meth
= LOCATE_stream___IStream___read
;
58 fra
.me
.REG
[0] = NIT_NULL
;
59 fra
.me
.REG
[1] = NIT_NULL
;
62 /* ./../lib/standard//stream.nit:33 */
63 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___with_capacity(REGB0
);
64 /* ./../lib/standard//stream.nit:34 */
67 /* ./../lib/standard//kernel.nit:214 */
68 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB1
));
69 /* ./../lib/standard//stream.nit:34 */
70 if (UNTAG_Bool(REGB1
)) {
71 REGB1
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
72 REGB1
= TAG_Bool(!UNTAG_Bool(REGB1
));
74 REGB2
= TAG_Bool(false);
77 if (UNTAG_Bool(REGB1
)) {
78 /* ./../lib/standard//stream.nit:35 */
79 REGB1
= CALL_stream___IStream___read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
80 /* ./../lib/standard//stream.nit:36 */
82 /* ./../lib/standard//kernel.nit:213 */
83 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB2
));
84 /* ./../lib/standard//stream.nit:36 */
85 if (UNTAG_Bool(REGB2
)) {
86 /* ./../lib/standard//kernel.nit:277 */
87 REGB1
= TAG_Char(UNTAG_Int(REGB1
));
88 /* ./../lib/standard//stream.nit:37 */
89 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB1
);
90 /* ./../lib/standard//stream.nit:38 */
92 /* ./../lib/standard//kernel.nit:217 */
93 REGB1
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB1
));
94 /* ./../lib/standard//stream.nit:38 */
98 /* ./../lib/standard//stream.nit:34 */
103 /* ./../lib/standard//stream.nit:41 */
104 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
107 stack_frame_head
= fra
.me
.prev
;
108 return fra
.me
.REG
[1];
110 val_t
stream___IStream___read_line(val_t p0
){
111 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
114 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
115 fra
.me
.file
= LOCATE_stream
;
117 fra
.me
.meth
= LOCATE_stream___IStream___read_line
;
118 fra
.me
.has_broke
= 0;
120 fra
.me
.REG
[0] = NIT_NULL
;
121 fra
.me
.REG
[1] = NIT_NULL
;
123 /* ./../lib/standard//stream.nit:47 */
124 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
125 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
126 if (UNTAG_Bool(REGB0
)) {
128 nit_abort("Assert failed", NULL
, LOCATE_stream
, 47);
130 /* ./../lib/standard//stream.nit:48 */
131 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___init();
132 /* ./../lib/standard//stream.nit:49 */
133 CALL_stream___IStream___append_line_to(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
134 /* ./../lib/standard//stream.nit:50 */
135 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
138 stack_frame_head
= fra
.me
.prev
;
139 return fra
.me
.REG
[1];
141 val_t
stream___IStream___read_all(val_t p0
){
142 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
146 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
147 fra
.me
.file
= LOCATE_stream
;
149 fra
.me
.meth
= LOCATE_stream___IStream___read_all
;
150 fra
.me
.has_broke
= 0;
152 fra
.me
.REG
[0] = NIT_NULL
;
153 fra
.me
.REG
[1] = NIT_NULL
;
155 /* ./../lib/standard//stream.nit:56 */
156 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___init();
157 /* ./../lib/standard//stream.nit:57 */
159 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
160 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
161 if (UNTAG_Bool(REGB0
)) {
162 /* ./../lib/standard//stream.nit:58 */
163 REGB0
= CALL_stream___IStream___read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
164 /* ./../lib/standard//stream.nit:59 */
166 /* ./../lib/standard//kernel.nit:213 */
167 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
168 /* ./../lib/standard//stream.nit:59 */
169 if (UNTAG_Bool(REGB1
)) {
170 /* ./../lib/standard//kernel.nit:277 */
171 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
172 /* ./../lib/standard//stream.nit:59 */
173 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB0
);
176 /* ./../lib/standard//stream.nit:57 */
181 /* ./../lib/standard//stream.nit:61 */
182 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
185 stack_frame_head
= fra
.me
.prev
;
186 return fra
.me
.REG
[1];
188 void stream___IStream___append_line_to(val_t p0
, val_t p1
){
189 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
194 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
195 fra
.me
.file
= LOCATE_stream
;
197 fra
.me
.meth
= LOCATE_stream___IStream___append_line_to
;
198 fra
.me
.has_broke
= 0;
200 fra
.me
.REG
[0] = NIT_NULL
;
201 fra
.me
.REG
[1] = NIT_NULL
;
204 /* ./../lib/standard//stream.nit:67 */
206 /* ./../lib/standard//stream.nit:68 */
207 REGB0
= CALL_stream___IStream___read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
208 /* ./../lib/standard//stream.nit:69 */
210 /* ./../lib/standard//kernel.nit:216 */
211 REGB1
= TAG_Int(-UNTAG_Int(REGB1
));
212 /* ./../lib/standard//stream.nit:69 */
213 REGB2
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB1
));
214 if (UNTAG_Bool(REGB2
)) {
216 /* ./../lib/standard//kernel.nit:207 */
217 REGB1
= TAG_Bool((REGB0
)==(REGB1
));
218 /* ./../lib/standard//stream.nit:69 */
221 if (UNTAG_Bool(REGB2
)) {
222 /* ./../lib/standard//stream.nit:70 */
223 REGB2
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
224 if (UNTAG_Bool(REGB2
)) {
228 /* ./../lib/standard//kernel.nit:277 */
229 REGB0
= TAG_Char(UNTAG_Int(REGB0
));
230 /* ./../lib/standard//stream.nit:73 */
231 CALL_abstract_collection___Sequence___push(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB0
);
232 /* ./../lib/standard//stream.nit:74 */
233 REGB2
= TAG_Char('\n');
234 REGB1
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB2
));
235 if (UNTAG_Bool(REGB1
)) {
237 /* ./../lib/standard//kernel.nit:347 */
238 REGB2
= TAG_Bool((REGB0
)==(REGB2
));
239 /* ./../lib/standard//stream.nit:74 */
242 if (UNTAG_Bool(REGB1
)) {
248 stack_frame_head
= fra
.me
.prev
;
251 val_t
stream___IStream___eof(val_t p0
){
252 struct {struct stack_frame_t me
;} fra
;
254 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
255 fra
.me
.file
= LOCATE_stream
;
257 fra
.me
.meth
= LOCATE_stream___IStream___eof
;
258 fra
.me
.has_broke
= 0;
260 /* ./../lib/standard//stream.nit:79 */
261 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 79);
262 stack_frame_head
= fra
.me
.prev
;
265 void stream___OStream___write(val_t p0
, val_t p1
){
266 struct {struct stack_frame_t me
;} fra
;
268 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
269 fra
.me
.file
= LOCATE_stream
;
271 fra
.me
.meth
= LOCATE_stream___OStream___write
;
272 fra
.me
.has_broke
= 0;
274 /* ./../lib/standard//stream.nit:86 */
275 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 86);
276 stack_frame_head
= fra
.me
.prev
;
279 val_t
stream___OStream___is_writable(val_t p0
){
280 struct {struct stack_frame_t me
;} fra
;
282 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
283 fra
.me
.file
= LOCATE_stream
;
285 fra
.me
.meth
= LOCATE_stream___OStream___is_writable
;
286 fra
.me
.has_broke
= 0;
288 /* ./../lib/standard//stream.nit:89 */
289 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 89);
290 stack_frame_head
= fra
.me
.prev
;
293 val_t
stream___BufferedIStream___read_char(val_t p0
){
294 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
300 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
301 fra
.me
.file
= LOCATE_stream
;
303 fra
.me
.meth
= LOCATE_stream___BufferedIStream___read_char
;
304 fra
.me
.has_broke
= 0;
306 fra
.me
.REG
[0] = NIT_NULL
;
307 fra
.me
.REG
[1] = NIT_NULL
;
309 /* ./../lib/standard//stream.nit:98 */
310 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
311 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
312 if (UNTAG_Bool(REGB0
)) {
314 nit_abort("Assert failed", NULL
, LOCATE_stream
, 98);
316 /* ./../lib/standard//stream.nit:99 */
317 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
318 if (UNTAG_Bool(REGB0
)) {
320 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 99);
322 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
323 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
324 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
325 if (UNTAG_Bool(REGB1
)) {
326 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 99);
328 /* ./../lib/standard//collection//array.nit:23 */
329 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
330 if (UNTAG_Bool(REGB1
)) {
332 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
334 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
335 /* ./../lib/standard//kernel.nit:213 */
336 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
337 /* ./../lib/standard//stream.nit:99 */
338 if (UNTAG_Bool(REGB1
)) {
339 /* ./../lib/standard//stream.nit:100 */
340 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
342 /* ./../lib/standard//stream.nit:102 */
343 REGB1
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
344 if (UNTAG_Bool(REGB1
)) {
346 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 102);
348 REGB1
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
349 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
350 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
351 if (UNTAG_Bool(REGB0
)) {
352 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 102);
354 /* ./../lib/standard//collection//array.nit:23 */
355 REGB0
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
356 if (UNTAG_Bool(REGB0
)) {
358 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
360 REGB0
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
361 /* ./../lib/standard//kernel.nit:213 */
362 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB0
));
363 /* ./../lib/standard//stream.nit:102 */
364 if (UNTAG_Bool(REGB0
)) {
365 /* ./../lib/standard//stream.nit:103 */
367 /* ./../lib/standard//kernel.nit:216 */
368 REGB0
= TAG_Int(-UNTAG_Int(REGB0
));
369 /* ./../lib/standard//stream.nit:103 */
372 /* ./../lib/standard//stream.nit:105 */
373 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
374 REGB1
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
375 if (UNTAG_Bool(REGB1
)) {
377 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 105);
379 REGB1
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
380 REGB2
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
381 if (UNTAG_Bool(REGB2
)) {
382 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 105);
384 REGB1
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB1
);
385 /* ./../lib/standard//stream.nit:106 */
386 REGB2
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
388 /* ./../lib/standard//kernel.nit:215 */
389 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
390 /* ./../lib/standard//stream.nit:106 */
391 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB3
;
392 /* ./../lib/standard//kernel.nit:382 */
393 REGB1
= TAG_Int((unsigned char)UNTAG_Char(REGB1
));
394 /* ./../lib/standard//stream.nit:107 */
398 stack_frame_head
= fra
.me
.prev
;
401 val_t
stream___BufferedIStream___read(val_t p0
, val_t p1
){
402 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
409 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
410 fra
.me
.file
= LOCATE_stream
;
412 fra
.me
.meth
= LOCATE_stream___BufferedIStream___read
;
413 fra
.me
.has_broke
= 0;
415 fra
.me
.REG
[0] = NIT_NULL
;
416 fra
.me
.REG
[1] = NIT_NULL
;
417 fra
.me
.REG
[2] = NIT_NULL
;
418 fra
.me
.REG
[3] = NIT_NULL
;
421 /* ./../lib/standard//stream.nit:112 */
422 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___with_capacity(REGB0
);
423 /* ./../lib/standard//stream.nit:113 */
424 REGB1
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
425 if (UNTAG_Bool(REGB1
)) {
427 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 113);
429 REGB1
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
430 /* ./../lib/standard//stream.nit:114 */
431 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
432 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
433 if (UNTAG_Bool(REGB2
)) {
434 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 114);
436 /* ./../lib/standard//collection//array.nit:23 */
437 REGB2
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
438 if (UNTAG_Bool(REGB2
)) {
440 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
442 REGB2
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
443 /* ./../lib/standard//stream.nit:115 */
446 /* ./../lib/standard//kernel.nit:214 */
447 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB3
));
448 /* ./../lib/standard//stream.nit:115 */
449 if (UNTAG_Bool(REGB3
)) {
450 /* ./../lib/standard//kernel.nit:213 */
451 REGB3
= TAG_Bool(UNTAG_Int(REGB1
)>=UNTAG_Int(REGB2
));
452 /* ./../lib/standard//stream.nit:116 */
453 if (UNTAG_Bool(REGB3
)) {
454 /* ./../lib/standard//stream.nit:117 */
455 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
456 /* ./../lib/standard//stream.nit:118 */
457 REGB3
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
458 if (UNTAG_Bool(REGB3
)) {
459 fra
.me
.REG
[2] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
462 /* ./../lib/standard//stream.nit:119 */
463 REGB3
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
464 if (UNTAG_Bool(REGB3
)) {
466 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 119);
468 REGB3
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
470 /* ./../lib/standard//stream.nit:120 */
471 fra
.me
.REG
[3] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
472 REGB3
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
473 if (UNTAG_Bool(REGB3
)) {
474 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 120);
476 /* ./../lib/standard//collection//array.nit:23 */
477 REGB3
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
478 if (UNTAG_Bool(REGB3
)) {
480 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
482 REGB3
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[3]);
483 /* ./../lib/standard//stream.nit:120 */
486 /* ./../lib/standard//stream.nit:122 */
488 /* ./../lib/standard//kernel.nit:212 */
489 REGB3
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
490 /* ./../lib/standard//stream.nit:122 */
491 if (UNTAG_Bool(REGB3
)) {
493 /* ./../lib/standard//kernel.nit:214 */
494 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB3
));
496 /* ./../lib/standard//stream.nit:122 */
497 REGB4
= TAG_Bool(false);
500 if (UNTAG_Bool(REGB3
)) {
501 /* ./../lib/standard//stream.nit:123 */
502 fra
.me
.REG
[3] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
503 REGB3
= TAG_Bool(fra
.me
.REG
[3]==NIT_NULL
);
504 if (UNTAG_Bool(REGB3
)) {
505 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 123);
507 REGB3
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB1
);
508 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB3
);
509 /* ./../lib/standard//stream.nit:124 */
511 /* ./../lib/standard//kernel.nit:215 */
512 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
513 /* ./../lib/standard//stream.nit:124 */
515 /* ./../lib/standard//stream.nit:125 */
517 /* ./../lib/standard//kernel.nit:217 */
518 REGB3
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB3
));
519 /* ./../lib/standard//stream.nit:125 */
522 /* ./../lib/standard//stream.nit:122 */
528 /* ./../lib/standard//stream.nit:115 */
533 /* ./../lib/standard//stream.nit:128 */
534 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB1
;
535 /* ./../lib/standard//stream.nit:129 */
536 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
537 fra
.me
.REG
[2] = fra
.me
.REG
[1];
540 stack_frame_head
= fra
.me
.prev
;
541 return fra
.me
.REG
[2];
543 val_t
stream___BufferedIStream___read_all(val_t p0
){
544 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
549 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
550 fra
.me
.file
= LOCATE_stream
;
552 fra
.me
.meth
= LOCATE_stream___BufferedIStream___read_all
;
553 fra
.me
.has_broke
= 0;
555 fra
.me
.REG
[0] = NIT_NULL
;
556 fra
.me
.REG
[1] = NIT_NULL
;
557 fra
.me
.REG
[2] = NIT_NULL
;
559 /* ./../lib/standard//stream.nit:134 */
560 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___init();
561 /* ./../lib/standard//stream.nit:135 */
563 REGB0
= CALL_stream___IStream___eof(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
564 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
565 if (UNTAG_Bool(REGB0
)) {
566 /* ./../lib/standard//stream.nit:136 */
567 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
568 if (UNTAG_Bool(REGB0
)) {
570 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 136);
572 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
573 /* ./../lib/standard//stream.nit:137 */
574 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
575 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
576 if (UNTAG_Bool(REGB1
)) {
577 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 137);
579 /* ./../lib/standard//collection//array.nit:23 */
580 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
581 if (UNTAG_Bool(REGB1
)) {
583 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
585 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
586 /* ./../lib/standard//stream.nit:138 */
588 /* ./../lib/standard//kernel.nit:212 */
589 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
590 /* ./../lib/standard//stream.nit:138 */
591 if (UNTAG_Bool(REGB2
)) {
592 /* ./../lib/standard//stream.nit:139 */
593 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
594 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
595 if (UNTAG_Bool(REGB2
)) {
596 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 139);
598 REGB2
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB0
);
599 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB2
);
600 /* ./../lib/standard//stream.nit:140 */
602 /* ./../lib/standard//kernel.nit:215 */
603 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
604 /* ./../lib/standard//stream.nit:140 */
607 /* ./../lib/standard//stream.nit:138 */
612 /* ./../lib/standard//stream.nit:142 */
613 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB0
;
614 /* ./../lib/standard//stream.nit:143 */
615 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
617 /* ./../lib/standard//stream.nit:135 */
622 /* ./../lib/standard//stream.nit:145 */
623 fra
.me
.REG
[1] = CALL_string___Object___to_s(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
626 stack_frame_head
= fra
.me
.prev
;
627 return fra
.me
.REG
[1];
629 void stream___BufferedIStream___append_line_to(val_t p0
, val_t p1
){
630 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
636 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
637 fra
.me
.file
= LOCATE_stream
;
639 fra
.me
.meth
= LOCATE_stream___BufferedIStream___append_line_to
;
640 fra
.me
.has_broke
= 0;
642 fra
.me
.REG
[0] = NIT_NULL
;
643 fra
.me
.REG
[1] = NIT_NULL
;
644 fra
.me
.REG
[2] = NIT_NULL
;
647 /* ./../lib/standard//stream.nit:150 */
649 /* ./../lib/standard//stream.nit:152 */
650 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
651 if (UNTAG_Bool(REGB0
)) {
653 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 152);
655 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
656 /* ./../lib/standard//stream.nit:153 */
658 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
659 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
660 if (UNTAG_Bool(REGB1
)) {
661 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 153);
663 /* ./../lib/standard//collection//array.nit:23 */
664 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
665 if (UNTAG_Bool(REGB1
)) {
667 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
669 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
670 /* ./../lib/standard//kernel.nit:212 */
671 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
672 /* ./../lib/standard//stream.nit:153 */
673 if (UNTAG_Bool(REGB1
)) {
674 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
675 REGB1
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
676 if (UNTAG_Bool(REGB1
)) {
677 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 153);
679 REGB1
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB0
);
680 REGB2
= TAG_Char('\n');
681 REGB3
= TAG_Bool(IS_EQUAL_OO(REGB1
,REGB2
));
682 if (UNTAG_Bool(REGB3
)) {
684 /* ./../lib/standard//kernel.nit:347 */
685 REGB2
= TAG_Bool((REGB1
)==(REGB2
));
686 /* ./../lib/standard//stream.nit:153 */
689 REGB3
= TAG_Bool(!UNTAG_Bool(REGB3
));
691 REGB2
= TAG_Bool(false);
694 if (UNTAG_Bool(REGB3
)) {
696 /* ./../lib/standard//kernel.nit:215 */
697 REGB3
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB3
));
698 /* ./../lib/standard//stream.nit:153 */
705 /* ./../lib/standard//stream.nit:156 */
706 REGB3
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
707 if (UNTAG_Bool(REGB3
)) {
709 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 156);
711 REGB3
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
712 /* ./../lib/standard//kernel.nit:214 */
713 REGB3
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB3
));
714 /* ./../lib/standard//stream.nit:156 */
715 if (UNTAG_Bool(REGB3
)) {
716 /* ./../lib/standard//collection//array.nit:23 */
717 REGB3
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
718 if (UNTAG_Bool(REGB3
)) {
720 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
722 REGB3
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
723 /* ./../lib/standard//kernel.nit:215 */
724 REGB3
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB0
));
725 /* ./../lib/standard//stream.nit:158 */
726 REGB2
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
727 if (UNTAG_Bool(REGB2
)) {
729 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 158);
731 REGB2
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
732 /* ./../lib/standard//kernel.nit:217 */
733 REGB2
= TAG_Int(UNTAG_Int(REGB3
)-UNTAG_Int(REGB2
));
734 /* ./../lib/standard//stream.nit:158 */
735 CALL_array___AbstractArray___enlarge(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB2
);
736 /* ./../lib/standard//stream.nit:161 */
737 REGB2
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
738 if (UNTAG_Bool(REGB2
)) {
740 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 161);
742 REGB2
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
743 /* ./../lib/standard//stream.nit:162 */
745 /* ./../lib/standard//kernel.nit:212 */
746 REGB3
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB0
));
747 /* ./../lib/standard//stream.nit:162 */
748 if (UNTAG_Bool(REGB3
)) {
749 /* ./../lib/standard//stream.nit:163 */
750 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
751 REGB3
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
752 if (UNTAG_Bool(REGB3
)) {
753 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 163);
755 REGB3
= CALL_abstract_collection___MapRead_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB2
);
756 CALL_abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB3
);
757 /* ./../lib/standard//stream.nit:164 */
759 /* ./../lib/standard//kernel.nit:215 */
760 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
761 /* ./../lib/standard//stream.nit:164 */
764 /* ./../lib/standard//stream.nit:162 */
770 /* ./../lib/standard//stream.nit:168 */
771 fra
.me
.REG
[2] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
772 REGB2
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
773 if (UNTAG_Bool(REGB2
)) {
774 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 168);
776 /* ./../lib/standard//collection//array.nit:23 */
777 REGB2
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2])!=NIT_NULL
);
778 if (UNTAG_Bool(REGB2
)) {
780 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
782 REGB2
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[2]);
783 /* ./../lib/standard//kernel.nit:212 */
784 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB2
));
785 /* ./../lib/standard//stream.nit:168 */
786 if (UNTAG_Bool(REGB2
)) {
787 /* ./../lib/standard//stream.nit:170 */
789 /* ./../lib/standard//kernel.nit:215 */
790 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
791 /* ./../lib/standard//stream.nit:170 */
792 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB2
;
793 /* ./../lib/standard//stream.nit:171 */
796 /* ./../lib/standard//stream.nit:174 */
797 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB0
;
798 /* ./../lib/standard//stream.nit:175 */
799 REGB0
= CALL_stream___BufferedIStream___end_reached(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
800 if (UNTAG_Bool(REGB0
)) {
801 /* ./../lib/standard//stream.nit:176 */
804 /* ./../lib/standard//stream.nit:178 */
805 CALL_stream___BufferedIStream___fill_buffer(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
810 stack_frame_head
= fra
.me
.prev
;
813 val_t
stream___BufferedIStream___eof(val_t p0
){
814 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
818 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
819 fra
.me
.file
= LOCATE_stream
;
821 fra
.me
.meth
= LOCATE_stream___BufferedIStream___eof
;
822 fra
.me
.has_broke
= 0;
824 fra
.me
.REG
[0] = NIT_NULL
;
825 fra
.me
.REG
[1] = NIT_NULL
;
827 /* ./../lib/standard//stream.nit:184 */
828 REGB0
= TAG_Bool(ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0])!=NIT_NULL
);
829 if (UNTAG_Bool(REGB0
)) {
831 nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_stream
, 184);
833 REGB0
= ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]);
834 fra
.me
.REG
[1] = ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]);
835 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
836 if (UNTAG_Bool(REGB1
)) {
837 nit_abort("Reciever is null", NULL
, LOCATE_stream
, 184);
839 /* ./../lib/standard//collection//array.nit:23 */
840 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
841 if (UNTAG_Bool(REGB1
)) {
843 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
845 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
846 /* ./../lib/standard//kernel.nit:213 */
847 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
848 /* ./../lib/standard//stream.nit:184 */
849 if (UNTAG_Bool(REGB1
)) {
850 REGB1
= CALL_stream___BufferedIStream___end_reached(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
852 REGB0
= TAG_Bool(false);
857 stack_frame_head
= fra
.me
.prev
;
860 void stream___BufferedIStream___fill_buffer(val_t p0
){
861 struct {struct stack_frame_t me
;} fra
;
863 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
864 fra
.me
.file
= LOCATE_stream
;
866 fra
.me
.meth
= LOCATE_stream___BufferedIStream___fill_buffer
;
867 fra
.me
.has_broke
= 0;
869 /* ./../lib/standard//stream.nit:192 */
870 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 192);
871 stack_frame_head
= fra
.me
.prev
;
874 val_t
stream___BufferedIStream___end_reached(val_t p0
){
875 struct {struct stack_frame_t me
;} fra
;
877 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
878 fra
.me
.file
= LOCATE_stream
;
880 fra
.me
.meth
= LOCATE_stream___BufferedIStream___end_reached
;
881 fra
.me
.has_broke
= 0;
883 /* ./../lib/standard//stream.nit:195 */
884 nit_abort("Deferred method called", NULL
, LOCATE_stream
, 195);
885 stack_frame_head
= fra
.me
.prev
;
888 void stream___BufferedIStream___prepare_buffer(val_t p0
, val_t p1
){
889 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
892 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
893 fra
.me
.file
= LOCATE_stream
;
895 fra
.me
.meth
= LOCATE_stream___BufferedIStream___prepare_buffer
;
896 fra
.me
.has_broke
= 0;
898 fra
.me
.REG
[0] = NIT_NULL
;
899 fra
.me
.REG
[1] = NIT_NULL
;
902 /* ./../lib/standard//stream.nit:201 */
903 fra
.me
.REG
[1] = NEW_Buffer_string___Buffer___with_capacity(REGB0
);
904 ATTR_stream___BufferedIStream____buffer(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
905 /* ./../lib/standard//stream.nit:202 */
907 ATTR_stream___BufferedIStream____buffer_pos(fra
.me
.REG
[0]) = REGB0
;
908 stack_frame_head
= fra
.me
.prev
;
911 void stream___FDStream___close(val_t p0
){
912 struct {struct stack_frame_t me
;} fra
;
915 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
916 fra
.me
.file
= LOCATE_stream
;
918 fra
.me
.meth
= LOCATE_stream___FDStream___close
;
919 fra
.me
.has_broke
= 0;
921 fra
.me
.REG
[0] = NIT_NULL
;
923 /* ./../lib/standard//stream.nit:218 */
924 REGB0
= TAG_Bool(ATTR_stream___FDStream____fd(fra
.me
.REG
[0])!=NIT_NULL
);
925 if (UNTAG_Bool(REGB0
)) {
927 nit_abort("Uninitialized attribute %s", "_fd", LOCATE_stream
, 218);
929 REGB0
= ATTR_stream___FDStream____fd(fra
.me
.REG
[0]);
930 CALL_stream___FDStream___native_close(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
931 stack_frame_head
= fra
.me
.prev
;
934 val_t
stream___FDStream___native_close(val_t p0
, val_t p1
){
935 struct {struct stack_frame_t me
;} fra
;
938 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
939 fra
.me
.file
= LOCATE_stream
;
941 fra
.me
.meth
= LOCATE_stream___FDStream___native_close
;
942 fra
.me
.has_broke
= 0;
944 fra
.me
.REG
[0] = NIT_NULL
;
947 /* ./../lib/standard//stream.nit:220 */
948 REGB0
= TAG_Int(stream_FDStream_FDStream_native_close_1(fra
.me
.REG
[0], UNTAG_Int(REGB0
)));
949 stack_frame_head
= fra
.me
.prev
;
952 val_t
stream___FDStream___native_read_char(val_t p0
, val_t p1
){
953 struct {struct stack_frame_t me
;} fra
;
956 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
957 fra
.me
.file
= LOCATE_stream
;
959 fra
.me
.meth
= LOCATE_stream___FDStream___native_read_char
;
960 fra
.me
.has_broke
= 0;
962 fra
.me
.REG
[0] = NIT_NULL
;
965 /* ./../lib/standard//stream.nit:221 */
966 REGB0
= TAG_Int(stream_FDStream_FDStream_native_read_char_1(fra
.me
.REG
[0], UNTAG_Int(REGB0
)));
967 stack_frame_head
= fra
.me
.prev
;
970 val_t
stream___FDStream___native_read(val_t p0
, val_t p1
, val_t p2
, val_t p3
){
971 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
975 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
976 fra
.me
.file
= LOCATE_stream
;
978 fra
.me
.meth
= LOCATE_stream___FDStream___native_read
;
979 fra
.me
.has_broke
= 0;
981 fra
.me
.REG
[0] = NIT_NULL
;
982 fra
.me
.REG
[1] = NIT_NULL
;
987 /* ./../lib/standard//stream.nit:222 */
988 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
)));
989 stack_frame_head
= fra
.me
.prev
;
992 val_t
stream___FDStream___native_write(val_t p0
, val_t p1
, val_t p2
, val_t p3
){
993 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
997 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
998 fra
.me
.file
= LOCATE_stream
;
1000 fra
.me
.meth
= LOCATE_stream___FDStream___native_write
;
1001 fra
.me
.has_broke
= 0;
1002 fra
.me
.REG_size
= 2;
1003 fra
.me
.REG
[0] = NIT_NULL
;
1004 fra
.me
.REG
[1] = NIT_NULL
;
1009 /* ./../lib/standard//stream.nit:223 */
1010 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
)));
1011 stack_frame_head
= fra
.me
.prev
;
1014 void stream___FDStream___init(val_t p0
, val_t p1
, int* init_table
){
1015 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDStream
].i
;
1016 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1019 if (init_table
[itpos1
]) return;
1020 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1021 fra
.me
.file
= LOCATE_stream
;
1023 fra
.me
.meth
= LOCATE_stream___FDStream___init
;
1024 fra
.me
.has_broke
= 0;
1025 fra
.me
.REG_size
= 2;
1026 fra
.me
.REG
[0] = NIT_NULL
;
1027 fra
.me
.REG
[1] = NIT_NULL
;
1030 /* ./../lib/standard//stream.nit:225 */
1031 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1032 CALL_stream___IOS___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
1033 ATTR_stream___FDStream____fd(fra
.me
.REG
[1]) = REGB0
;
1034 stack_frame_head
= fra
.me
.prev
;
1035 init_table
[itpos1
] = 1;
1038 val_t
stream___FDIStream___eof(val_t p0
){
1039 struct {struct stack_frame_t me
;} fra
;
1042 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1043 fra
.me
.file
= LOCATE_stream
;
1045 fra
.me
.meth
= LOCATE_stream___FDIStream___eof
;
1046 fra
.me
.has_broke
= 0;
1047 fra
.me
.REG_size
= 1;
1048 fra
.me
.REG
[0] = NIT_NULL
;
1050 /* ./../lib/standard//stream.nit:231 */
1051 REGB0
= TAG_Bool(ATTR_stream___FDIStream____eof(fra
.me
.REG
[0])!=NIT_NULL
);
1052 if (UNTAG_Bool(REGB0
)) {
1054 nit_abort("Uninitialized attribute %s", "_eof", LOCATE_stream
, 231);
1056 REGB0
= ATTR_stream___FDIStream____eof(fra
.me
.REG
[0]);
1057 stack_frame_head
= fra
.me
.prev
;
1060 val_t
stream___FDIStream___read_char(val_t p0
){
1061 struct {struct stack_frame_t me
;} fra
;
1066 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1067 fra
.me
.file
= LOCATE_stream
;
1069 fra
.me
.meth
= LOCATE_stream___FDIStream___read_char
;
1070 fra
.me
.has_broke
= 0;
1071 fra
.me
.REG_size
= 1;
1072 fra
.me
.REG
[0] = NIT_NULL
;
1074 /* ./../lib/standard//stream.nit:235 */
1075 REGB0
= TAG_Bool(ATTR_stream___FDStream____fd(fra
.me
.REG
[0])!=NIT_NULL
);
1076 if (UNTAG_Bool(REGB0
)) {
1078 nit_abort("Uninitialized attribute %s", "_fd", LOCATE_stream
, 235);
1080 REGB0
= ATTR_stream___FDStream____fd(fra
.me
.REG
[0]);
1081 REGB0
= CALL_stream___FDStream___native_read_char(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
);
1082 /* ./../lib/standard//stream.nit:236 */
1084 /* ./../lib/standard//kernel.nit:216 */
1085 REGB1
= TAG_Int(-UNTAG_Int(REGB1
));
1086 /* ./../lib/standard//stream.nit:236 */
1087 REGB2
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB1
));
1088 if (UNTAG_Bool(REGB2
)) {
1090 /* ./../lib/standard//kernel.nit:207 */
1091 REGB1
= TAG_Bool((REGB0
)==(REGB1
));
1092 /* ./../lib/standard//stream.nit:236 */
1095 if (UNTAG_Bool(REGB2
)) {
1096 REGB2
= TAG_Bool(true);
1097 ATTR_stream___FDIStream____eof(fra
.me
.REG
[0]) = REGB2
;
1099 /* ./../lib/standard//stream.nit:237 */
1102 stack_frame_head
= fra
.me
.prev
;
1105 void stream___FDIStream___init(val_t p0
, val_t p1
, int* init_table
){
1106 int itpos2
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDIStream
].i
;
1107 struct {struct stack_frame_t me
;} fra
;
1110 if (init_table
[itpos2
]) return;
1111 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1112 fra
.me
.file
= LOCATE_stream
;
1114 fra
.me
.meth
= LOCATE_stream___FDIStream___init
;
1115 fra
.me
.has_broke
= 0;
1116 fra
.me
.REG_size
= 1;
1117 fra
.me
.REG
[0] = NIT_NULL
;
1120 /* ./../lib/standard//stream.nit:240 */
1121 CALL_stream___FDStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1122 stack_frame_head
= fra
.me
.prev
;
1123 init_table
[itpos2
] = 1;
1126 val_t
stream___FDOStream___is_writable(val_t p0
){
1127 struct {struct stack_frame_t me
;} fra
;
1130 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1131 fra
.me
.file
= LOCATE_stream
;
1133 fra
.me
.meth
= LOCATE_stream___FDOStream___is_writable
;
1134 fra
.me
.has_broke
= 0;
1135 fra
.me
.REG_size
= 1;
1136 fra
.me
.REG
[0] = NIT_NULL
;
1138 /* ./../lib/standard//stream.nit:246 */
1139 REGB0
= TAG_Bool(ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[0])!=NIT_NULL
);
1140 if (UNTAG_Bool(REGB0
)) {
1142 nit_abort("Uninitialized attribute %s", "_is_writable", LOCATE_stream
, 246);
1144 REGB0
= ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[0]);
1145 stack_frame_head
= fra
.me
.prev
;
1148 void stream___FDOStream___write(val_t p0
, val_t p1
){
1149 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1153 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1154 fra
.me
.file
= LOCATE_stream
;
1156 fra
.me
.meth
= LOCATE_stream___FDOStream___write
;
1157 fra
.me
.has_broke
= 0;
1158 fra
.me
.REG_size
= 3;
1159 fra
.me
.REG
[0] = NIT_NULL
;
1160 fra
.me
.REG
[1] = NIT_NULL
;
1161 fra
.me
.REG
[2] = NIT_NULL
;
1164 /* ./../lib/standard//stream.nit:250 */
1165 REGB0
= TAG_Bool(ATTR_stream___FDStream____fd(fra
.me
.REG
[0])!=NIT_NULL
);
1166 if (UNTAG_Bool(REGB0
)) {
1168 nit_abort("Uninitialized attribute %s", "_fd", LOCATE_stream
, 250);
1170 REGB0
= ATTR_stream___FDStream____fd(fra
.me
.REG
[0]);
1171 fra
.me
.REG
[2] = CALL_string___String___to_cstring(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1172 /* ./../lib/standard//collection//array.nit:23 */
1173 REGB1
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1174 if (UNTAG_Bool(REGB1
)) {
1176 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
1178 REGB1
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1179 /* ./../lib/standard//stream.nit:250 */
1180 REGB1
= CALL_stream___FDStream___native_write(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, fra
.me
.REG
[2], REGB1
);
1181 /* ./../lib/standard//collection//array.nit:23 */
1182 REGB0
= TAG_Bool(ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1183 if (UNTAG_Bool(REGB0
)) {
1185 nit_abort("Uninitialized attribute %s", "_length", LOCATE_array
, 23);
1187 REGB0
= ATTR_array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1188 /* ./../lib/standard//kernel.nit:212 */
1189 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
1190 /* ./../lib/standard//stream.nit:251 */
1191 if (UNTAG_Bool(REGB0
)) {
1192 REGB0
= TAG_Bool(false);
1193 ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[0]) = REGB0
;
1195 stack_frame_head
= fra
.me
.prev
;
1198 void stream___FDOStream___init(val_t p0
, val_t p1
, int* init_table
){
1199 int itpos3
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDOStream
].i
;
1200 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1203 if (init_table
[itpos3
]) return;
1204 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1205 fra
.me
.file
= LOCATE_stream
;
1207 fra
.me
.meth
= LOCATE_stream___FDOStream___init
;
1208 fra
.me
.has_broke
= 0;
1209 fra
.me
.REG_size
= 2;
1210 fra
.me
.REG
[0] = NIT_NULL
;
1211 fra
.me
.REG
[1] = NIT_NULL
;
1214 /* ./../lib/standard//stream.nit:254 */
1215 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1216 CALL_stream___FDStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1217 /* ./../lib/standard//stream.nit:256 */
1218 REGB0
= TAG_Bool(true);
1219 ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[1]) = REGB0
;
1220 stack_frame_head
= fra
.me
.prev
;
1221 init_table
[itpos3
] = 1;
1224 void stream___FDIOStream___init(val_t p0
, val_t p1
, int* init_table
){
1225 int itpos4
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_FDIOStream
].i
;
1226 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1230 if (init_table
[itpos4
]) return;
1231 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1232 fra
.me
.file
= LOCATE_stream
;
1234 fra
.me
.meth
= LOCATE_stream___FDIOStream___init
;
1235 fra
.me
.has_broke
= 0;
1236 fra
.me
.REG_size
= 2;
1237 fra
.me
.REG
[0] = NIT_NULL
;
1238 fra
.me
.REG
[1] = NIT_NULL
;
1241 /* ./../lib/standard//stream.nit:264 */
1242 fra
.me
.REG
[1] = fra
.me
.REG
[0];
1244 CALL_stream___FDIStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1245 CALL_stream___FDOStream___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB0
, init_table
);
1246 /* ./../lib/standard//stream.nit:266 */
1247 ATTR_stream___FDStream____fd(fra
.me
.REG
[1]) = REGB1
;
1248 /* ./../lib/standard//stream.nit:267 */
1249 REGB1
= TAG_Bool(true);
1250 ATTR_stream___FDOStream____is_writable(fra
.me
.REG
[1]) = REGB1
;
1251 stack_frame_head
= fra
.me
.prev
;
1252 init_table
[itpos4
] = 1;