/* This C file is generated by NIT to compile module exec. */
#include "exec._sep.h"
val_t exec___Process___id(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___id, 23};
+ struct trace_t trace = {NULL, NULL, 23, LOCATE_exec___Process___id};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable0 = ((exec___NativeProcess___id_t)CALL(variable0,COLOR_exec___NativeProcess___id))(variable0) /*NativeProcess::id*/;
goto return_label0;
return variable0;
}
val_t exec___Process___is_finished(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___is_finished, 26};
+ struct trace_t trace = {NULL, NULL, 26, LOCATE_exec___Process___is_finished};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable0 = ((exec___NativeProcess___is_finished_t)CALL(variable0,COLOR_exec___NativeProcess___is_finished))(variable0) /*NativeProcess::is_finished*/;
goto return_label1;
return variable0;
}
void exec___Process___wait(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___wait, 29};
+ struct trace_t trace = {NULL, NULL, 29, LOCATE_exec___Process___wait};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___Process____data( self) /*Process::_data*/;
((exec___NativeProcess___wait_t)CALL(variable0,COLOR_exec___NativeProcess___wait))(variable0) /*NativeProcess::wait*/;
variable0 = ((exec___Process___is_finished_t)CALL( self,COLOR_exec___Process___is_finished))( self) /*Process::is_finished*/;
- if (!UNTAG_Bool(variable0)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", "", LOCATE_exec___Process___wait, 33); nit_exit(1);}
+ if (!UNTAG_Bool(variable0)) { fprintf(stderr, "Assert%s failed", ""); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_exec___Process___wait, LOCATE_exec, 33); nit_exit(1);}
tracehead = trace.prev;
return;
}
val_t exec___Process___status(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___status, 36};
+ struct trace_t trace = {NULL, NULL, 36, LOCATE_exec___Process___status};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ((exec___Process___is_finished_t)CALL( self,COLOR_exec___Process___is_finished))( self) /*Process::is_finished*/;
- if (!UNTAG_Bool(variable0)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", "", LOCATE_exec___Process___status, 39); nit_exit(1);}
+ if (!UNTAG_Bool(variable0)) { fprintf(stderr, "Assert%s failed", ""); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_exec___Process___status, LOCATE_exec, 39); nit_exit(1);}
variable0 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable0 = ((exec___NativeProcess___status_t)CALL(variable0,COLOR_exec___NativeProcess___status))(variable0) /*NativeProcess::status*/;
goto return_label3;
return variable0;
}
void exec___Process___kill(val_t self, val_t param0) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___kill, 43};
+ struct trace_t trace = {NULL, NULL, 43, LOCATE_exec___Process___kill};
val_t variable0;
val_t variable1;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
variable1 = ATTR_exec___Process____data( self) /*Process::_data*/;
((exec___NativeProcess___kill_t)CALL(variable1,COLOR_exec___NativeProcess___kill))(variable1, variable0 /*signal*/) /*NativeProcess::kill*/;
return;
}
void exec___Process___term(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___term, 46};
+ struct trace_t trace = {NULL, NULL, 46, LOCATE_exec___Process___term};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
((exec___Process___kill_t)CALL( self,COLOR_exec___Process___kill))( self, TAG_Int(15)) /*Process::kill*/;
tracehead = trace.prev;
return;
}
void exec___Process___init(val_t self, val_t param0, val_t param1, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___init, 49};
+ struct trace_t trace = {NULL, NULL, 49, LOCATE_exec___Process___init};
val_t variable0;
val_t variable1;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
/* check if p<Array[String] with p:String */
- if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled (%s: %d)\n", LOCATE_exec___Process___term, 50); nit_exit(1); } /*cast Array[String]*/;
+ if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled"); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_exec___Process___term, LOCATE_exec, 50); nit_exit(1); } /*cast Array[String]*/;
variable1 = param1;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Process].i]) return;
((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(0), init_table /*YYY*/) /*Process::execute*/;
return;
}
void exec___Process___init_(val_t self, val_t param0, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___init_, 55};
+ struct trace_t trace = {NULL, NULL, 55, LOCATE_exec___Process___init_};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Process].i]) return;
((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(0), init_table /*YYY*/) /*Process::execute*/;
return;
}
void exec___Process___execute(val_t self, val_t param0, val_t param1, val_t param2, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___execute, 61};
+ struct trace_t trace = {NULL, NULL, 61, LOCATE_exec___Process___execute};
val_t variable0;
val_t variable1;
val_t variable2;
val_t variable5;
val_t variable6;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
variable1 = param1;
variable2 = param2;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_Process].i]) return;
- variable4 = NEW_string___String___init(); /*new String*/
+ variable4 = NEW_String_string___String___init(); /*new String*/
variable3 = variable4;
variable4 = TAG_Int(1);
((string___String___append_t)CALL( variable3 /*args*/,COLOR_abstract_collection___IndexedCollection___append))( variable3 /*args*/, variable0 /*command*/) /*String::append*/;
- variable5 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable1 /*arguments*/ == NIT_NULL /*null*/) || (( variable1 /*arguments*/ != NIT_NULL) && UNTAG_Bool(((array___AbstractArray_____eqeq_t)CALL( variable1 /*arguments*/,COLOR_kernel___Object_____eqeq))( variable1 /*arguments*/, NIT_NULL /*null*/) /*Array::==*/)))));
+ variable5 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable1 /*arguments*/ == NIT_NULL /*null*/) || (( variable1 /*arguments*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable1 /*arguments*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable1 /*arguments*/, NIT_NULL /*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable1 /*arguments*/,COLOR_kernel___Object_____eqeq))( variable1 /*arguments*/, NIT_NULL /*null*/) /*Object::==*/)))))));
if (UNTAG_Bool(variable5)) { /*if*/
- variable5 = ((array___AbstractArray___iterator_t)CALL( variable1 /*arguments*/,COLOR_abstract_collection___Collection___iterator))( variable1 /*arguments*/) /*Array::iterator*/;
+ variable5 = ((array___AbstractArray___iterator_t)CALL( variable1 /*arguments*/,COLOR_abstract_collection___Collection___iterator))( variable1 /*arguments*/) /*AbstractArray::iterator*/;
while (true) { /*for*/
variable6 = ((array___ArrayIterator___is_ok_t)CALL(variable5,COLOR_abstract_collection___Iterator___is_ok))(variable5) /*ArrayIterator::is_ok*/;
if (!UNTAG_Bool(variable6)) break; /*for*/
((array___ArrayIterator___next_t)CALL(variable5,COLOR_abstract_collection___Iterator___next))(variable5) /*ArrayIterator::next*/;
}
break_9: while(0);
- variable5 = ((array___AbstractArray___length_t)CALL( variable1 /*arguments*/,COLOR_abstract_collection___Collection___length))( variable1 /*arguments*/) /*Array::length*/;
+ variable5 = ((array___AbstractArray___length_t)CALL( variable1 /*arguments*/,COLOR_abstract_collection___Collection___length))( variable1 /*arguments*/) /*AbstractArray::length*/;
variable4 = TAG_Int(UNTAG_Int(variable4)+UNTAG_Int(variable5)) /*l*/;
}
variable5 = ((string___String___to_cstring_t)CALL( variable0 /*command*/,COLOR_string___String___to_cstring))( variable0 /*command*/) /*String::to_cstring*/;
return;
}
val_t exec___Process___basic_exec_execute(val_t self, val_t param0, val_t param1, val_t param2, val_t param3) {
- struct trace_t trace = {NULL, LOCATE_exec___Process___basic_exec_execute, 78};
+ struct trace_t trace = {NULL, NULL, 78, LOCATE_exec___Process___basic_exec_execute};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return BOX_NativeProcess(exec_Process_Process_basic_exec_execute_4( self, UNBOX_NativeString( param0), UNBOX_NativeString( param1), UNTAG_Int( param2), UNTAG_Int( param3)));
}
void exec___IProcess___close(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___IProcess___close, 87};
+ struct trace_t trace = {NULL, NULL, 87, LOCATE_exec___IProcess___close};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___IProcess____in( self) /*IProcess::_in*/;
- ((stream___FDStream___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*FDIStream::close*/;
+ ((stream___FDStream___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*FDStream::close*/;
tracehead = trace.prev;
return;
}
val_t exec___IProcess___read_char(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___IProcess___read_char, 89};
+ struct trace_t trace = {NULL, NULL, 89, LOCATE_exec___IProcess___read_char};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___IProcess____in( self) /*IProcess::_in*/;
variable0 = ((stream___FDIStream___read_char_t)CALL(variable0,COLOR_stream___IStream___read_char))(variable0) /*FDIStream::read_char*/;
goto return_label11;
return variable0;
}
val_t exec___IProcess___eof(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___IProcess___eof, 91};
+ struct trace_t trace = {NULL, NULL, 91, LOCATE_exec___IProcess___eof};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___IProcess____in( self) /*IProcess::_in*/;
variable0 = ((stream___FDIStream___eof_t)CALL(variable0,COLOR_stream___IStream___eof))(variable0) /*FDIStream::eof*/;
goto return_label12;
return variable0;
}
void exec___IProcess___init(val_t self, val_t param0, val_t param1, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___IProcess___init, 93};
+ struct trace_t trace = {NULL, NULL, 93, LOCATE_exec___IProcess___init};
val_t variable0;
val_t variable1;
val_t variable2;
val_t variable3;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
/* check if p<Array[String] with p:String */
- if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled (%s: %d)\n", LOCATE_exec___IProcess___eof, 93); nit_exit(1); } /*cast Array[String]*/;
+ if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled"); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_exec___IProcess___eof, LOCATE_exec, 93); nit_exit(1); } /*cast Array[String]*/;
variable1 = param1;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IProcess].i]) return;
- ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(2), init_table /*YYY*/) /*IProcess::execute*/;
- variable2 = ATTR_exec___Process____data( self) /*IProcess::_data*/;
+ ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(2), init_table /*YYY*/) /*Process::execute*/;
+ variable2 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable2 = ((exec___NativeProcess___out_fd_t)CALL(variable2,COLOR_exec___NativeProcess___out_fd))(variable2) /*NativeProcess::out_fd*/;
- variable3 = NEW_stream___FDIStream___init(variable2); /*new FDIStream*/
+ variable3 = NEW_FDIStream_stream___FDIStream___init(variable2); /*new FDIStream*/
variable2 = variable3;
ATTR_exec___IProcess____in( self) /*IProcess::_in*/ = variable2;
init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IProcess].i] = 1;
return;
}
void exec___IProcess___init_(val_t self, val_t param0, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___IProcess___init_, 99};
+ struct trace_t trace = {NULL, NULL, 99, LOCATE_exec___IProcess___init_};
val_t variable0;
val_t variable1;
val_t variable2;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IProcess].i]) return;
- ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(2), init_table /*YYY*/) /*IProcess::execute*/;
- variable1 = ATTR_exec___Process____data( self) /*IProcess::_data*/;
+ ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(2), init_table /*YYY*/) /*Process::execute*/;
+ variable1 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable1 = ((exec___NativeProcess___out_fd_t)CALL(variable1,COLOR_exec___NativeProcess___out_fd))(variable1) /*NativeProcess::out_fd*/;
- variable2 = NEW_stream___FDIStream___init(variable1); /*new FDIStream*/
+ variable2 = NEW_FDIStream_stream___FDIStream___init(variable1); /*new FDIStream*/
variable1 = variable2;
ATTR_exec___IProcess____in( self) /*IProcess::_in*/ = variable1;
init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IProcess].i] = 1;
return;
}
void exec___OProcess___close(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___OProcess___close, 112};
+ struct trace_t trace = {NULL, NULL, 112, LOCATE_exec___OProcess___close};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___OProcess____out( self) /*OProcess::_out*/;
- ((stream___IOS___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*OStream::close*/;
+ ((stream___IOS___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*IOS::close*/;
tracehead = trace.prev;
return;
}
val_t exec___OProcess___is_writable(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___OProcess___is_writable, 114};
+ struct trace_t trace = {NULL, NULL, 114, LOCATE_exec___OProcess___is_writable};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = ATTR_exec___OProcess____out( self) /*OProcess::_out*/;
variable0 = ((stream___OStream___is_writable_t)CALL(variable0,COLOR_stream___OStream___is_writable))(variable0) /*OStream::is_writable*/;
goto return_label16;
return variable0;
}
void exec___OProcess___write(val_t self, val_t param0) {
- struct trace_t trace = {NULL, LOCATE_exec___OProcess___write, 116};
+ struct trace_t trace = {NULL, NULL, 116, LOCATE_exec___OProcess___write};
val_t variable0;
val_t variable1;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
variable1 = ATTR_exec___OProcess____out( self) /*OProcess::_out*/;
((stream___OStream___write_t)CALL(variable1,COLOR_stream___OStream___write))(variable1, variable0 /*s*/) /*OStream::write*/;
return;
}
void exec___OProcess___init(val_t self, val_t param0, val_t param1, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___OProcess___init, 118};
+ struct trace_t trace = {NULL, NULL, 118, LOCATE_exec___OProcess___init};
val_t variable0;
val_t variable1;
val_t variable2;
val_t variable3;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
/* check if p<Array[String] with p:String */
- if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled (%s: %d)\n", LOCATE_exec___OProcess___write, 118); nit_exit(1); } /*cast Array[String]*/;
+ if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled"); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_exec___OProcess___write, LOCATE_exec, 118); nit_exit(1); } /*cast Array[String]*/;
variable1 = param1;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_OProcess].i]) return;
- ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(1), init_table /*YYY*/) /*OProcess::execute*/;
- variable2 = ATTR_exec___Process____data( self) /*OProcess::_data*/;
+ ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(1), init_table /*YYY*/) /*Process::execute*/;
+ variable2 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable2 = ((exec___NativeProcess___in_fd_t)CALL(variable2,COLOR_exec___NativeProcess___in_fd))(variable2) /*NativeProcess::in_fd*/;
- variable3 = NEW_stream___FDOStream___init(variable2); /*new FDOStream*/
+ variable3 = NEW_FDOStream_stream___FDOStream___init(variable2); /*new FDOStream*/
variable2 = variable3;
ATTR_exec___OProcess____out( self) /*OProcess::_out*/ = variable2;
init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_OProcess].i] = 1;
return;
}
void exec___OProcess___init_(val_t self, val_t param0, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___OProcess___init_, 124};
+ struct trace_t trace = {NULL, NULL, 124, LOCATE_exec___OProcess___init_};
val_t variable0;
val_t variable1;
val_t variable2;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_OProcess].i]) return;
- ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(1), init_table /*YYY*/) /*OProcess::execute*/;
- variable1 = ATTR_exec___Process____data( self) /*OProcess::_data*/;
+ ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(1), init_table /*YYY*/) /*Process::execute*/;
+ variable1 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable1 = ((exec___NativeProcess___in_fd_t)CALL(variable1,COLOR_exec___NativeProcess___in_fd))(variable1) /*NativeProcess::in_fd*/;
- variable2 = NEW_stream___FDOStream___init(variable1); /*new FDOStream*/
+ variable2 = NEW_FDOStream_stream___FDOStream___init(variable1); /*new FDOStream*/
variable1 = variable2;
ATTR_exec___OProcess____out( self) /*OProcess::_out*/ = variable1;
init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_OProcess].i] = 1;
return;
}
void exec___IOProcess___close(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___IOProcess___close, 137};
+ struct trace_t trace = {NULL, NULL, 137, LOCATE_exec___IOProcess___close};
val_t variable0;
trace.prev = tracehead; tracehead = &trace;
- variable0 = ATTR_exec___IProcess____in( self) /*IOProcess::_in*/;
- ((stream___FDStream___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*FDIStream::close*/;
- variable0 = ATTR_exec___OProcess____out( self) /*IOProcess::_out*/;
- ((stream___IOS___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*OStream::close*/;
+ trace.file = LOCATE_exec;
+ variable0 = ATTR_exec___IProcess____in( self) /*IProcess::_in*/;
+ ((stream___FDStream___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*FDStream::close*/;
+ variable0 = ATTR_exec___OProcess____out( self) /*OProcess::_out*/;
+ ((stream___IOS___close_t)CALL(variable0,COLOR_stream___IOS___close))(variable0) /*IOS::close*/;
tracehead = trace.prev;
return;
}
void exec___IOProcess___init(val_t self, val_t param0, val_t param1, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___IOProcess___init, 143};
+ struct trace_t trace = {NULL, NULL, 143, LOCATE_exec___IOProcess___init};
val_t variable0;
val_t variable1;
val_t variable2;
val_t variable3;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
/* check if p<Array[String] with p:String */
- if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled (%s: %d)\n", LOCATE_exec___IOProcess___close, 143); nit_exit(1); } /*cast Array[String]*/;
+ if (( param1!=NIT_NULL) && !VAL_ISA( param1, COLOR_Array, ID_Array)) { fprintf(stderr, "Cast failled"); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_exec___IOProcess___close, LOCATE_exec, 143); nit_exit(1); } /*cast Array[String]*/;
variable1 = param1;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IOProcess].i]) return;
- ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(3), init_table /*YYY*/) /*IOProcess::execute*/;
+ ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, variable1 /*arguments*/, TAG_Int(3), init_table /*YYY*/) /*Process::execute*/;
((exec___IProcess___init_t)CALL( self,COLOR_exec___IProcess___init))( self, param0, param1, init_table /*YYY*/) /*IProcess::init*/;
((exec___OProcess___init_t)CALL( self,COLOR_exec___OProcess___init))( self, param0, param1, init_table /*YYY*/) /*OProcess::init*/;
- variable2 = ATTR_exec___Process____data( self) /*IOProcess::_data*/;
+ variable2 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable2 = ((exec___NativeProcess___out_fd_t)CALL(variable2,COLOR_exec___NativeProcess___out_fd))(variable2) /*NativeProcess::out_fd*/;
- variable3 = NEW_stream___FDIStream___init(variable2); /*new FDIStream*/
+ variable3 = NEW_FDIStream_stream___FDIStream___init(variable2); /*new FDIStream*/
variable2 = variable3;
- ATTR_exec___IProcess____in( self) /*IOProcess::_in*/ = variable2;
- variable2 = ATTR_exec___Process____data( self) /*IOProcess::_data*/;
+ ATTR_exec___IProcess____in( self) /*IProcess::_in*/ = variable2;
+ variable2 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable2 = ((exec___NativeProcess___in_fd_t)CALL(variable2,COLOR_exec___NativeProcess___in_fd))(variable2) /*NativeProcess::in_fd*/;
- variable3 = NEW_stream___FDOStream___init(variable2); /*new FDOStream*/
+ variable3 = NEW_FDOStream_stream___FDOStream___init(variable2); /*new FDOStream*/
variable2 = variable3;
- ATTR_exec___OProcess____out( self) /*IOProcess::_out*/ = variable2;
+ ATTR_exec___OProcess____out( self) /*OProcess::_out*/ = variable2;
init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IOProcess].i] = 1;
tracehead = trace.prev;
return;
}
void exec___IOProcess___init_(val_t self, val_t param0, int* init_table) {
- struct trace_t trace = {NULL, LOCATE_exec___IOProcess___init_, 150};
+ struct trace_t trace = {NULL, NULL, 150, LOCATE_exec___IOProcess___init_};
val_t variable0;
val_t variable1;
val_t variable2;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IOProcess].i]) return;
- ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(3), init_table /*YYY*/) /*IOProcess::execute*/;
+ ((exec___Process___execute_t)CALL( self,COLOR_exec___Process___execute))( self, variable0 /*command*/, NIT_NULL /*null*/, TAG_Int(3), init_table /*YYY*/) /*Process::execute*/;
((exec___IProcess___init__t)CALL( self,COLOR_exec___IProcess___init_))( self, param0, init_table /*YYY*/) /*IProcess::init_*/;
((exec___OProcess___init__t)CALL( self,COLOR_exec___OProcess___init_))( self, param0, init_table /*YYY*/) /*OProcess::init_*/;
- variable1 = ATTR_exec___Process____data( self) /*IOProcess::_data*/;
+ variable1 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable1 = ((exec___NativeProcess___out_fd_t)CALL(variable1,COLOR_exec___NativeProcess___out_fd))(variable1) /*NativeProcess::out_fd*/;
- variable2 = NEW_stream___FDIStream___init(variable1); /*new FDIStream*/
+ variable2 = NEW_FDIStream_stream___FDIStream___init(variable1); /*new FDIStream*/
variable1 = variable2;
- ATTR_exec___IProcess____in( self) /*IOProcess::_in*/ = variable1;
- variable1 = ATTR_exec___Process____data( self) /*IOProcess::_data*/;
+ ATTR_exec___IProcess____in( self) /*IProcess::_in*/ = variable1;
+ variable1 = ATTR_exec___Process____data( self) /*Process::_data*/;
variable1 = ((exec___NativeProcess___in_fd_t)CALL(variable1,COLOR_exec___NativeProcess___in_fd))(variable1) /*NativeProcess::in_fd*/;
- variable2 = NEW_stream___FDOStream___init(variable1); /*new FDOStream*/
+ variable2 = NEW_FDOStream_stream___FDOStream___init(variable1); /*new FDOStream*/
variable1 = variable2;
- ATTR_exec___OProcess____out( self) /*IOProcess::_out*/ = variable1;
+ ATTR_exec___OProcess____out( self) /*OProcess::_out*/ = variable1;
init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_IOProcess].i] = 1;
tracehead = trace.prev;
return;
}
val_t exec___Sys___system(val_t self, val_t param0) {
- struct trace_t trace = {NULL, LOCATE_exec___Sys___system, 159};
+ struct trace_t trace = {NULL, NULL, 159, LOCATE_exec___Sys___system};
val_t variable0;
val_t variable1;
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
variable0 = param0;
variable1 = ((string___String___to_cstring_t)CALL( variable0 /*command*/,COLOR_string___String___to_cstring))( variable0 /*command*/) /*String::to_cstring*/;
variable1 = ((exec___NativeString___system_t)CALL(variable1,COLOR_exec___NativeString___system))(variable1) /*NativeString::system*/;
return variable1;
}
val_t exec___NativeString___system(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeString___system, 167};
+ struct trace_t trace = {NULL, NULL, 167, LOCATE_exec___NativeString___system};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Int(string_NativeString_NativeString_system_0(UNBOX_NativeString( self)));
}
val_t exec___NativeProcess___id(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___id, 172};
+ struct trace_t trace = {NULL, NULL, 172, LOCATE_exec___NativeProcess___id};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Int(exec_NativeProcess_NativeProcess_id_0(UNBOX_NativeProcess( self)));
}
val_t exec___NativeProcess___is_finished(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___is_finished, 173};
+ struct trace_t trace = {NULL, NULL, 173, LOCATE_exec___NativeProcess___is_finished};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Bool(exec_NativeProcess_NativeProcess_is_finished_0(UNBOX_NativeProcess( self)));
}
val_t exec___NativeProcess___status(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___status, 174};
+ struct trace_t trace = {NULL, NULL, 174, LOCATE_exec___NativeProcess___status};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Int(exec_NativeProcess_NativeProcess_status_0(UNBOX_NativeProcess( self)));
}
void exec___NativeProcess___wait(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___wait, 175};
+ struct trace_t trace = {NULL, NULL, 175, LOCATE_exec___NativeProcess___wait};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
exec_NativeProcess_NativeProcess_wait_0(UNBOX_NativeProcess( self));
tracehead = trace.prev;
return;
}
void exec___NativeProcess___kill(val_t self, val_t param0) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___kill, 176};
+ struct trace_t trace = {NULL, NULL, 176, LOCATE_exec___NativeProcess___kill};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
exec_NativeProcess_NativeProcess_kill_1(UNBOX_NativeProcess( self), UNTAG_Int( param0));
tracehead = trace.prev;
return;
}
val_t exec___NativeProcess___in_fd(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___in_fd, 178};
+ struct trace_t trace = {NULL, NULL, 178, LOCATE_exec___NativeProcess___in_fd};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Int(exec_NativeProcess_NativeProcess_in_fd_0(UNBOX_NativeProcess( self)));
}
val_t exec___NativeProcess___out_fd(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___out_fd, 179};
+ struct trace_t trace = {NULL, NULL, 179, LOCATE_exec___NativeProcess___out_fd};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Int(exec_NativeProcess_NativeProcess_out_fd_0(UNBOX_NativeProcess( self)));
}
val_t exec___NativeProcess___err_fd(val_t self) {
- struct trace_t trace = {NULL, LOCATE_exec___NativeProcess___err_fd, 180};
+ struct trace_t trace = {NULL, NULL, 180, LOCATE_exec___NativeProcess___err_fd};
trace.prev = tracehead; tracehead = &trace;
+ trace.file = LOCATE_exec;
tracehead = trace.prev;
return TAG_Int(exec_NativeProcess_NativeProcess_err_fd_0(UNBOX_NativeProcess( self)));
}
nitlanguage / nit.git / blobdiff