+++ /dev/null
-/* This C file is generated by NIT to compile module standard___stream. */
-#include "standard___stream._sep.h"
-void standard___stream___IOS___close(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 20;
- fra.me.meth = LOCATE_standard___stream___IOS___close;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:20 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 20);
- stack_frame_head = fra.me.prev;
- return;
-}
-void standard___stream___IOS___init(val_t p0, int* init_table){
- int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___stream___IOS].i;
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- if (init_table[itpos0]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 0;
- fra.me.meth = LOCATE_standard___stream___IOS___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- stack_frame_head = fra.me.prev;
- init_table[itpos0] = 1;
- return;
-}
-val_t standard___stream___IStream___read_char(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 27;
- fra.me.meth = LOCATE_standard___stream___IStream___read_char;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:27 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 27);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-val_t standard___stream___IStream___read(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 30;
- fra.me.meth = LOCATE_standard___stream___IStream___read;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:33 */
- fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB0);
- /* ./../lib/standard//stream.nit:34 */
- while(1) {
- REGB1 = TAG_Int(0);
- /* ./../lib/standard//kernel.nit:217 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:34 */
- if (UNTAG_Bool(REGB1)) {
- REGB1 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
- } else {
- REGB2 = TAG_Bool(false);
- REGB1 = REGB2;
- }
- if (UNTAG_Bool(REGB1)) {
- /* ./../lib/standard//stream.nit:35 */
- REGB1 = CALL_standard___stream___IStream___read_char(fra.me.REG[0])(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:36 */
- REGB2 = TAG_Int(0);
- /* ./../lib/standard//kernel.nit:216 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:36 */
- if (UNTAG_Bool(REGB2)) {
- /* ./../lib/standard//kernel.nit:280 */
- REGB1 = TAG_Char(UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:37 */
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB1);
- /* ./../lib/standard//stream.nit:38 */
- REGB1 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:220 */
- REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:38 */
- REGB0 = REGB1;
- }
- } else {
- /* ./../lib/standard//stream.nit:34 */
- goto label1;
- }
- }
- label1: while(0);
- /* ./../lib/standard//stream.nit:41 */
- fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- goto label2;
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-val_t standard___stream___IStream___read_line(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 44;
- fra.me.meth = LOCATE_standard___stream___IStream___read_line;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:47 */
- REGB0 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_standard___stream, 47);
- }
- /* ./../lib/standard//stream.nit:48 */
- fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___init();
- /* ./../lib/standard//stream.nit:49 */
- CALL_standard___stream___IStream___append_line_to(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* ./../lib/standard//stream.nit:50 */
- fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-val_t standard___stream___IStream___read_all(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 53;
- fra.me.meth = LOCATE_standard___stream___IStream___read_all;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:56 */
- fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___init();
- /* ./../lib/standard//stream.nit:57 */
- while(1) {
- REGB0 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- /* ./../lib/standard//stream.nit:58 */
- REGB0 = CALL_standard___stream___IStream___read_char(fra.me.REG[0])(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:59 */
- REGB1 = TAG_Int(0);
- /* ./../lib/standard//kernel.nit:216 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:59 */
- if (UNTAG_Bool(REGB1)) {
- /* ./../lib/standard//kernel.nit:280 */
- REGB0 = TAG_Char(UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:59 */
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB0);
- }
- } else {
- /* ./../lib/standard//stream.nit:57 */
- goto label1;
- }
- }
- label1: while(0);
- /* ./../lib/standard//stream.nit:61 */
- fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- goto label2;
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-void standard___stream___IStream___append_line_to(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 64;
- fra.me.meth = LOCATE_standard___stream___IStream___append_line_to;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* ./../lib/standard//stream.nit:67 */
- while(1) {
- /* ./../lib/standard//stream.nit:68 */
- REGB0 = CALL_standard___stream___IStream___read_char(fra.me.REG[0])(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:69 */
- REGB1 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:219 */
- REGB1 = TAG_Int(-UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:69 */
- REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- if (UNTAG_Bool(REGB2)) {
- } else {
- /* ./../lib/standard//kernel.nit:210 */
- REGB1 = TAG_Bool((REGB0)==(REGB1));
- /* ./../lib/standard//stream.nit:69 */
- REGB2 = REGB1;
- }
- if (UNTAG_Bool(REGB2)) {
- /* ./../lib/standard//stream.nit:70 */
- REGB2 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- if (UNTAG_Bool(REGB2)) {
- goto label1;
- }
- } else {
- /* ./../lib/standard//kernel.nit:280 */
- REGB0 = TAG_Char(UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:73 */
- CALL_standard___collection___abstract_collection___Sequence___push(fra.me.REG[1])(fra.me.REG[1], REGB0);
- /* ./../lib/standard//stream.nit:74 */
- REGB2 = TAG_Char('\n');
- REGB1 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB2));
- if (UNTAG_Bool(REGB1)) {
- } else {
- /* ./../lib/standard//kernel.nit:350 */
- REGB2 = TAG_Bool((REGB0)==(REGB2));
- /* ./../lib/standard//stream.nit:74 */
- REGB1 = REGB2;
- }
- if (UNTAG_Bool(REGB1)) {
- goto label1;
- }
- }
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return;
-}
-val_t standard___stream___IStream___eof(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 79;
- fra.me.meth = LOCATE_standard___stream___IStream___eof;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:79 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 79);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-void standard___stream___OStream___write(val_t p0, val_t p1){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 86;
- fra.me.meth = LOCATE_standard___stream___OStream___write;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:86 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 86);
- stack_frame_head = fra.me.prev;
- return;
-}
-val_t standard___stream___OStream___is_writable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 89;
- fra.me.meth = LOCATE_standard___stream___OStream___is_writable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:89 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 89);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-val_t standard___stream___BufferedIStream___read_char(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 96;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___read_char;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:98 */
- REGB0 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_standard___stream, 98);
- }
- /* ./../lib/standard//stream.nit:99 */
- REGB0 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 99);
- }
- REGB0 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- fra.me.REG[1] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 99);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ./../lib/standard//kernel.nit:216 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:99 */
- if (UNTAG_Bool(REGB1)) {
- /* ./../lib/standard//stream.nit:100 */
- CALL_standard___stream___BufferedIStream___fill_buffer(fra.me.REG[0])(fra.me.REG[0]);
- }
- /* ./../lib/standard//stream.nit:102 */
- REGB1 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 102);
- }
- REGB1 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- fra.me.REG[1] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 102);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ./../lib/standard//kernel.nit:216 */
- REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:102 */
- if (UNTAG_Bool(REGB0)) {
- /* ./../lib/standard//stream.nit:103 */
- REGB0 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:219 */
- REGB0 = TAG_Int(-UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:103 */
- goto label1;
- }
- /* ./../lib/standard//stream.nit:105 */
- fra.me.REG[1] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB1 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 105);
- }
- REGB1 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 105);
- }
- REGB1 = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB1);
- /* ./../lib/standard//stream.nit:106 */
- REGB2 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- REGB3 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:218 */
- REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:106 */
- ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB3;
- /* ./../lib/standard//kernel.nit:385 */
- REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
- /* ./../lib/standard//stream.nit:107 */
- REGB0 = REGB1;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-val_t standard___stream___BufferedIStream___read(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t REGB4;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 110;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___read;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[3] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:112 */
- fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB0);
- /* ./../lib/standard//stream.nit:113 */
- REGB1 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 113);
- }
- REGB1 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:114 */
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 114);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- /* ./../lib/standard//stream.nit:115 */
- while(1) {
- REGB3 = TAG_Int(0);
- /* ./../lib/standard//kernel.nit:217 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:115 */
- if (UNTAG_Bool(REGB3)) {
- /* ./../lib/standard//kernel.nit:216 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:116 */
- if (UNTAG_Bool(REGB3)) {
- /* ./../lib/standard//stream.nit:117 */
- CALL_standard___stream___BufferedIStream___fill_buffer(fra.me.REG[0])(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:118 */
- REGB3 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- if (UNTAG_Bool(REGB3)) {
- fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- goto label1;
- }
- /* ./../lib/standard//stream.nit:119 */
- REGB3 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 119);
- }
- REGB3 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- REGB1 = REGB3;
- /* ./../lib/standard//stream.nit:120 */
- fra.me.REG[3] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB3 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 120);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[3]);
- /* ./../lib/standard//stream.nit:120 */
- REGB2 = REGB3;
- }
- /* ./../lib/standard//stream.nit:122 */
- while(1) {
- /* ./../lib/standard//kernel.nit:215 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:122 */
- if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Int(0);
- /* ./../lib/standard//kernel.nit:217 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB3));
- } else {
- /* ./../lib/standard//stream.nit:122 */
- REGB4 = TAG_Bool(false);
- REGB3 = REGB4;
- }
- if (UNTAG_Bool(REGB3)) {
- /* ./../lib/standard//stream.nit:123 */
- fra.me.REG[3] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB3 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 123);
- }
- REGB3 = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[3])(fra.me.REG[3], REGB1);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB3);
- /* ./../lib/standard//stream.nit:124 */
- REGB3 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:218 */
- REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:124 */
- REGB1 = REGB3;
- /* ./../lib/standard//stream.nit:125 */
- REGB3 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:220 */
- REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:125 */
- REGB0 = REGB3;
- } else {
- /* ./../lib/standard//stream.nit:122 */
- goto label2;
- }
- }
- label2: while(0);
- } else {
- /* ./../lib/standard//stream.nit:115 */
- goto label3;
- }
- }
- label3: while(0);
- /* ./../lib/standard//stream.nit:128 */
- ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB1;
- /* ./../lib/standard//stream.nit:129 */
- fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[2] = fra.me.REG[1];
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-val_t standard___stream___BufferedIStream___read_all(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 132;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___read_all;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:134 */
- fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___init();
- /* ./../lib/standard//stream.nit:135 */
- while(1) {
- REGB0 = CALL_standard___stream___IStream___eof(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- /* ./../lib/standard//stream.nit:136 */
- REGB0 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 136);
- }
- REGB0 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:137 */
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 137);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- /* ./../lib/standard//stream.nit:138 */
- while(1) {
- /* ./../lib/standard//kernel.nit:215 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:138 */
- if (UNTAG_Bool(REGB2)) {
- /* ./../lib/standard//stream.nit:139 */
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 139);
- }
- REGB2 = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB0);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB2);
- /* ./../lib/standard//stream.nit:140 */
- REGB2 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:218 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:140 */
- REGB0 = REGB2;
- } else {
- /* ./../lib/standard//stream.nit:138 */
- goto label1;
- }
- }
- label1: while(0);
- /* ./../lib/standard//stream.nit:142 */
- ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB0;
- /* ./../lib/standard//stream.nit:143 */
- CALL_standard___stream___BufferedIStream___fill_buffer(fra.me.REG[0])(fra.me.REG[0]);
- } else {
- /* ./../lib/standard//stream.nit:135 */
- goto label2;
- }
- }
- label2: while(0);
- /* ./../lib/standard//stream.nit:145 */
- fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-void standard___stream___BufferedIStream___append_line_to(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 148;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___append_line_to;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* ./../lib/standard//stream.nit:150 */
- while(1) {
- /* ./../lib/standard//stream.nit:152 */
- REGB0 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 152);
- }
- REGB0 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:153 */
- while(1) {
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 153);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- /* ./../lib/standard//kernel.nit:215 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:153 */
- if (UNTAG_Bool(REGB1)) {
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 153);
- }
- REGB1 = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB0);
- REGB2 = TAG_Char('\n');
- REGB3 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB2));
- if (UNTAG_Bool(REGB3)) {
- } else {
- /* ./../lib/standard//kernel.nit:350 */
- REGB2 = TAG_Bool((REGB1)==(REGB2));
- /* ./../lib/standard//stream.nit:153 */
- REGB3 = REGB2;
- }
- REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
- } else {
- REGB2 = TAG_Bool(false);
- REGB3 = REGB2;
- }
- if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:218 */
- REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:153 */
- REGB0 = REGB3;
- } else {
- goto label1;
- }
- }
- label1: while(0);
- /* ./../lib/standard//stream.nit:156 */
- REGB3 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 156);
- }
- REGB3 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- /* ./../lib/standard//kernel.nit:217 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:156 */
- if (UNTAG_Bool(REGB3)) {
- /* ./../lib/standard//collection//array.nit:23 */
- REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ./../lib/standard//kernel.nit:218 */
- REGB3 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:158 */
- REGB2 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 158);
- }
- REGB2 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- /* ./../lib/standard//kernel.nit:220 */
- REGB2 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:158 */
- CALL_standard___collection___array___AbstractArray___enlarge(fra.me.REG[1])(fra.me.REG[1], REGB2);
- /* ./../lib/standard//stream.nit:161 */
- REGB2 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 161);
- }
- REGB2 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- /* ./../lib/standard//stream.nit:162 */
- while(1) {
- /* ./../lib/standard//kernel.nit:215 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:162 */
- if (UNTAG_Bool(REGB3)) {
- /* ./../lib/standard//stream.nit:163 */
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 163);
- }
- REGB3 = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB2);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], REGB3);
- /* ./../lib/standard//stream.nit:164 */
- REGB3 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:218 */
- REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
- /* ./../lib/standard//stream.nit:164 */
- REGB2 = REGB3;
- } else {
- /* ./../lib/standard//stream.nit:162 */
- goto label2;
- }
- }
- label2: while(0);
- }
- /* ./../lib/standard//stream.nit:168 */
- fra.me.REG[2] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 168);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
- /* ./../lib/standard//kernel.nit:215 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:168 */
- if (UNTAG_Bool(REGB2)) {
- /* ./../lib/standard//stream.nit:170 */
- REGB2 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:218 */
- REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
- /* ./../lib/standard//stream.nit:170 */
- ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB2;
- /* ./../lib/standard//stream.nit:171 */
- goto label3;
- } else {
- /* ./../lib/standard//stream.nit:174 */
- ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB0;
- /* ./../lib/standard//stream.nit:175 */
- REGB0 = CALL_standard___stream___BufferedIStream___end_reached(fra.me.REG[0])(fra.me.REG[0]);
- if (UNTAG_Bool(REGB0)) {
- /* ./../lib/standard//stream.nit:176 */
- goto label3;
- } else {
- /* ./../lib/standard//stream.nit:178 */
- CALL_standard___stream___BufferedIStream___fill_buffer(fra.me.REG[0])(fra.me.REG[0]);
- }
- }
- }
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return;
-}
-val_t standard___stream___BufferedIStream___eof(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 184;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___eof;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:184 */
- REGB0 = TAG_Bool(ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_buffer_pos", LOCATE_standard___stream, 184);
- }
- REGB0 = ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]);
- fra.me.REG[1] = ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]);
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_standard___stream, 184);
- }
- /* ./../lib/standard//collection//array.nit:23 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ./../lib/standard//kernel.nit:216 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:184 */
- if (UNTAG_Bool(REGB1)) {
- REGB1 = CALL_standard___stream___BufferedIStream___end_reached(fra.me.REG[0])(fra.me.REG[0]);
- } else {
- REGB0 = TAG_Bool(false);
- REGB1 = REGB0;
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB1;
-}
-void standard___stream___BufferedIStream___fill_buffer(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 192;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___fill_buffer;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:192 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 192);
- stack_frame_head = fra.me.prev;
- return;
-}
-val_t standard___stream___BufferedIStream___end_reached(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 195;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___end_reached;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- /* ./../lib/standard//stream.nit:195 */
- nit_abort("Deferred method called", NULL, LOCATE_standard___stream, 195);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-void standard___stream___BufferedIStream___prepare_buffer(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 198;
- fra.me.meth = LOCATE_standard___stream___BufferedIStream___prepare_buffer;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:201 */
- fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB0);
- ATTR_standard___stream___BufferedIStream____buffer(fra.me.REG[0]) = fra.me.REG[1];
- /* ./../lib/standard//stream.nit:202 */
- REGB0 = TAG_Int(0);
- ATTR_standard___stream___BufferedIStream____buffer_pos(fra.me.REG[0]) = REGB0;
- stack_frame_head = fra.me.prev;
- return;
-}
-void standard___stream___FDStream___close(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 218;
- fra.me.meth = LOCATE_standard___stream___FDStream___close;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:218 */
- REGB0 = TAG_Bool(ATTR_standard___stream___FDStream____fd(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_fd", LOCATE_standard___stream, 218);
- }
- REGB0 = ATTR_standard___stream___FDStream____fd(fra.me.REG[0]);
- CALL_standard___stream___FDStream___native_close(fra.me.REG[0])(fra.me.REG[0], REGB0);
- stack_frame_head = fra.me.prev;
- return;
-}
-val_t standard___stream___FDStream___native_close(val_t p0, val_t p1){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 220;
- fra.me.meth = LOCATE_standard___stream___FDStream___native_close;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:220 */
- REGB0 = FDStream_native_close___out(fra.me.REG[0], REGB0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-val_t standard___stream___FDStream___native_read_char(val_t p0, val_t p1){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 221;
- fra.me.meth = LOCATE_standard___stream___FDStream___native_read_char;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:221 */
- REGB0 = FDStream_native_read_char___out(fra.me.REG[0], REGB0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-val_t standard___stream___FDStream___native_read(val_t p0, val_t p1, val_t p2, val_t p3){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 222;
- fra.me.meth = LOCATE_standard___stream___FDStream___native_read;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- fra.me.REG[1] = p2;
- REGB1 = p3;
- /* ./../lib/standard//stream.nit:222 */
- REGB1 = FDStream_native_read___out(fra.me.REG[0], REGB0, fra.me.REG[1], REGB1);
- stack_frame_head = fra.me.prev;
- return REGB1;
-}
-val_t standard___stream___FDStream___native_write(val_t p0, val_t p1, val_t p2, val_t p3){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 223;
- fra.me.meth = LOCATE_standard___stream___FDStream___native_write;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- fra.me.REG[1] = p2;
- REGB1 = p3;
- /* ./../lib/standard//stream.nit:223 */
- REGB1 = FDStream_native_write___out(fra.me.REG[0], REGB0, fra.me.REG[1], REGB1);
- stack_frame_head = fra.me.prev;
- return REGB1;
-}
-void standard___stream___FDStream___init(val_t p0, val_t p1, int* init_table){
- int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___stream___FDStream].i;
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- if (init_table[itpos1]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 225;
- fra.me.meth = LOCATE_standard___stream___FDStream___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:225 */
- fra.me.REG[1] = fra.me.REG[0];
- CALL_standard___stream___IOS___init(fra.me.REG[0])(fra.me.REG[0], init_table);
- ATTR_standard___stream___FDStream____fd(fra.me.REG[1]) = REGB0;
- stack_frame_head = fra.me.prev;
- init_table[itpos1] = 1;
- return;
-}
-val_t standard___stream___FDIStream___eof(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 231;
- fra.me.meth = LOCATE_standard___stream___FDIStream___eof;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:231 */
- REGB0 = TAG_Bool(ATTR_standard___stream___FDIStream____eof(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_eof", LOCATE_standard___stream, 231);
- }
- REGB0 = ATTR_standard___stream___FDIStream____eof(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-val_t standard___stream___FDIStream___read_char(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 233;
- fra.me.meth = LOCATE_standard___stream___FDIStream___read_char;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:235 */
- REGB0 = TAG_Bool(ATTR_standard___stream___FDStream____fd(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_fd", LOCATE_standard___stream, 235);
- }
- REGB0 = ATTR_standard___stream___FDStream____fd(fra.me.REG[0]);
- REGB0 = CALL_standard___stream___FDStream___native_read_char(fra.me.REG[0])(fra.me.REG[0], REGB0);
- /* ./../lib/standard//stream.nit:236 */
- REGB1 = TAG_Int(1);
- /* ./../lib/standard//kernel.nit:219 */
- REGB1 = TAG_Int(-UNTAG_Int(REGB1));
- /* ./../lib/standard//stream.nit:236 */
- REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- if (UNTAG_Bool(REGB2)) {
- } else {
- /* ./../lib/standard//kernel.nit:210 */
- REGB1 = TAG_Bool((REGB0)==(REGB1));
- /* ./../lib/standard//stream.nit:236 */
- REGB2 = REGB1;
- }
- if (UNTAG_Bool(REGB2)) {
- REGB2 = TAG_Bool(true);
- ATTR_standard___stream___FDIStream____eof(fra.me.REG[0]) = REGB2;
- }
- /* ./../lib/standard//stream.nit:237 */
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-void standard___stream___FDIStream___init(val_t p0, val_t p1, int* init_table){
- int itpos2 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___stream___FDIStream].i;
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- if (init_table[itpos2]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 240;
- fra.me.meth = LOCATE_standard___stream___FDIStream___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:240 */
- CALL_standard___stream___FDStream___init(fra.me.REG[0])(fra.me.REG[0], REGB0, init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos2] = 1;
- return;
-}
-val_t standard___stream___FDOStream___is_writable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 246;
- fra.me.meth = LOCATE_standard___stream___FDOStream___is_writable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* ./../lib/standard//stream.nit:246 */
- REGB0 = TAG_Bool(ATTR_standard___stream___FDOStream____is_writable(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_is_writable", LOCATE_standard___stream, 246);
- }
- REGB0 = ATTR_standard___stream___FDOStream____is_writable(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-void standard___stream___FDOStream___write(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 248;
- fra.me.meth = LOCATE_standard___stream___FDOStream___write;
- fra.me.has_broke = 0;
- fra.me.REG_size = 3;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[2] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* ./../lib/standard//stream.nit:250 */
- REGB0 = TAG_Bool(ATTR_standard___stream___FDStream____fd(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_fd", LOCATE_standard___stream, 250);
- }
- REGB0 = ATTR_standard___stream___FDStream____fd(fra.me.REG[0]);
- fra.me.REG[2] = CALL_standard___string___String___to_cstring(fra.me.REG[1])(fra.me.REG[1]);
- /* ./../lib/standard//collection//array.nit:23 */
- REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ./../lib/standard//stream.nit:250 */
- REGB1 = CALL_standard___stream___FDStream___native_write(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[2], REGB1);
- /* ./../lib/standard//collection//array.nit:23 */
- REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 23);
- }
- REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
- /* ./../lib/standard//kernel.nit:215 */
- REGB0 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
- /* ./../lib/standard//stream.nit:251 */
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(false);
- ATTR_standard___stream___FDOStream____is_writable(fra.me.REG[0]) = REGB0;
- }
- stack_frame_head = fra.me.prev;
- return;
-}
-void standard___stream___FDOStream___init(val_t p0, val_t p1, int* init_table){
- int itpos3 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___stream___FDOStream].i;
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- if (init_table[itpos3]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 254;
- fra.me.meth = LOCATE_standard___stream___FDOStream___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:254 */
- fra.me.REG[1] = fra.me.REG[0];
- CALL_standard___stream___FDStream___init(fra.me.REG[0])(fra.me.REG[0], REGB0, init_table);
- /* ./../lib/standard//stream.nit:256 */
- REGB0 = TAG_Bool(true);
- ATTR_standard___stream___FDOStream____is_writable(fra.me.REG[1]) = REGB0;
- stack_frame_head = fra.me.prev;
- init_table[itpos3] = 1;
- return;
-}
-void standard___stream___FDIOStream___init(val_t p0, val_t p1, int* init_table){
- int itpos4 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___stream___FDIOStream].i;
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- if (init_table[itpos4]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_standard___stream;
- fra.me.line = 264;
- fra.me.meth = LOCATE_standard___stream___FDIOStream___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- REGB0 = p1;
- /* ./../lib/standard//stream.nit:264 */
- fra.me.REG[1] = fra.me.REG[0];
- REGB1 = REGB0;
- CALL_standard___stream___FDIStream___init(fra.me.REG[0])(fra.me.REG[0], REGB0, init_table);
- CALL_standard___stream___FDOStream___init(fra.me.REG[0])(fra.me.REG[0], REGB0, init_table);
- /* ./../lib/standard//stream.nit:266 */
- ATTR_standard___stream___FDStream____fd(fra.me.REG[1]) = REGB1;
- /* ./../lib/standard//stream.nit:267 */
- REGB1 = TAG_Bool(true);
- ATTR_standard___stream___FDOStream____is_writable(fra.me.REG[1]) = REGB1;
- stack_frame_head = fra.me.prev;
- init_table[itpos4] = 1;
- return;
-}