X-Git-Url: http://nitlanguage.org diff --git a/c_src/nitc._sep.c b/c_src/nitc._sep.c index d76c3d2..fd0f8f6 100644 --- a/c_src/nitc._sep.c +++ b/c_src/nitc._sep.c @@ -1,212 +1,222 @@ /* This C file is generated by NIT to compile module nitc. */ #include "nitc._sep.h" +static const char LOCATE_nitc___NitCompiler___opt_output[] = "nitc::NitCompiler::opt_output"; val_t nitc___NitCompiler___opt_output(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_nitc; - fra.me.line = 32; + fra.me.line = 33; fra.me.meth = LOCATE_nitc___NitCompiler___opt_output; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:32 */ + /* nitc.nit:33 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_output(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_output", LOCATE_nitc, 32); + nit_abort("Uninitialized attribute %s", "_opt_output", LOCATE_nitc, 33); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_output(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_boost[] = "nitc::NitCompiler::opt_boost"; val_t nitc___NitCompiler___opt_boost(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_nitc; - fra.me.line = 33; + fra.me.line = 34; fra.me.meth = LOCATE_nitc___NitCompiler___opt_boost; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:33 */ + /* nitc.nit:34 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_boost(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_boost", LOCATE_nitc, 33); + nit_abort("Uninitialized attribute %s", "_opt_boost", LOCATE_nitc, 34); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_boost(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_no_cc[] = "nitc::NitCompiler::opt_no_cc"; val_t nitc___NitCompiler___opt_no_cc(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_nitc; - fra.me.line = 34; + fra.me.line = 35; fra.me.meth = LOCATE_nitc___NitCompiler___opt_no_cc; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:34 */ + /* nitc.nit:35 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_no_cc(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_no_cc", LOCATE_nitc, 34); + nit_abort("Uninitialized attribute %s", "_opt_no_cc", LOCATE_nitc, 35); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_no_cc(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_cc_no_link[] = "nitc::NitCompiler::opt_cc_no_link"; val_t nitc___NitCompiler___opt_cc_no_link(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_nitc; - fra.me.line = 35; + fra.me.line = 36; fra.me.meth = LOCATE_nitc___NitCompiler___opt_cc_no_link; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:35 */ + /* nitc.nit:36 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_cc_no_link(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_cc_no_link", LOCATE_nitc, 35); + nit_abort("Uninitialized attribute %s", "_opt_cc_no_link", LOCATE_nitc, 36); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_cc_no_link(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_clibdir[] = "nitc::NitCompiler::opt_clibdir"; val_t nitc___NitCompiler___opt_clibdir(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_nitc; - fra.me.line = 36; + fra.me.line = 37; fra.me.meth = LOCATE_nitc___NitCompiler___opt_clibdir; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:36 */ + /* nitc.nit:37 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_clibdir(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_clibdir", LOCATE_nitc, 36); + nit_abort("Uninitialized attribute %s", "_opt_clibdir", LOCATE_nitc, 37); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_clibdir(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_bindir[] = "nitc::NitCompiler::opt_bindir"; val_t nitc___NitCompiler___opt_bindir(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_nitc; - fra.me.line = 37; + fra.me.line = 38; fra.me.meth = LOCATE_nitc___NitCompiler___opt_bindir; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:37 */ + /* nitc.nit:38 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_bindir(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_bindir", LOCATE_nitc, 37); + nit_abort("Uninitialized attribute %s", "_opt_bindir", LOCATE_nitc, 38); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_bindir(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_compdir[] = "nitc::NitCompiler::opt_compdir"; val_t nitc___NitCompiler___opt_compdir(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_nitc; - fra.me.line = 38; + fra.me.line = 39; fra.me.meth = LOCATE_nitc___NitCompiler___opt_compdir; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:38 */ + /* nitc.nit:39 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_compdir(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_compdir", LOCATE_nitc, 38); + nit_abort("Uninitialized attribute %s", "_opt_compdir", LOCATE_nitc, 39); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_compdir(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_extension_prefix[] = "nitc::NitCompiler::opt_extension_prefix"; val_t nitc___NitCompiler___opt_extension_prefix(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_nitc; - fra.me.line = 39; + fra.me.line = 40; fra.me.meth = LOCATE_nitc___NitCompiler___opt_extension_prefix; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:39 */ + /* nitc.nit:40 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_extension_prefix(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_extension_prefix", LOCATE_nitc, 39); + nit_abort("Uninitialized attribute %s", "_opt_extension_prefix", LOCATE_nitc, 40); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_extension_prefix(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___opt_output_format[] = "nitc::NitCompiler::opt_output_format"; val_t nitc___NitCompiler___opt_output_format(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_nitc; - fra.me.line = 40; + fra.me.line = 41; fra.me.meth = LOCATE_nitc___NitCompiler___opt_output_format; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:40 */ + /* nitc.nit:41 */ REGB0 = TAG_Bool(ATTR_nitc___NitCompiler____opt_output_format(fra.me.REG[0])!=NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { - nit_abort("Uninitialized attribute %s", "_opt_output_format", LOCATE_nitc, 40); + nit_abort("Uninitialized attribute %s", "_opt_output_format", LOCATE_nitc, 41); } fra.me.REG[0] = ATTR_nitc___NitCompiler____opt_output_format(fra.me.REG[0]); stack_frame_head = fra.me.prev; return fra.me.REG[0]; } +static const char LOCATE_nitc___NitCompiler___init[] = "nitc::NitCompiler::init"; void nitc___NitCompiler___init(val_t p0, int* init_table){ int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_nitc___NitCompiler].i; struct {struct stack_frame_t me; val_t MORE_REG[3];} fra; @@ -216,7 +226,7 @@ void nitc___NitCompiler___init(val_t p0, int* init_table){ if (init_table[itpos0]) return; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_nitc; - fra.me.line = 42; + fra.me.line = 43; fra.me.meth = LOCATE_nitc___NitCompiler___init; fra.me.has_broke = 0; fra.me.REG_size = 4; @@ -226,9 +236,9 @@ void nitc___NitCompiler___init(val_t p0, int* init_table){ fra.me.REG[2] = NIT_NULL; fra.me.REG[3] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:42 */ + /* nitc.nit:43 */ fra.me.REG[1] = fra.me.REG[0]; - /* nitc.nit:44 */ + /* nitc.nit:45 */ if (!once_value_1) { fra.me.REG[2] = BOX_NativeString("nitc"); REGB0 = TAG_Int(4); @@ -238,7 +248,7 @@ void nitc___NitCompiler___init(val_t p0, int* init_table){ } else fra.me.REG[2] = once_value_1; fra.me.REG[2] = fra.me.REG[2]; CALL_abstracttool___AbstractCompiler___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2], init_table); - /* nitc.nit:45 */ + /* nitc.nit:46 */ fra.me.REG[2] = CALL_toolcontext___ToolContext___option_context(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Int(11); fra.me.REG[0] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0); @@ -271,6 +281,7 @@ void nitc___NitCompiler___init(val_t p0, int* init_table){ init_table[itpos0] = 1; return; } +static const char LOCATE_nitc___NitCompiler___process_options[] = "nitc::NitCompiler::(toolcontext::ToolContext::process_options)"; void nitc___NitCompiler___process_options(val_t p0){ struct {struct stack_frame_t me; val_t MORE_REG[3];} fra; val_t REGB0; @@ -279,24 +290,21 @@ void nitc___NitCompiler___process_options(val_t p0){ static val_t once_value_1; /* Once value */ static val_t once_value_2; /* Once value */ static val_t once_value_3; /* Once value */ - static val_t once_value_4; /* Once value */ - static val_t once_value_5; /* Once value */ + static val_t once_value_4; /* Once value */ + static val_t once_value_5; /* Once value */ static val_t once_value_6; /* Once value */ static val_t once_value_7; /* Once value */ static val_t once_value_8; /* Once value */ static val_t once_value_9; /* Once value */ - static val_t once_value_10; /* Once value */ + static val_t once_value_10; /* Once value */ static val_t once_value_11; /* Once value */ - static val_t once_value_12; /* Once value */ + static val_t once_value_12; /* Once value */ static val_t once_value_13; /* Once value */ static val_t once_value_14; /* Once value */ static val_t once_value_15; /* Once value */ - static val_t once_value_16; /* Once value */ - static val_t once_value_17; /* Once value */ - static val_t once_value_18; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_nitc; - fra.me.line = 48; + fra.me.line = 49; fra.me.meth = LOCATE_nitc___NitCompiler___process_options; fra.me.has_broke = 0; fra.me.REG_size = 4; @@ -306,52 +314,52 @@ void nitc___NitCompiler___process_options(val_t p0){ fra.me.REG[2] = NIT_NULL; fra.me.REG[3] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:48 */ + /* nitc.nit:49 */ fra.me.REG[1] = fra.me.REG[0]; - /* nitc.nit:50 */ - CALL_SUPER_nitc___NitCompiler___process_options(fra.me.REG[0])(fra.me.REG[0]); /* nitc.nit:51 */ + CALL_SUPER_nitc___NitCompiler___process_options(fra.me.REG[0])(fra.me.REG[0]); + /* nitc.nit:52 */ fra.me.REG[0] = CALL_nitc___NitCompiler___opt_output(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___output_file__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:52 */ + /* nitc.nit:53 */ fra.me.REG[0] = CALL_nitc___NitCompiler___opt_boost(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___boost__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:53 */ + /* nitc.nit:54 */ fra.me.REG[0] = CALL_nitc___NitCompiler___opt_no_cc(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___no_cc__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:54 */ + /* nitc.nit:55 */ fra.me.REG[0] = CALL_nitc___NitCompiler___opt_cc_no_link(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); REGB0 = TAG_Bool(!UNTAG_Bool(fra.me.REG[0])); CALL_compiling___compiling_base___ToolContext___cc_link__eq(fra.me.REG[1])(fra.me.REG[1], REGB0); - /* nitc.nit:55 */ + /* nitc.nit:56 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___cc_lib_paths(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[2] = CALL_separate_options___ToolContext___opt_cc_lib_paths(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[2] = CALL_opts___Option___value(fra.me.REG[2])(fra.me.REG[2]); CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); - /* nitc.nit:56 */ + /* nitc.nit:57 */ fra.me.REG[2] = CALL_compiling___compiling_base___ToolContext___cc_libs(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_separate_options___ToolContext___opt_cc_libs(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); - /* nitc.nit:57 */ + /* nitc.nit:58 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___cc_include_paths(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[2] = CALL_separate_options___ToolContext___opt_cc_include_paths(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[2] = CALL_opts___Option___value(fra.me.REG[2])(fra.me.REG[2]); CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]); - /* nitc.nit:58 */ + /* nitc.nit:59 */ fra.me.REG[2] = CALL_nitc___NitCompiler___opt_extension_prefix(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[2] = CALL_opts___Option___value(fra.me.REG[2])(fra.me.REG[2]); - /* nitc.nit:59 */ + /* nitc.nit:60 */ REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL); @@ -372,18 +380,18 @@ void nitc___NitCompiler___process_options(val_t p0){ fra.me.REG[2] = fra.me.REG[2]; CALL_compiling___compiling_base___ToolContext___ext_prefix__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); } - /* nitc.nit:60 */ + /* nitc.nit:61 */ fra.me.REG[2] = CALL_nitc___NitCompiler___opt_compdir(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[2] = CALL_opts___Option___value(fra.me.REG[2])(fra.me.REG[2]); CALL_compiling___compiling_base___ToolContext___compdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); - /* nitc.nit:61 */ + /* nitc.nit:62 */ fra.me.REG[2] = CALL_compiling___compiling_base___ToolContext___compdir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL); @@ -391,37 +399,31 @@ void nitc___NitCompiler___process_options(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* nitc.nit:62 */ + /* nitc.nit:63 */ if (!once_value_2) { - if (!once_value_3) { - fra.me.REG[2] = BOX_NativeString("NIT_COMPDIR"); - REGB0 = TAG_Int(11); - fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0); - once_value_3 = fra.me.REG[2]; - register_static_object(&once_value_3); - } else fra.me.REG[2] = once_value_3; - fra.me.REG[2] = fra.me.REG[2]; - fra.me.REG[2] = CALL_standard___symbol___String___to_symbol(fra.me.REG[2])(fra.me.REG[2]); - fra.me.REG[2] = CALL_standard___environ___Symbol___environ(fra.me.REG[2])(fra.me.REG[2]); + fra.me.REG[2] = BOX_NativeString("NIT_COMPDIR"); + REGB0 = TAG_Int(11); + fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0); once_value_2 = fra.me.REG[2]; register_static_object(&once_value_2); } else fra.me.REG[2] = once_value_2; fra.me.REG[2] = fra.me.REG[2]; - /* nitc.nit:63 */ + fra.me.REG[2] = CALL_standard___environ___String___environ(fra.me.REG[2])(fra.me.REG[2]); + /* nitc.nit:64 */ REGB0 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[2])(fra.me.REG[2]); REGB0 = TAG_Bool(!UNTAG_Bool(REGB0)); if (UNTAG_Bool(REGB0)) { - /* nitc.nit:64 */ + /* nitc.nit:65 */ CALL_compiling___compiling_base___ToolContext___compdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); } - /* nitc.nit:66 */ + /* nitc.nit:67 */ fra.me.REG[2] = CALL_compiling___compiling_base___ToolContext___compdir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL); @@ -429,43 +431,43 @@ void nitc___NitCompiler___process_options(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* nitc.nit:67 */ - if (!once_value_4) { + /* nitc.nit:68 */ + if (!once_value_3) { fra.me.REG[2] = BOX_NativeString(".nit_compile"); REGB0 = TAG_Int(12); fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0); - once_value_4 = fra.me.REG[2]; - register_static_object(&once_value_4); - } else fra.me.REG[2] = once_value_4; + once_value_3 = fra.me.REG[2]; + register_static_object(&once_value_3); + } else fra.me.REG[2] = once_value_3; fra.me.REG[2] = fra.me.REG[2]; CALL_compiling___compiling_base___ToolContext___compdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); } } - /* nitc.nit:70 */ + /* nitc.nit:71 */ fra.me.REG[2] = CALL_compiling___compiling_base___ToolContext___compdir(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___ext_prefix(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_standard___string___String_____plus(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___compdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:71 */ + /* nitc.nit:72 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___compdir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { - nit_abort("Reciever is null", NULL, LOCATE_nitc, 71); + nit_abort("Reciever is null", NULL, LOCATE_nitc, 72); } fra.me.REG[0] = CALL_standard___file___String___simplify_path(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___compdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:73 */ + /* nitc.nit:74 */ fra.me.REG[0] = CALL_nitc___NitCompiler___opt_clibdir(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___clibdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:74 */ + /* nitc.nit:75 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___clibdir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL); @@ -473,96 +475,90 @@ void nitc___NitCompiler___process_options(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* nitc.nit:75 */ - if (!once_value_5) { - if (!once_value_6) { - fra.me.REG[0] = BOX_NativeString("NIT_DIR"); - REGB0 = TAG_Int(7); - fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); - once_value_6 = fra.me.REG[0]; - register_static_object(&once_value_6); - } else fra.me.REG[0] = once_value_6; - fra.me.REG[0] = fra.me.REG[0]; - fra.me.REG[0] = CALL_standard___symbol___String___to_symbol(fra.me.REG[0])(fra.me.REG[0]); - fra.me.REG[0] = CALL_standard___environ___Symbol___environ(fra.me.REG[0])(fra.me.REG[0]); - once_value_5 = fra.me.REG[0]; - register_static_object(&once_value_5); - } else fra.me.REG[0] = once_value_5; - fra.me.REG[0] = fra.me.REG[0]; /* nitc.nit:76 */ + if (!once_value_4) { + fra.me.REG[0] = BOX_NativeString("NIT_DIR"); + REGB0 = TAG_Int(7); + fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); + once_value_4 = fra.me.REG[0]; + register_static_object(&once_value_4); + } else fra.me.REG[0] = once_value_4; + fra.me.REG[0] = fra.me.REG[0]; + fra.me.REG[0] = CALL_standard___environ___String___environ(fra.me.REG[0])(fra.me.REG[0]); + /* nitc.nit:77 */ REGB0 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { - /* nitc.nit:77 */ + /* nitc.nit:78 */ REGB0 = TAG_Int(3); fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0); - if (!once_value_7) { + if (!once_value_5) { fra.me.REG[3] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_7 = fra.me.REG[3]; - register_static_object(&once_value_7); - } else fra.me.REG[3] = once_value_7; + once_value_5 = fra.me.REG[3]; + register_static_object(&once_value_5); + } else fra.me.REG[3] = once_value_5; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[3] = CALL_standard___kernel___Object___sys(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[3] = CALL_standard___string___Sys___program_name(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[3] = CALL_standard___file___String___dirname(fra.me.REG[3])(fra.me.REG[3]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); - if (!once_value_8) { + if (!once_value_6) { fra.me.REG[3] = BOX_NativeString("/../clib"); REGB0 = TAG_Int(8); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_8 = fra.me.REG[3]; - register_static_object(&once_value_8); - } else fra.me.REG[3] = once_value_8; + once_value_6 = fra.me.REG[3]; + register_static_object(&once_value_6); + } else fra.me.REG[3] = once_value_6; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[0] = fra.me.REG[2]; - /* nitc.nit:78 */ + /* nitc.nit:79 */ REGB0 = CALL_standard___file___String___file_exists(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { CALL_compiling___compiling_base___ToolContext___clibdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); } } else { - /* nitc.nit:80 */ + /* nitc.nit:81 */ REGB0 = TAG_Int(3); fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0); - if (!once_value_9) { + if (!once_value_7) { fra.me.REG[3] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_9 = fra.me.REG[3]; - register_static_object(&once_value_9); - } else fra.me.REG[3] = once_value_9; + once_value_7 = fra.me.REG[3]; + register_static_object(&once_value_7); + } else fra.me.REG[3] = once_value_7; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); - if (!once_value_10) { + if (!once_value_8) { fra.me.REG[3] = BOX_NativeString("/clib"); REGB0 = TAG_Int(5); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_10 = fra.me.REG[3]; - register_static_object(&once_value_10); - } else fra.me.REG[3] = once_value_10; + once_value_8 = fra.me.REG[3]; + register_static_object(&once_value_8); + } else fra.me.REG[3] = once_value_8; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[0] = fra.me.REG[2]; - /* nitc.nit:81 */ + /* nitc.nit:82 */ REGB0 = CALL_standard___file___String___file_exists(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { CALL_compiling___compiling_base___ToolContext___clibdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); } } - /* nitc.nit:83 */ + /* nitc.nit:84 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___clibdir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL); @@ -570,38 +566,38 @@ void nitc___NitCompiler___process_options(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* nitc.nit:84 */ - if (!once_value_11) { + /* nitc.nit:85 */ + if (!once_value_9) { fra.me.REG[0] = BOX_NativeString("Error: Cannot locate NIT C library directory. Uses --clibdir or envvar NIT_DIR."); REGB0 = TAG_Int(79); fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); - once_value_11 = fra.me.REG[0]; - register_static_object(&once_value_11); - } else fra.me.REG[0] = once_value_11; + once_value_9 = fra.me.REG[0]; + register_static_object(&once_value_9); + } else fra.me.REG[0] = once_value_9; fra.me.REG[0] = fra.me.REG[0]; CALL_toolcontext___ToolContext___fatal_error(fra.me.REG[1])(fra.me.REG[1], NIT_NULL, fra.me.REG[0]); } } - /* nitc.nit:87 */ + /* nitc.nit:88 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___clibdir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { - nit_abort("Reciever is null", NULL, LOCATE_nitc, 87); + nit_abort("Reciever is null", NULL, LOCATE_nitc, 88); } fra.me.REG[0] = CALL_standard___file___String___simplify_path(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___clibdir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:89 */ + /* nitc.nit:90 */ fra.me.REG[0] = CALL_nitc___NitCompiler___opt_bindir(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[0] = CALL_opts___Option___value(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___bindir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); - /* nitc.nit:90 */ + /* nitc.nit:91 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___bindir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL); @@ -609,96 +605,90 @@ void nitc___NitCompiler___process_options(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* nitc.nit:91 */ - if (!once_value_12) { - if (!once_value_13) { - fra.me.REG[0] = BOX_NativeString("NIT_DIR"); - REGB0 = TAG_Int(7); - fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); - once_value_13 = fra.me.REG[0]; - register_static_object(&once_value_13); - } else fra.me.REG[0] = once_value_13; - fra.me.REG[0] = fra.me.REG[0]; - fra.me.REG[0] = CALL_standard___symbol___String___to_symbol(fra.me.REG[0])(fra.me.REG[0]); - fra.me.REG[0] = CALL_standard___environ___Symbol___environ(fra.me.REG[0])(fra.me.REG[0]); - once_value_12 = fra.me.REG[0]; - register_static_object(&once_value_12); - } else fra.me.REG[0] = once_value_12; - fra.me.REG[0] = fra.me.REG[0]; /* nitc.nit:92 */ + if (!once_value_10) { + fra.me.REG[0] = BOX_NativeString("NIT_DIR"); + REGB0 = TAG_Int(7); + fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); + once_value_10 = fra.me.REG[0]; + register_static_object(&once_value_10); + } else fra.me.REG[0] = once_value_10; + fra.me.REG[0] = fra.me.REG[0]; + fra.me.REG[0] = CALL_standard___environ___String___environ(fra.me.REG[0])(fra.me.REG[0]); + /* nitc.nit:93 */ REGB0 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { - /* nitc.nit:93 */ + /* nitc.nit:94 */ REGB0 = TAG_Int(3); fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0); - if (!once_value_14) { + if (!once_value_11) { fra.me.REG[3] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_14 = fra.me.REG[3]; - register_static_object(&once_value_14); - } else fra.me.REG[3] = once_value_14; + once_value_11 = fra.me.REG[3]; + register_static_object(&once_value_11); + } else fra.me.REG[3] = once_value_11; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[3] = CALL_standard___kernel___Object___sys(fra.me.REG[1])(fra.me.REG[1]); fra.me.REG[3] = CALL_standard___string___Sys___program_name(fra.me.REG[3])(fra.me.REG[3]); fra.me.REG[3] = CALL_standard___file___String___dirname(fra.me.REG[3])(fra.me.REG[3]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); - if (!once_value_15) { + if (!once_value_12) { fra.me.REG[3] = BOX_NativeString("/../bin"); REGB0 = TAG_Int(7); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_15 = fra.me.REG[3]; - register_static_object(&once_value_15); - } else fra.me.REG[3] = once_value_15; + once_value_12 = fra.me.REG[3]; + register_static_object(&once_value_12); + } else fra.me.REG[3] = once_value_12; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[0] = fra.me.REG[2]; - /* nitc.nit:94 */ + /* nitc.nit:95 */ REGB0 = CALL_standard___file___String___file_exists(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { CALL_compiling___compiling_base___ToolContext___bindir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); } } else { - /* nitc.nit:96 */ + /* nitc.nit:97 */ REGB0 = TAG_Int(3); fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0); - if (!once_value_16) { + if (!once_value_13) { fra.me.REG[3] = BOX_NativeString(""); REGB0 = TAG_Int(0); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_16 = fra.me.REG[3]; - register_static_object(&once_value_16); - } else fra.me.REG[3] = once_value_16; + once_value_13 = fra.me.REG[3]; + register_static_object(&once_value_13); + } else fra.me.REG[3] = once_value_13; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); - if (!once_value_17) { + if (!once_value_14) { fra.me.REG[3] = BOX_NativeString("/bin"); REGB0 = TAG_Int(4); fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); - once_value_17 = fra.me.REG[3]; - register_static_object(&once_value_17); - } else fra.me.REG[3] = once_value_17; + once_value_14 = fra.me.REG[3]; + register_static_object(&once_value_14); + } else fra.me.REG[3] = once_value_14; fra.me.REG[3] = fra.me.REG[3]; CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[0] = fra.me.REG[2]; - /* nitc.nit:97 */ + /* nitc.nit:98 */ REGB0 = CALL_standard___file___String___file_exists(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB0)) { CALL_compiling___compiling_base___ToolContext___bindir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); } } - /* nitc.nit:99 */ + /* nitc.nit:100 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___bindir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - REGB1 = TAG_Bool(false); + REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL); @@ -706,29 +696,30 @@ void nitc___NitCompiler___process_options(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* nitc.nit:100 */ - if (!once_value_18) { + /* nitc.nit:101 */ + if (!once_value_15) { fra.me.REG[0] = BOX_NativeString("Error: Cannot locate NIT tools directory. Uses --bindir or envvar NIT_DIR."); REGB0 = TAG_Int(74); fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); - once_value_18 = fra.me.REG[0]; - register_static_object(&once_value_18); - } else fra.me.REG[0] = once_value_18; + once_value_15 = fra.me.REG[0]; + register_static_object(&once_value_15); + } else fra.me.REG[0] = once_value_15; fra.me.REG[0] = fra.me.REG[0]; CALL_toolcontext___ToolContext___fatal_error(fra.me.REG[1])(fra.me.REG[1], NIT_NULL, fra.me.REG[0]); } } - /* nitc.nit:103 */ + /* nitc.nit:104 */ fra.me.REG[0] = CALL_compiling___compiling_base___ToolContext___bindir(fra.me.REG[1])(fra.me.REG[1]); REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB0)) { - nit_abort("Reciever is null", NULL, LOCATE_nitc, 103); + nit_abort("Reciever is null", NULL, LOCATE_nitc, 104); } fra.me.REG[0] = CALL_standard___file___String___simplify_path(fra.me.REG[0])(fra.me.REG[0]); CALL_compiling___compiling_base___ToolContext___bindir__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]); stack_frame_head = fra.me.prev; return; } +static const char LOCATE_nitc___NitCompiler___perform_work[] = "nitc::NitCompiler::(abstracttool::AbstractCompiler::perform_work)"; void nitc___NitCompiler___perform_work(val_t p0, val_t p1){ struct {struct stack_frame_t me; val_t MORE_REG[4];} fra; val_t REGB0; @@ -737,7 +728,7 @@ void nitc___NitCompiler___perform_work(val_t p0, val_t p1){ val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_nitc; - fra.me.line = 106; + fra.me.line = 107; fra.me.meth = LOCATE_nitc___NitCompiler___perform_work; fra.me.has_broke = 0; fra.me.REG_size = 5; @@ -774,7 +765,7 @@ void nitc___NitCompiler___perform_work(val_t p0, val_t p1){ } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } - /* ../lib/standard/kernel.nit:232 */ + /* ../lib/standard/kernel.nit:235 */ REGB1 = TAG_Bool(UNTAG_Int(REGB0)val[UNTAG_Int(REGB0)]; - /* nitc.nit:109 */ - fra.me.REG[3] = NEW_Program_program___Program___init(fra.me.REG[3], fra.me.REG[0]); /* nitc.nit:110 */ + fra.me.REG[3] = NEW_Program_program___Program___init(fra.me.REG[3], fra.me.REG[0]); + /* nitc.nit:111 */ fra.me.REG[4] = CALL_nitc___NitCompiler___opt_output_format(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[4] = CALL_opts___OptionEnum___value_name(fra.me.REG[4])(fra.me.REG[4]); CALL_compiling___Program___output_format__eq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); - /* nitc.nit:111 */ - CALL_program___Program___compute_main_method(fra.me.REG[3])(fra.me.REG[3]); /* nitc.nit:112 */ - CALL_program___Program___generate_allocation_iroutines(fra.me.REG[3])(fra.me.REG[3]); + CALL_program___Program___compute_main_method(fra.me.REG[3])(fra.me.REG[3]); /* nitc.nit:113 */ + CALL_program___Program___generate_allocation_iroutines(fra.me.REG[3])(fra.me.REG[3]); + /* nitc.nit:114 */ REGB1 = CALL_program___ToolContext___global(fra.me.REG[0])(fra.me.REG[0]); if (UNTAG_Bool(REGB1)) { CALL_global___Program___do_global_analysis(fra.me.REG[3])(fra.me.REG[3]); } - /* nitc.nit:114 */ - CALL_compiling___table_computation___Program___do_table_computation(fra.me.REG[3])(fra.me.REG[3]); /* nitc.nit:115 */ + CALL_compiling___table_computation___Program___do_table_computation(fra.me.REG[3])(fra.me.REG[3]); + /* nitc.nit:116 */ CALL_compiling___Program___compile_prog(fra.me.REG[3])(fra.me.REG[3]); /* ../lib/standard/collection/array.nit:274 */ REGB1 = TAG_Int(1); - /* ../lib/standard/kernel.nit:235 */ + /* ../lib/standard/kernel.nit:238 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* ../lib/standard/collection/array.nit:274 */ REGB0 = REGB1; @@ -819,6 +810,7 @@ void nitc___NitCompiler___perform_work(val_t p0, val_t p1){ stack_frame_head = fra.me.prev; return; } +static const char LOCATE_nitc___ToolContext___init[] = "nitc::ToolContext::(toolcontext::ToolContext::init)"; void nitc___ToolContext___init(val_t p0, int* init_table){ int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_toolcontext___ToolContext].i; struct {struct stack_frame_t me;} fra; @@ -826,34 +818,35 @@ void nitc___ToolContext___init(val_t p0, int* init_table){ if (init_table[itpos1]) return; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_nitc; - fra.me.line = 121; + fra.me.line = 122; fra.me.meth = LOCATE_nitc___ToolContext___init; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:121 */ + /* nitc.nit:122 */ CALL_SUPER_nitc___ToolContext___init(fra.me.REG[0])(fra.me.REG[0], init_table); stack_frame_head = fra.me.prev; init_table[itpos1] = 1; return; } +static const char LOCATE_nitc___Sys___main[] = "nitc::Sys::(kernel::Sys::main)"; void nitc___Sys___main(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_nitc; - fra.me.line = 125; + fra.me.line = 126; fra.me.meth = LOCATE_nitc___Sys___main; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.nitni_local_ref_head = NULL; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; - /* nitc.nit:125 */ - fra.me.REG[0] = NEW_NitCompiler_nitc___NitCompiler___init(); /* nitc.nit:126 */ + fra.me.REG[0] = NEW_NitCompiler_nitc___NitCompiler___init(); + /* nitc.nit:127 */ CALL_abstracttool___AbstractCompiler___exec_cmd_line(fra.me.REG[0])(fra.me.REG[0]); stack_frame_head = fra.me.prev; return;