X-Git-Url: http://nitlanguage.org diff --git a/c_src/primitive_info._sep.c b/c_src/primitive_info._sep.c index bb8eab3..890e6f0 100644 --- a/c_src/primitive_info._sep.c +++ b/c_src/primitive_info._sep.c @@ -19,101 +19,106 @@ val_t primitive_info___MMLocalClass___primitive_info(val_t p0){ fra.me.REG[3] = NIT_NULL; fra.me.REG[4] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:35 */ REGB0 = TAG_Bool(ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0])!=NIT_NULL); - /* ./primitive_info.nit:36 */ if (UNTAG_Bool(REGB0)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_primitive_info_b"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 36); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_primitive_info_b", LOCATE_primitive_info, 35); } REGB0 = ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]); REGB1 = TAG_Bool(true); REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1)); if (UNTAG_Bool(REGB2)) { } else { + /* ./../lib/standard//kernel.nit:175 */ REGB1 = TAG_Bool((REGB0)==(REGB1)); + /* ./primitive_info.nit:35 */ REGB2 = REGB1; - /* ./primitive_info.nit:36 */ } if (UNTAG_Bool(REGB2)) { fra.me.REG[1] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]); goto label1; } - /* ./primitive_info.nit:38 */ + /* ./primitive_info.nit:37 */ if (!once_value_2) { fra.me.REG[2] = CALL_primitive_info___MMLocalClass___primitive_ctypes(fra.me.REG[0])(fra.me.REG[0]); 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]; + /* ./primitive_info.nit:38 */ fra.me.REG[3] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); REGB2 = CALL_abstract_collection___MapRead___has_key(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); - /* ./primitive_info.nit:39 */ if (UNTAG_Bool(REGB2)) { + /* ./primitive_info.nit:39 */ fra.me.REG[3] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[3] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); - /* ./primitive_info.nit:40 */ ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]) = fra.me.REG[3]; + /* ./primitive_info.nit:40 */ REGB2 = TAG_Bool(true); - /* ./primitive_info.nit:41 */ ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2; + /* ./primitive_info.nit:41 */ fra.me.REG[3] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]); fra.me.REG[1] = fra.me.REG[3]; - /* ./primitive_info.nit:42 */ goto label1; } + /* ./primitive_info.nit:43 */ fra.me.REG[2] = CALL_abstract_collection___Collection___iterator(fra.me.REG[2])(fra.me.REG[2]); - /* ./primitive_info.nit:45 */ + /* ./primitive_info.nit:44 */ while(1) { REGB2 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[2])(fra.me.REG[2]); if (UNTAG_Bool(REGB2)) { + /* ./primitive_info.nit:45 */ fra.me.REG[3] = CALL_abstract_collection___MapIterator___key(fra.me.REG[2])(fra.me.REG[2]); - fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___module(fra.me.REG[0])(fra.me.REG[0]); + /* ./primitive_info.nit:46 */ + fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]); REGB2 = CALL_abstractmetamodel___MMModule___has_global_class_named(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]); - /* ./primitive_info.nit:47 */ if (UNTAG_Bool(REGB2)) { - fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___module(fra.me.REG[0])(fra.me.REG[0]); + /* ./primitive_info.nit:47 */ + fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[3] = CALL_abstractmetamodel___MMModule___class_by_name(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]); + /* ./primitive_info.nit:48 */ fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___cshe(fra.me.REG[0])(fra.me.REG[0]); REGB2 = CALL_partial_order___PartialOrderElement_____l(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]); - /* ./primitive_info.nit:49 */ if (UNTAG_Bool(REGB2)) { + /* ./primitive_info.nit:49 */ fra.me.REG[3] = CALL_abstract_collection___Iterator___item(fra.me.REG[2])(fra.me.REG[2]); - /* ./primitive_info.nit:50 */ ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]) = fra.me.REG[3]; + /* ./primitive_info.nit:50 */ REGB2 = TAG_Bool(true); - /* ./primitive_info.nit:51 */ ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2; + /* ./primitive_info.nit:51 */ fra.me.REG[3] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]); fra.me.REG[1] = fra.me.REG[3]; - /* ./primitive_info.nit:52 */ goto label1; } } - /* ./primitive_info.nit:55 */ + /* ./primitive_info.nit:54 */ CALL_abstract_collection___Iterator___next(fra.me.REG[2])(fra.me.REG[2]); } else { - /* ./primitive_info.nit:45 */ + /* ./primitive_info.nit:44 */ goto label3; } } label3: while(0); + /* ./primitive_info.nit:56 */ REGB2 = TAG_Bool(true); - /* ./primitive_info.nit:57 */ ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2; + /* ./primitive_info.nit:57 */ fra.me.REG[1] = NIT_NULL; - /* ./primitive_info.nit:58 */ goto label1; label1: while(0); stack_frame_head = fra.me.prev; return fra.me.REG[1]; } val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ - struct {struct stack_frame_t me; val_t MORE_REG[7];} fra; + struct {struct stack_frame_t me; val_t MORE_REG[6];} fra; val_t REGB0; val_t REGB1; val_t REGB2; val_t REGB3; + val_t REGB4; + val_t REGB5; val_t tmp; static val_t once_value_1; /* Once value */ static val_t once_value_2; /* Once value */ @@ -129,10 +134,10 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ static val_t once_value_12; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 61; + fra.me.line = 60; fra.me.meth = LOCATE_primitive_info___MMLocalClass___primitive_ctypes; fra.me.has_broke = 0; - fra.me.REG_size = 8; + fra.me.REG_size = 7; fra.me.REG[0] = NIT_NULL; fra.me.REG[1] = NIT_NULL; fra.me.REG[2] = NIT_NULL; @@ -140,12 +145,12 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ fra.me.REG[4] = NIT_NULL; fra.me.REG[5] = NIT_NULL; fra.me.REG[6] = NIT_NULL; - fra.me.REG[7] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:63 */ fra.me.REG[0] = NEW_HashMap_hash_collection___HashMap___init(); + /* ./primitive_info.nit:64 */ REGB0 = TAG_Int(6); fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:65 */ if (!once_value_1) { fra.me.REG[2] = BOX_NativeString("Int"); REGB0 = TAG_Int(3); @@ -153,7 +158,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_1 = fra.me.REG[2]; register_static_object(&once_value_1); } else fra.me.REG[2] = once_value_1; - array___Array___add(fra.me.REG[1], fra.me.REG[2]); + fra.me.REG[2] = fra.me.REG[2]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_2) { fra.me.REG[2] = BOX_NativeString("Char"); REGB0 = TAG_Int(4); @@ -161,7 +167,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_2 = fra.me.REG[2]; register_static_object(&once_value_2); } else fra.me.REG[2] = once_value_2; - array___Array___add(fra.me.REG[1], fra.me.REG[2]); + fra.me.REG[2] = fra.me.REG[2]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_3) { fra.me.REG[2] = BOX_NativeString("Bool"); REGB0 = TAG_Int(4); @@ -169,7 +176,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_3 = fra.me.REG[2]; register_static_object(&once_value_3); } else fra.me.REG[2] = once_value_3; - array___Array___add(fra.me.REG[1], fra.me.REG[2]); + fra.me.REG[2] = fra.me.REG[2]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_4) { fra.me.REG[2] = BOX_NativeString("Float"); REGB0 = TAG_Int(5); @@ -177,7 +185,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_4 = fra.me.REG[2]; register_static_object(&once_value_4); } else fra.me.REG[2] = once_value_4; - array___Array___add(fra.me.REG[1], fra.me.REG[2]); + fra.me.REG[2] = fra.me.REG[2]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_5) { fra.me.REG[2] = BOX_NativeString("NativeString"); REGB0 = TAG_Int(12); @@ -185,7 +194,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_5 = fra.me.REG[2]; register_static_object(&once_value_5); } else fra.me.REG[2] = once_value_5; - array___Array___add(fra.me.REG[1], fra.me.REG[2]); + fra.me.REG[2] = fra.me.REG[2]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); if (!once_value_6) { fra.me.REG[2] = BOX_NativeString("Pointer"); REGB0 = TAG_Int(7); @@ -193,25 +203,26 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_6 = fra.me.REG[2]; register_static_object(&once_value_6); } else fra.me.REG[2] = once_value_6; - array___Array___add(fra.me.REG[1], fra.me.REG[2]); + fra.me.REG[2] = fra.me.REG[2]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]); + /* ./primitive_info.nit:65 */ REGB0 = TAG_Int(6); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); REGB0 = TAG_Bool(true); - /* ./primitive_info.nit:66 */ - array___Array___add(fra.me.REG[2], REGB0); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0); REGB0 = TAG_Bool(true); - array___Array___add(fra.me.REG[2], REGB0); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0); REGB0 = TAG_Bool(true); - array___Array___add(fra.me.REG[2], REGB0); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0); REGB0 = TAG_Bool(false); - array___Array___add(fra.me.REG[2], REGB0); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0); REGB0 = TAG_Bool(false); - array___Array___add(fra.me.REG[2], REGB0); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0); REGB0 = TAG_Bool(false); - array___Array___add(fra.me.REG[2], REGB0); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0); + /* ./primitive_info.nit:66 */ REGB0 = TAG_Int(6); fra.me.REG[3] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:67 */ if (!once_value_7) { fra.me.REG[4] = BOX_NativeString("bigint"); REGB0 = TAG_Int(6); @@ -219,7 +230,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_7 = fra.me.REG[4]; register_static_object(&once_value_7); } else fra.me.REG[4] = once_value_7; - array___Array___add(fra.me.REG[3], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); if (!once_value_8) { fra.me.REG[4] = BOX_NativeString("char"); REGB0 = TAG_Int(4); @@ -227,7 +239,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_8 = fra.me.REG[4]; register_static_object(&once_value_8); } else fra.me.REG[4] = once_value_8; - array___Array___add(fra.me.REG[3], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); if (!once_value_9) { fra.me.REG[4] = BOX_NativeString("int"); REGB0 = TAG_Int(3); @@ -235,7 +248,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_9 = fra.me.REG[4]; register_static_object(&once_value_9); } else fra.me.REG[4] = once_value_9; - array___Array___add(fra.me.REG[3], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); if (!once_value_10) { fra.me.REG[4] = BOX_NativeString("float"); REGB0 = TAG_Int(5); @@ -243,7 +257,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_10 = fra.me.REG[4]; register_static_object(&once_value_10); } else fra.me.REG[4] = once_value_10; - array___Array___add(fra.me.REG[3], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); if (!once_value_11) { fra.me.REG[4] = BOX_NativeString("char *"); REGB0 = TAG_Int(6); @@ -251,7 +266,8 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_11 = fra.me.REG[4]; register_static_object(&once_value_11); } else fra.me.REG[4] = once_value_11; - array___Array___add(fra.me.REG[3], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); if (!once_value_12) { fra.me.REG[4] = BOX_NativeString("void *"); REGB0 = TAG_Int(6); @@ -259,156 +275,158 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){ once_value_12 = fra.me.REG[4]; register_static_object(&once_value_12); } else fra.me.REG[4] = once_value_12; - array___Array___add(fra.me.REG[3], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]); + /* ./primitive_info.nit:67 */ REGB0 = TAG_Int(0); - REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); /* ./../lib/standard//collection//array.nit:23 */ + REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL); if (UNTAG_Bool(REGB1)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_length"); - fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23); } REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]); - fra.me.REG[4] = NEW_Range_range___Range___without_last(REGB0, REGB1); - fra.me.REG[4] = CALL_abstract_collection___Collection___iterator(fra.me.REG[4])(fra.me.REG[4]); - /* ./primitive_info.nit:68 */ + /* ./../lib/standard//kernel.nit:332 */ while(1) { - REGB1 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[4])(fra.me.REG[4]); - if (UNTAG_Bool(REGB1)) { - REGB1 = CALL_abstract_collection___Iterator___item(fra.me.REG[4])(fra.me.REG[4]); - fra.me.REG[5] = fra.me.REG[1]; - REGB0 = REGB1; - REGB2 = TAG_Int(0); - REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2)); - /* ./../lib/standard//collection//array.nit:233 */ - if (UNTAG_Bool(REGB2)) { - REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[5])!=NIT_NULL); - if (UNTAG_Bool(REGB2)) { + /* ./../lib/standard//kernel.nit:212 */ + REGB2 = TAG_Bool(UNTAG_Int(REGB0)=UNTAG_Int(REGB4)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB4)) { + REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[4])!=NIT_NULL); + if (UNTAG_Bool(REGB4)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_length"); - fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); } - REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[5]); - REGB2 = TAG_Bool(UNTAG_Int(REGB0)val[UNTAG_Int(REGB0)]; - /* ./../lib/standard//collection//array.nit:234 */ + /* ./../lib/standard//collection//array.nit:654 */ + fra.me.REG[4] = ((Nit_NativeArray)fra.me.REG[4])->val[UNTAG_Int(REGB3)]; + /* ./../lib/standard//collection//array.nit:246 */ goto label13; label13: while(0); - REGB0 = TAG_Bool(fra.me.REG[5]==NIT_NULL); - /* ./primitive_info.nit:69 */ - if (UNTAG_Bool(REGB0)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 69); - nit_exit(1); + /* ./primitive_info.nit:68 */ + REGB3 = TAG_Bool(fra.me.REG[4]==NIT_NULL); + if (UNTAG_Bool(REGB3)) { + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 68); } - fra.me.REG[5] = CALL_symbol___String___to_symbol(fra.me.REG[5])(fra.me.REG[5]); - fra.me.REG[6] = fra.me.REG[2]; - REGB0 = REGB1; - REGB2 = TAG_Int(0); - REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2)); - /* ./../lib/standard//collection//array.nit:233 */ - if (UNTAG_Bool(REGB2)) { - REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[6])!=NIT_NULL); - if (UNTAG_Bool(REGB2)) { + fra.me.REG[4] = CALL_symbol___String___to_symbol(fra.me.REG[4])(fra.me.REG[4]); + /* ./../lib/standard//collection//array.nit:243 */ + fra.me.REG[5] = fra.me.REG[2]; + REGB3 = REGB2; + /* ./../lib/standard//collection//array.nit:245 */ + REGB4 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB4 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB4)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB4)) { + REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[5])!=NIT_NULL); + if (UNTAG_Bool(REGB4)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_length"); - fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); } - REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[6]); - REGB2 = TAG_Bool(UNTAG_Int(REGB0)val[UNTAG_Int(REGB0)]; - /* ./../lib/standard//collection//array.nit:234 */ + /* ./../lib/standard//collection//array.nit:654 */ + fra.me.REG[5] = ((Nit_NativeArray)fra.me.REG[5])->val[UNTAG_Int(REGB3)]; + /* ./../lib/standard//collection//array.nit:246 */ goto label14; label14: while(0); - fra.me.REG[7] = fra.me.REG[3]; - REGB0 = TAG_Int(0); - REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0)); - /* ./../lib/standard//collection//array.nit:233 */ - if (UNTAG_Bool(REGB0)) { - REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[7])!=NIT_NULL); - if (UNTAG_Bool(REGB0)) { + /* ./../lib/standard//collection//array.nit:243 */ + fra.me.REG[6] = fra.me.REG[3]; + /* ./../lib/standard//collection//array.nit:245 */ + REGB3 = TAG_Int(0); + /* ./../lib/standard//kernel.nit:213 */ + REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3)); + /* ./../lib/standard//collection//array.nit:245 */ + if (UNTAG_Bool(REGB3)) { + REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[6])!=NIT_NULL); + if (UNTAG_Bool(REGB3)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_length"); - fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245); } - REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[7]); - REGB0 = TAG_Bool(UNTAG_Int(REGB1)val[UNTAG_Int(REGB1)]; - /* ./../lib/standard//collection//array.nit:234 */ + /* ./../lib/standard//collection//array.nit:654 */ + fra.me.REG[6] = ((Nit_NativeArray)fra.me.REG[6])->val[UNTAG_Int(REGB2)]; + /* ./../lib/standard//collection//array.nit:246 */ goto label15; label15: while(0); - fra.me.REG[7] = NEW_PrimitiveInfo_primitive_info___PrimitiveInfo___init(fra.me.REG[5], fra.me.REG[6], fra.me.REG[7]); - /* ./primitive_info.nit:71 */ - CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[5], fra.me.REG[7]); + /* ./primitive_info.nit:69 */ + fra.me.REG[6] = NEW_PrimitiveInfo_primitive_info___PrimitiveInfo___init(fra.me.REG[4], fra.me.REG[5], fra.me.REG[6]); + /* ./primitive_info.nit:70 */ + CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[4], fra.me.REG[6]); + /* ./../lib/standard//kernel.nit:334 */ + REGB2 = TAG_Int(1); + /* ./../lib/standard//kernel.nit:215 */ + REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2)); + /* ./../lib/standard//kernel.nit:334 */ + REGB0 = REGB2; } else { - /* ./primitive_info.nit:68 */ + /* ./../lib/standard//kernel.nit:332 */ goto label16; } - CALL_abstract_collection___Iterator___next(fra.me.REG[4])(fra.me.REG[4]); } label16: while(0); - /* ./primitive_info.nit:73 */ + /* ./primitive_info.nit:72 */ goto label17; label17: while(0); stack_frame_head = fra.me.prev; @@ -420,19 +438,17 @@ val_t primitive_info___PrimitiveInfo___name(val_t p0){ val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 79; + fra.me.line = 78; fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___name; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:78 */ REGB0 = TAG_Bool(ATTR_primitive_info___PrimitiveInfo____name(fra.me.REG[0])!=NIT_NULL); - /* ./primitive_info.nit:79 */ if (UNTAG_Bool(REGB0)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_name"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 79); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_name", LOCATE_primitive_info, 78); } fra.me.REG[0] = ATTR_primitive_info___PrimitiveInfo____name(fra.me.REG[0]); stack_frame_head = fra.me.prev; @@ -444,19 +460,17 @@ val_t primitive_info___PrimitiveInfo___tagged(val_t p0){ val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 82; + fra.me.line = 81; fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___tagged; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:81 */ REGB0 = TAG_Bool(ATTR_primitive_info___PrimitiveInfo____tagged(fra.me.REG[0])!=NIT_NULL); - /* ./primitive_info.nit:82 */ if (UNTAG_Bool(REGB0)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_tagged"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 82); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_tagged", LOCATE_primitive_info, 81); } REGB0 = ATTR_primitive_info___PrimitiveInfo____tagged(fra.me.REG[0]); stack_frame_head = fra.me.prev; @@ -468,19 +482,17 @@ val_t primitive_info___PrimitiveInfo___cname(val_t p0){ val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 85; + fra.me.line = 84; fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___cname; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:84 */ REGB0 = TAG_Bool(ATTR_primitive_info___PrimitiveInfo____cname(fra.me.REG[0])!=NIT_NULL); - /* ./primitive_info.nit:85 */ if (UNTAG_Bool(REGB0)) { } else { - fprintf(stderr, "Uninitialized attribute %s", "_cname"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 85); - nit_exit(1); + nit_abort("Uninitialized attribute %s", "_cname", LOCATE_primitive_info, 84); } fra.me.REG[0] = ATTR_primitive_info___PrimitiveInfo____cname(fra.me.REG[0]); stack_frame_head = fra.me.prev; @@ -494,7 +506,7 @@ void primitive_info___PrimitiveInfo___init(val_t p0, val_t p1, val_t p2, val_t p if (init_table[itpos0]) return; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 88; + fra.me.line = 87; fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___init; fra.me.has_broke = 0; fra.me.REG_size = 3; @@ -505,11 +517,11 @@ void primitive_info___PrimitiveInfo___init(val_t p0, val_t p1, val_t p2, val_t p fra.me.REG[1] = p1; REGB0 = p2; fra.me.REG[2] = p3; - /* ./primitive_info.nit:90 */ + /* ./primitive_info.nit:89 */ ATTR_primitive_info___PrimitiveInfo____name(fra.me.REG[0]) = fra.me.REG[1]; - /* ./primitive_info.nit:91 */ + /* ./primitive_info.nit:90 */ ATTR_primitive_info___PrimitiveInfo____tagged(fra.me.REG[0]) = REGB0; - /* ./primitive_info.nit:92 */ + /* ./primitive_info.nit:91 */ ATTR_primitive_info___PrimitiveInfo____cname(fra.me.REG[0]) = fra.me.REG[2]; stack_frame_head = fra.me.prev; init_table[itpos0] = 1; @@ -523,17 +535,18 @@ val_t primitive_info___MMType___cname(val_t p0){ static val_t once_value_1; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 97; + fra.me.line = 96; fra.me.meth = LOCATE_primitive_info___MMType___cname; 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; + /* ./primitive_info.nit:99 */ fra.me.REG[0] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[0])(fra.me.REG[0]); + /* ./primitive_info.nit:100 */ REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); - /* ./primitive_info.nit:101 */ if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); @@ -546,7 +559,7 @@ val_t primitive_info___MMType___cname(val_t p0){ } } if (UNTAG_Bool(REGB0)) { - /* ./primitive_info.nit:102 */ + /* ./primitive_info.nit:101 */ if (!once_value_1) { fra.me.REG[1] = BOX_NativeString("val_t"); REGB0 = TAG_Int(5); @@ -554,14 +567,13 @@ val_t primitive_info___MMType___cname(val_t p0){ once_value_1 = fra.me.REG[1]; register_static_object(&once_value_1); } else fra.me.REG[1] = once_value_1; + fra.me.REG[1] = fra.me.REG[1]; goto label2; } else { + /* ./primitive_info.nit:103 */ REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL); - /* ./primitive_info.nit:104 */ if (UNTAG_Bool(REGB0)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 104); - nit_exit(1); + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 103); } fra.me.REG[0] = CALL_primitive_info___PrimitiveInfo___cname(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = fra.me.REG[0]; @@ -579,22 +591,23 @@ val_t primitive_info___MMType___is_tagged(val_t p0){ val_t tmp; fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 108; + fra.me.line = 107; fra.me.meth = LOCATE_primitive_info___MMType___is_tagged; fra.me.has_broke = 0; fra.me.REG_size = 1; fra.me.REG[0] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:110 */ REGB0 = CALL_static_type___MMType___is_nullable(fra.me.REG[0])(fra.me.REG[0]); - /* ./primitive_info.nit:111 */ if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(false); goto label1; } + /* ./primitive_info.nit:111 */ fra.me.REG[0] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[0])(fra.me.REG[0]); + /* ./primitive_info.nit:112 */ REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); - /* ./primitive_info.nit:113 */ if (UNTAG_Bool(REGB1)) { } else { REGB2 = TAG_Bool(fra.me.REG[0]==NIT_NULL); @@ -610,9 +623,7 @@ val_t primitive_info___MMType___is_tagged(val_t p0){ if (UNTAG_Bool(REGB1)) { REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL); if (UNTAG_Bool(REGB1)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 113); - nit_exit(1); + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 112); } REGB1 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[0])(fra.me.REG[0]); } else { @@ -636,7 +647,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ static val_t once_value_5; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 116; + fra.me.line = 115; fra.me.meth = LOCATE_primitive_info___MMType___default_cvalue; fra.me.has_broke = 0; fra.me.REG_size = 4; @@ -645,10 +656,11 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ fra.me.REG[2] = NIT_NULL; fra.me.REG[3] = NIT_NULL; fra.me.REG[0] = p0; + /* ./primitive_info.nit:119 */ fra.me.REG[1] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[1] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[1])(fra.me.REG[1]); + /* ./primitive_info.nit:120 */ REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL); - /* ./primitive_info.nit:121 */ if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL); @@ -664,9 +676,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ if (UNTAG_Bool(REGB0)) { REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL); if (UNTAG_Bool(REGB0)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 121); - nit_exit(1); + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 120); } REGB0 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[1])(fra.me.REG[1]); } else { @@ -674,9 +684,9 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ REGB0 = REGB1; } if (UNTAG_Bool(REGB0)) { + /* ./primitive_info.nit:121 */ REGB0 = TAG_Int(5); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:122 */ if (!once_value_1) { fra.me.REG[3] = BOX_NativeString("TAG_"); REGB0 = TAG_Int(4); @@ -684,11 +694,12 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ once_value_1 = fra.me.REG[3]; register_static_object(&once_value_1); } else fra.me.REG[3] = once_value_1; - array___Array___add(fra.me.REG[2], fra.me.REG[3]); + fra.me.REG[3] = fra.me.REG[3]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]); fra.me.REG[0] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); - array___Array___add(fra.me.REG[2], fra.me.REG[0]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); if (!once_value_2) { fra.me.REG[0] = BOX_NativeString("(("); REGB0 = TAG_Int(2); @@ -696,15 +707,14 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ once_value_2 = fra.me.REG[0]; register_static_object(&once_value_2); } else fra.me.REG[0] = once_value_2; - array___Array___add(fra.me.REG[2], fra.me.REG[0]); + fra.me.REG[0] = fra.me.REG[0]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL); if (UNTAG_Bool(REGB0)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 122); - nit_exit(1); + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 121); } fra.me.REG[1] = CALL_primitive_info___PrimitiveInfo___cname(fra.me.REG[1])(fra.me.REG[1]); - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); if (!once_value_3) { fra.me.REG[1] = BOX_NativeString(")0)"); REGB0 = TAG_Int(3); @@ -712,11 +722,12 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ once_value_3 = fra.me.REG[1]; register_static_object(&once_value_3); } else fra.me.REG[1] = once_value_3; - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[1] = fra.me.REG[1]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); fra.me.REG[2] = CALL_string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); goto label4; } else { - /* ./primitive_info.nit:124 */ + /* ./primitive_info.nit:123 */ if (!once_value_5) { fra.me.REG[1] = BOX_NativeString("NIT_NULL"); REGB0 = TAG_Int(8); @@ -724,6 +735,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){ once_value_5 = fra.me.REG[1]; register_static_object(&once_value_5); } else fra.me.REG[1] = once_value_5; + fra.me.REG[1] = fra.me.REG[1]; fra.me.REG[2] = fra.me.REG[1]; goto label4; } @@ -744,7 +756,7 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ static val_t once_value_7; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 128; + fra.me.line = 127; fra.me.meth = LOCATE_primitive_info___MMType___boxtype; fra.me.has_broke = 0; fra.me.REG_size = 5; @@ -755,10 +767,11 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ fra.me.REG[4] = NIT_NULL; fra.me.REG[0] = p0; fra.me.REG[1] = p1; + /* ./primitive_info.nit:131 */ fra.me.REG[2] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[2])(fra.me.REG[2]); + /* ./primitive_info.nit:132 */ REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); - /* ./primitive_info.nit:133 */ if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); @@ -771,22 +784,20 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ } } if (UNTAG_Bool(REGB0)) { + /* ./primitive_info.nit:133 */ fra.me.REG[3] = fra.me.REG[1]; - /* ./primitive_info.nit:134 */ goto label1; } else { + /* ./primitive_info.nit:134 */ REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); - /* ./primitive_info.nit:135 */ if (UNTAG_Bool(REGB0)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 135); - nit_exit(1); + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 134); } REGB0 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[2])(fra.me.REG[2]); if (UNTAG_Bool(REGB0)) { + /* ./primitive_info.nit:135 */ REGB0 = TAG_Int(5); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:136 */ if (!once_value_2) { fra.me.REG[4] = BOX_NativeString("TAG_"); REGB0 = TAG_Int(4); @@ -794,11 +805,12 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ once_value_2 = fra.me.REG[4]; register_static_object(&once_value_2); } else fra.me.REG[4] = once_value_2; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); fra.me.REG[4] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[4])(fra.me.REG[4]); fra.me.REG[4] = CALL_string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); if (!once_value_3) { fra.me.REG[4] = BOX_NativeString("("); REGB0 = TAG_Int(1); @@ -806,8 +818,9 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ once_value_3 = fra.me.REG[4]; register_static_object(&once_value_3); } else fra.me.REG[4] = once_value_3; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); if (!once_value_4) { fra.me.REG[4] = BOX_NativeString(")"); REGB0 = TAG_Int(1); @@ -815,14 +828,15 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ once_value_4 = fra.me.REG[4]; register_static_object(&once_value_4); } else fra.me.REG[4] = once_value_4; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); fra.me.REG[2] = CALL_string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[3] = fra.me.REG[2]; goto label1; } else { + /* ./primitive_info.nit:137 */ REGB0 = TAG_Int(5); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:138 */ if (!once_value_5) { fra.me.REG[4] = BOX_NativeString("BOX_"); REGB0 = TAG_Int(4); @@ -830,11 +844,12 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ once_value_5 = fra.me.REG[4]; register_static_object(&once_value_5); } else fra.me.REG[4] = once_value_5; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); fra.me.REG[0] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); - array___Array___add(fra.me.REG[2], fra.me.REG[0]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); if (!once_value_6) { fra.me.REG[0] = BOX_NativeString("("); REGB0 = TAG_Int(1); @@ -842,8 +857,9 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ once_value_6 = fra.me.REG[0]; register_static_object(&once_value_6); } else fra.me.REG[0] = once_value_6; - array___Array___add(fra.me.REG[2], fra.me.REG[0]); - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[0] = fra.me.REG[0]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); if (!once_value_7) { fra.me.REG[1] = BOX_NativeString(")"); REGB0 = TAG_Int(1); @@ -851,7 +867,8 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){ once_value_7 = fra.me.REG[1]; register_static_object(&once_value_7); } else fra.me.REG[1] = once_value_7; - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[1] = fra.me.REG[1]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); fra.me.REG[2] = CALL_string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[3] = fra.me.REG[2]; goto label1; @@ -874,7 +891,7 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ static val_t once_value_7; /* Once value */ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me; fra.me.file = LOCATE_primitive_info; - fra.me.line = 142; + fra.me.line = 141; fra.me.meth = LOCATE_primitive_info___MMType___unboxtype; fra.me.has_broke = 0; fra.me.REG_size = 5; @@ -885,10 +902,11 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ fra.me.REG[4] = NIT_NULL; fra.me.REG[0] = p0; fra.me.REG[1] = p1; + /* ./primitive_info.nit:145 */ fra.me.REG[2] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[2] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[2])(fra.me.REG[2]); + /* ./primitive_info.nit:146 */ REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); - /* ./primitive_info.nit:147 */ if (UNTAG_Bool(REGB0)) { } else { REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL); @@ -901,22 +919,20 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ } } if (UNTAG_Bool(REGB0)) { + /* ./primitive_info.nit:147 */ fra.me.REG[3] = fra.me.REG[1]; - /* ./primitive_info.nit:148 */ goto label1; } else { + /* ./primitive_info.nit:148 */ REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL); - /* ./primitive_info.nit:149 */ if (UNTAG_Bool(REGB0)) { - fprintf(stderr, "Reciever is null"); - fprintf(stderr, " (%s:%d)\n", LOCATE_primitive_info, 149); - nit_exit(1); + nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 148); } REGB0 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[2])(fra.me.REG[2]); if (UNTAG_Bool(REGB0)) { + /* ./primitive_info.nit:149 */ REGB0 = TAG_Int(5); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:150 */ if (!once_value_2) { fra.me.REG[4] = BOX_NativeString("UNTAG_"); REGB0 = TAG_Int(6); @@ -924,11 +940,12 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ once_value_2 = fra.me.REG[4]; register_static_object(&once_value_2); } else fra.me.REG[4] = once_value_2; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); fra.me.REG[4] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[4] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[4])(fra.me.REG[4]); fra.me.REG[4] = CALL_string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]); - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); if (!once_value_3) { fra.me.REG[4] = BOX_NativeString("("); REGB0 = TAG_Int(1); @@ -936,8 +953,9 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ once_value_3 = fra.me.REG[4]; register_static_object(&once_value_3); } else fra.me.REG[4] = once_value_3; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); if (!once_value_4) { fra.me.REG[4] = BOX_NativeString(")"); REGB0 = TAG_Int(1); @@ -945,14 +963,15 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ once_value_4 = fra.me.REG[4]; register_static_object(&once_value_4); } else fra.me.REG[4] = once_value_4; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); fra.me.REG[2] = CALL_string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[3] = fra.me.REG[2]; goto label1; } else { + /* ./primitive_info.nit:151 */ REGB0 = TAG_Int(5); fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0); - /* ./primitive_info.nit:152 */ if (!once_value_5) { fra.me.REG[4] = BOX_NativeString("UNBOX_"); REGB0 = TAG_Int(6); @@ -960,11 +979,12 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ once_value_5 = fra.me.REG[4]; register_static_object(&once_value_5); } else fra.me.REG[4] = once_value_5; - array___Array___add(fra.me.REG[2], fra.me.REG[4]); + fra.me.REG[4] = fra.me.REG[4]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]); fra.me.REG[0] = CALL_static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]); fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]); - array___Array___add(fra.me.REG[2], fra.me.REG[0]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); if (!once_value_6) { fra.me.REG[0] = BOX_NativeString("("); REGB0 = TAG_Int(1); @@ -972,8 +992,9 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ once_value_6 = fra.me.REG[0]; register_static_object(&once_value_6); } else fra.me.REG[0] = once_value_6; - array___Array___add(fra.me.REG[2], fra.me.REG[0]); - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[0] = fra.me.REG[0]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]); + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); if (!once_value_7) { fra.me.REG[1] = BOX_NativeString(")"); REGB0 = TAG_Int(1); @@ -981,7 +1002,8 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){ once_value_7 = fra.me.REG[1]; register_static_object(&once_value_7); } else fra.me.REG[1] = once_value_7; - array___Array___add(fra.me.REG[2], fra.me.REG[1]); + fra.me.REG[1] = fra.me.REG[1]; + CALL_abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]); fra.me.REG[2] = CALL_string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]); fra.me.REG[3] = fra.me.REG[2]; goto label1;