X-Git-Url: http://nitlanguage.org diff --git a/c_src/analysis___icode_dump._sep.c b/c_src/analysis___icode_dump._sep.c index 15046a5..f569343 100644 --- a/c_src/analysis___icode_dump._sep.c +++ b/c_src/analysis___icode_dump._sep.c @@ -46,7 +46,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_2) { fra.me.REG[4] = BOX_NativeString("Parameters: "); REGB0 = TAG_Int(12); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB0); once_value_2 = fra.me.REG[4]; register_static_object(&once_value_2); } else fra.me.REG[4] = once_value_2; @@ -55,7 +55,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_3) { fra.me.REG[4] = BOX_NativeString(", "); REGB0 = TAG_Int(2); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB0); once_value_3 = fra.me.REG[4]; register_static_object(&once_value_3); } else fra.me.REG[4] = once_value_3; @@ -65,7 +65,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_4) { fra.me.REG[4] = BOX_NativeString(""); REGB0 = TAG_Int(0); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB0); once_value_4 = fra.me.REG[4]; register_static_object(&once_value_4); } else fra.me.REG[4] = once_value_4; @@ -97,7 +97,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_5) { fra.me.REG[2] = BOX_NativeString("Result: "); REGB0 = TAG_Int(8); - fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0); + fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0); once_value_5 = fra.me.REG[2]; register_static_object(&once_value_5); } else fra.me.REG[2] = once_value_5; @@ -108,7 +108,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_6) { 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); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0); once_value_6 = fra.me.REG[3]; register_static_object(&once_value_6); } else fra.me.REG[3] = once_value_6; @@ -125,7 +125,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } - /* ../lib/standard/kernel.nit:237 */ + /* ../lib/standard/kernel.nit:244 */ REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1)); /* analysis/icode_dump.nit:38 */ if (UNTAG_Bool(REGB1)) { @@ -135,7 +135,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_7) { fra.me.REG[3] = BOX_NativeString("StdSlots: "); REGB1 = TAG_Int(10); - fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB1); once_value_7 = fra.me.REG[3]; register_static_object(&once_value_7); } else fra.me.REG[3] = once_value_7; @@ -147,7 +147,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_8) { fra.me.REG[3] = BOX_NativeString(""); REGB1 = TAG_Int(0); - fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB1); once_value_8 = fra.me.REG[3]; register_static_object(&once_value_8); } else fra.me.REG[3] = once_value_8; @@ -164,7 +164,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } - /* ../lib/standard/kernel.nit:237 */ + /* ../lib/standard/kernel.nit:244 */ REGB0 = TAG_Bool(UNTAG_Int(REGB1)>UNTAG_Int(REGB0)); /* analysis/icode_dump.nit:41 */ if (UNTAG_Bool(REGB0)) { @@ -174,7 +174,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_9) { fra.me.REG[3] = BOX_NativeString("TagSlots: "); REGB0 = TAG_Int(10); - fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(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; @@ -186,7 +186,7 @@ void analysis___icode_dump___IRoutine___dump(val_t p0, val_t p1){ if (!once_value_10) { 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); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(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; @@ -295,7 +295,7 @@ void analysis___icode_dump___IClosureDecl___dump(val_t p0, val_t p1){ if (!once_value_1) { fra.me.REG[3] = BOX_NativeString("Closure: "); REGB0 = TAG_Int(9); - fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0); once_value_1 = fra.me.REG[3]; register_static_object(&once_value_1); } else fra.me.REG[3] = once_value_1; @@ -306,7 +306,7 @@ void analysis___icode_dump___IClosureDecl___dump(val_t p0, val_t p1){ if (!once_value_2) { 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); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0); once_value_2 = fra.me.REG[3]; register_static_object(&once_value_2); } else fra.me.REG[3] = once_value_2; @@ -483,7 +483,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ REGB1 = TAG_Bool(0); REGB0 = REGB1; } else { - /* ../lib/standard/kernel.nit:230 */ + /* ../lib/standard/kernel.nit:237 */ REGB1 = TAG_Bool((fra.me.REG[3])==(NIT_NULL)); /* analysis/icode_dump.nit:86 */ REGB0 = REGB1; @@ -493,7 +493,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ /* analysis/icode_dump.nit:87 */ REGB0 = ATTR_analysis___icode_dump___ICodeDumper____last_value(fra.me.REG[0]); REGB1 = TAG_Int(1); - /* ../lib/standard/kernel.nit:238 */ + /* ../lib/standard/kernel.nit:245 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* analysis/icode_dump.nit:87 */ ATTR_analysis___icode_dump___ICodeDumper____last_value(fra.me.REG[0]) = REGB1; @@ -503,7 +503,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_2) { fra.me.REG[5] = BOX_NativeString("r"); REGB1 = TAG_Int(1); - fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB1); + fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB1); once_value_2 = fra.me.REG[5]; register_static_object(&once_value_2); } else fra.me.REG[5] = once_value_2; @@ -520,7 +520,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_3) { fra.me.REG[5] = BOX_NativeString(""); REGB1 = TAG_Int(0); - fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB1); + fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB1); once_value_3 = fra.me.REG[5]; register_static_object(&once_value_3); } else fra.me.REG[5] = once_value_3; @@ -542,7 +542,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ /* analysis/icode_dump.nit:92 */ REGB1 = ATTR_analysis___icode_dump___ICodeDumper____last_value(fra.me.REG[0]); REGB0 = TAG_Int(1); - /* ../lib/standard/kernel.nit:238 */ + /* ../lib/standard/kernel.nit:245 */ REGB0 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0)); /* analysis/icode_dump.nit:92 */ ATTR_analysis___icode_dump___ICodeDumper____last_value(fra.me.REG[0]) = REGB0; @@ -555,7 +555,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_4) { fra.me.REG[5] = BOX_NativeString("BREG"); REGB0 = TAG_Int(4); - fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB0); + fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0); once_value_4 = fra.me.REG[5]; register_static_object(&once_value_4); } else fra.me.REG[5] = once_value_4; @@ -566,7 +566,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_5) { fra.me.REG[5] = BOX_NativeString("(r"); REGB0 = TAG_Int(2); - fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB0); + fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0); once_value_5 = fra.me.REG[5]; register_static_object(&once_value_5); } else fra.me.REG[5] = once_value_5; @@ -583,7 +583,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_6) { fra.me.REG[5] = BOX_NativeString(")"); REGB0 = TAG_Int(1); - fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB0); + fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0); once_value_6 = fra.me.REG[5]; register_static_object(&once_value_6); } else fra.me.REG[5] = once_value_6; @@ -600,7 +600,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_7) { fra.me.REG[6] = BOX_NativeString("LREG"); REGB0 = TAG_Int(4); - fra.me.REG[6] = NEW_String_standard___string___String___with_native(fra.me.REG[6], REGB0); + fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0); once_value_7 = fra.me.REG[6]; register_static_object(&once_value_7); } else fra.me.REG[6] = once_value_7; @@ -611,7 +611,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_8) { fra.me.REG[6] = BOX_NativeString("(r"); REGB0 = TAG_Int(2); - fra.me.REG[6] = NEW_String_standard___string___String___with_native(fra.me.REG[6], REGB0); + fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0); once_value_8 = fra.me.REG[6]; register_static_object(&once_value_8); } else fra.me.REG[6] = once_value_8; @@ -628,7 +628,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_9) { fra.me.REG[6] = BOX_NativeString(")"); REGB0 = TAG_Int(1); - fra.me.REG[6] = NEW_String_standard___string___String___with_native(fra.me.REG[6], REGB0); + fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0); once_value_9 = fra.me.REG[6]; register_static_object(&once_value_9); } else fra.me.REG[6] = once_value_9; @@ -643,7 +643,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_10) { fra.me.REG[6] = BOX_NativeString("REG"); REGB0 = TAG_Int(3); - fra.me.REG[6] = NEW_String_standard___string___String___with_native(fra.me.REG[6], REGB0); + fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0); once_value_10 = fra.me.REG[6]; register_static_object(&once_value_10); } else fra.me.REG[6] = once_value_10; @@ -654,7 +654,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_11) { fra.me.REG[3] = BOX_NativeString("(r"); REGB0 = TAG_Int(2); - fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0); once_value_11 = fra.me.REG[3]; register_static_object(&once_value_11); } else fra.me.REG[3] = once_value_11; @@ -671,7 +671,7 @@ val_t analysis___icode_dump___ICodeDumper___register(val_t p0, val_t p1){ if (!once_value_12) { fra.me.REG[3] = BOX_NativeString(")"); REGB0 = TAG_Int(1); - fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0); + fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0); once_value_12 = fra.me.REG[3]; register_static_object(&once_value_12); } else fra.me.REG[3] = once_value_12; @@ -736,7 +736,7 @@ val_t analysis___icode_dump___ICodeDumper___register_all(val_t p0, val_t p1){ if (!once_value_1) { fra.me.REG[2] = BOX_NativeString(""); REGB0 = TAG_Int(0); - fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0); + fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0); once_value_1 = fra.me.REG[2]; register_static_object(&once_value_1); } else fra.me.REG[2] = once_value_1; @@ -755,7 +755,7 @@ val_t analysis___icode_dump___ICodeDumper___register_all(val_t p0, val_t p1){ if (!once_value_4) { fra.me.REG[0] = BOX_NativeString(", "); REGB0 = TAG_Int(2); - fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0); + fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(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; @@ -833,7 +833,7 @@ val_t analysis___icode_dump___ICodeDumper___closdecl(val_t p0, val_t p1){ /* analysis/icode_dump.nit:127 */ REGB0 = ATTR_analysis___icode_dump___ICodeDumper____last_clos(fra.me.REG[0]); REGB1 = TAG_Int(1); - /* ../lib/standard/kernel.nit:238 */ + /* ../lib/standard/kernel.nit:245 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* analysis/icode_dump.nit:127 */ ATTR_analysis___icode_dump___ICodeDumper____last_clos(fra.me.REG[0]) = REGB1; @@ -843,7 +843,7 @@ val_t analysis___icode_dump___ICodeDumper___closdecl(val_t p0, val_t p1){ if (!once_value_2) { fra.me.REG[4] = BOX_NativeString("clos"); REGB1 = TAG_Int(4); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1); once_value_2 = fra.me.REG[4]; register_static_object(&once_value_2); } else fra.me.REG[4] = once_value_2; @@ -860,7 +860,7 @@ val_t analysis___icode_dump___ICodeDumper___closdecl(val_t p0, val_t p1){ if (!once_value_3) { fra.me.REG[4] = BOX_NativeString(""); REGB1 = TAG_Int(0); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1); once_value_3 = fra.me.REG[4]; register_static_object(&once_value_3); } else fra.me.REG[4] = once_value_3; @@ -927,7 +927,7 @@ val_t analysis___icode_dump___ICodeDumper___lab(val_t p0, val_t p1){ /* analysis/icode_dump.nit:142 */ REGB0 = ATTR_analysis___icode_dump___ICodeDumper____last_label(fra.me.REG[0]); REGB1 = TAG_Int(1); - /* ../lib/standard/kernel.nit:238 */ + /* ../lib/standard/kernel.nit:245 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* analysis/icode_dump.nit:142 */ ATTR_analysis___icode_dump___ICodeDumper____last_label(fra.me.REG[0]) = REGB1; @@ -937,7 +937,7 @@ val_t analysis___icode_dump___ICodeDumper___lab(val_t p0, val_t p1){ if (!once_value_2) { fra.me.REG[4] = BOX_NativeString("[l"); REGB1 = TAG_Int(2); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1); once_value_2 = fra.me.REG[4]; register_static_object(&once_value_2); } else fra.me.REG[4] = once_value_2; @@ -954,7 +954,7 @@ val_t analysis___icode_dump___ICodeDumper___lab(val_t p0, val_t p1){ if (!once_value_3) { fra.me.REG[4] = BOX_NativeString("]"); REGB1 = TAG_Int(1); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1); once_value_3 = fra.me.REG[4]; register_static_object(&once_value_3); } else fra.me.REG[4] = once_value_3; @@ -1021,7 +1021,7 @@ val_t analysis___icode_dump___ICodeDumper___line(val_t p0, val_t p1){ /* analysis/icode_dump.nit:156 */ REGB0 = ATTR_analysis___icode_dump___ICodeDumper____last_line(fra.me.REG[0]); REGB1 = TAG_Int(1); - /* ../lib/standard/kernel.nit:238 */ + /* ../lib/standard/kernel.nit:245 */ REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1)); /* analysis/icode_dump.nit:156 */ ATTR_analysis___icode_dump___ICodeDumper____last_line(fra.me.REG[0]) = REGB1; @@ -1031,7 +1031,7 @@ val_t analysis___icode_dump___ICodeDumper___line(val_t p0, val_t p1){ if (!once_value_2) { fra.me.REG[4] = BOX_NativeString(""); REGB1 = TAG_Int(0); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1); once_value_2 = fra.me.REG[4]; register_static_object(&once_value_2); } else fra.me.REG[4] = once_value_2; @@ -1048,7 +1048,7 @@ val_t analysis___icode_dump___ICodeDumper___line(val_t p0, val_t p1){ if (!once_value_3) { fra.me.REG[4] = BOX_NativeString(""); REGB1 = TAG_Int(0); - fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1); + fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1); once_value_3 = fra.me.REG[4]; register_static_object(&once_value_3); } else fra.me.REG[4] = once_value_3; @@ -1129,16 +1129,16 @@ void analysis___icode_dump___ICodeDumper___write(val_t p0, val_t p1){ nit_abort("Uninitialized attribute %s", "_indent_level", LOCATE_analysis___icode_dump, 172); } REGB1 = ATTR_analysis___icode_dump___ICodeDumper____indent_level(fra.me.REG[0]); - /* ../lib/standard/kernel.nit:355 */ + /* ../lib/standard/kernel.nit:404 */ while(1) { REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/; if (UNTAG_Bool(REGB2)) { } else { nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0); } - /* ../lib/standard/kernel.nit:235 */ + /* ../lib/standard/kernel.nit:242 */ REGB2 = TAG_Bool(UNTAG_Int(REGB0)