+static const char LOCATE_primitive_info___MMMethod___default_extern_name[] = "primitive_info::MMMethod::default_extern_name";
+val_t primitive_info___MMMethod___default_extern_name(val_t p0){
+ struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+ val_t REGB0;
+ val_t tmp;
+ static val_t once_value_1; /* Once value */
+ static val_t once_value_2; /* Once value */
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_primitive_info;
+ fra.me.line = 166;
+ fra.me.meth = LOCATE_primitive_info___MMMethod___default_extern_name;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 3;
+ fra.me.nitni_local_ref_head = NULL;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[1] = NIT_NULL;
+ fra.me.REG[2] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ /* primitive_info.nit:168 */
+ REGB0 = TAG_Int(3);
+ fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
+ 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);
+ once_value_1 = fra.me.REG[2];
+ register_static_object(&once_value_1);
+ } else fra.me.REG[2] = once_value_1;
+ fra.me.REG[2] = fra.me.REG[2];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
+ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___local_class(fra.me.REG[0])(fra.me.REG[0]);
+ fra.me.REG[2] = CALL_primitive_info___MMMethod___friendly_extern_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
+ CALL_standard___collection___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("___impl");
+ REGB0 = TAG_Int(7);
+ 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];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
+ fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
+ goto label3;
+ label3: while(0);
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[1];
+}
+static const char LOCATE_primitive_info___MMMethod___friendly_extern_name[] = "primitive_info::MMMethod::friendly_extern_name";
+val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
+ struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
+ val_t REGB0;
+ val_t REGB1;
+ val_t REGB2;
+ val_t tmp;
+ 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_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_11; /* 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 */
+ static val_t once_value_19; /* Once value */
+ static val_t once_value_20; /* Once value */
+ static val_t once_value_21; /* Once value */
+ static val_t once_value_22; /* Once value */
+ static val_t once_value_23; /* Once value */
+ static val_t once_value_24; /* Once value */
+ static val_t once_value_25; /* Once value */
+ static val_t once_value_26; /* Once value */
+ static val_t once_value_27; /* Once value */
+ static val_t once_value_28; /* Once value */
+ static val_t once_value_29; /* Once value */
+ static val_t once_value_30; /* Once value */
+ static val_t once_value_31; /* Once value */
+ static val_t once_value_32; /* Once value */
+ static val_t once_value_33; /* Once value */
+ static val_t once_value_34; /* Once value */
+ static val_t once_value_35; /* Once value */
+ static val_t once_value_36; /* Once value */
+ static val_t once_value_37; /* Once value */
+ static val_t once_value_39; /* Once value */
+ static val_t once_value_40; /* Once value */
+ static val_t once_value_41; /* Once value */
+ static val_t once_value_42; /* Once value */
+ static val_t once_value_43; /* Once value */
+ static val_t once_value_44; /* Once value */
+ static val_t once_value_45; /* Once value */
+ fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+ fra.me.file = LOCATE_primitive_info;
+ fra.me.line = 171;
+ fra.me.meth = LOCATE_primitive_info___MMMethod___friendly_extern_name;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 6;
+ fra.me.nitni_local_ref_head = NULL;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[1] = NIT_NULL;
+ fra.me.REG[2] = NIT_NULL;
+ fra.me.REG[3] = NIT_NULL;
+ fra.me.REG[4] = NIT_NULL;
+ fra.me.REG[5] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ fra.me.REG[1] = p1;
+ /* primitive_info.nit:175 */
+ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___global(fra.me.REG[0])(fra.me.REG[0]);
+ REGB0 = CALL_metamodel___abstractmetamodel___MMGlobalProperty___is_init(fra.me.REG[2])(fra.me.REG[2]);
+ REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:177 */
+ fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]);
+ fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
+ /* primitive_info.nit:178 */
+ if (!once_value_1) {
+ 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);
+ once_value_1 = fra.me.REG[3];
+ register_static_object(&once_value_1);
+ } else fra.me.REG[3] = once_value_1;
+ fra.me.REG[3] = fra.me.REG[3];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[3]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:179 */
+ if (!once_value_2) {
+ fra.me.REG[3] = BOX_NativeString("_plus");
+ REGB0 = TAG_Int(5);
+ fra.me.REG[3] = NEW_String_standard___string___String___with_native(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;
+ fra.me.REG[3] = fra.me.REG[3];
+ } else {
+ /* primitive_info.nit:180 */
+ if (!once_value_3) {
+ fra.me.REG[4] = BOX_NativeString("-");
+ REGB0 = TAG_Int(1);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(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;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:181 */
+ if (!once_value_4) {
+ fra.me.REG[4] = BOX_NativeString("_minus");
+ REGB0 = TAG_Int(6);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(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;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:182 */
+ if (!once_value_5) {
+ fra.me.REG[4] = BOX_NativeString("*");
+ REGB0 = TAG_Int(1);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_5 = fra.me.REG[4];
+ register_static_object(&once_value_5);
+ } else fra.me.REG[4] = once_value_5;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:183 */
+ if (!once_value_6) {
+ fra.me.REG[4] = BOX_NativeString("_star");
+ REGB0 = TAG_Int(5);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_6 = fra.me.REG[4];
+ register_static_object(&once_value_6);
+ } else fra.me.REG[4] = once_value_6;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:184 */
+ if (!once_value_7) {
+ fra.me.REG[4] = BOX_NativeString("/");
+ REGB0 = TAG_Int(1);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_7 = fra.me.REG[4];
+ register_static_object(&once_value_7);
+ } else fra.me.REG[4] = once_value_7;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:185 */
+ if (!once_value_8) {
+ fra.me.REG[4] = BOX_NativeString("_slash");
+ REGB0 = TAG_Int(6);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_8 = fra.me.REG[4];
+ register_static_object(&once_value_8);
+ } else fra.me.REG[4] = once_value_8;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:186 */
+ if (!once_value_9) {
+ fra.me.REG[4] = BOX_NativeString("%");
+ REGB0 = TAG_Int(1);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_9 = fra.me.REG[4];
+ register_static_object(&once_value_9);
+ } else fra.me.REG[4] = once_value_9;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:187 */
+ if (!once_value_10) {
+ fra.me.REG[4] = BOX_NativeString("_percent");
+ REGB0 = TAG_Int(8);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_10 = fra.me.REG[4];
+ register_static_object(&once_value_10);
+ } else fra.me.REG[4] = once_value_10;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:188 */
+ if (!once_value_11) {
+ 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);
+ once_value_11 = fra.me.REG[4];
+ register_static_object(&once_value_11);
+ } else fra.me.REG[4] = once_value_11;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:189 */
+ if (!once_value_12) {
+ fra.me.REG[4] = BOX_NativeString("_index");
+ REGB0 = TAG_Int(6);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_12 = fra.me.REG[4];
+ register_static_object(&once_value_12);
+ } else fra.me.REG[4] = once_value_12;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:190 */
+ if (!once_value_13) {
+ fra.me.REG[4] = BOX_NativeString("[]=");
+ REGB0 = TAG_Int(3);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_13 = fra.me.REG[4];
+ register_static_object(&once_value_13);
+ } else fra.me.REG[4] = once_value_13;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:191 */
+ if (!once_value_14) {
+ fra.me.REG[4] = BOX_NativeString("_index_assign");
+ REGB0 = TAG_Int(13);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_14 = fra.me.REG[4];
+ register_static_object(&once_value_14);
+ } else fra.me.REG[4] = once_value_14;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:192 */
+ if (!once_value_15) {
+ 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);
+ once_value_15 = fra.me.REG[4];
+ register_static_object(&once_value_15);
+ } else fra.me.REG[4] = once_value_15;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:193 */
+ if (!once_value_16) {
+ fra.me.REG[4] = BOX_NativeString("_equal");
+ REGB0 = TAG_Int(6);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_16 = fra.me.REG[4];
+ register_static_object(&once_value_16);
+ } else fra.me.REG[4] = once_value_16;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:194 */
+ if (!once_value_17) {
+ fra.me.REG[4] = BOX_NativeString("<");
+ REGB0 = TAG_Int(1);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_17 = fra.me.REG[4];
+ register_static_object(&once_value_17);
+ } else fra.me.REG[4] = once_value_17;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:195 */
+ if (!once_value_18) {
+ fra.me.REG[4] = BOX_NativeString("_less");
+ REGB0 = TAG_Int(5);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_18 = fra.me.REG[4];
+ register_static_object(&once_value_18);
+ } else fra.me.REG[4] = once_value_18;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:196 */
+ if (!once_value_19) {
+ fra.me.REG[4] = BOX_NativeString(">");
+ REGB0 = TAG_Int(1);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_19 = fra.me.REG[4];
+ register_static_object(&once_value_19);
+ } else fra.me.REG[4] = once_value_19;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:197 */
+ if (!once_value_20) {
+ fra.me.REG[4] = BOX_NativeString("_greater");
+ REGB0 = TAG_Int(8);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_20 = fra.me.REG[4];
+ register_static_object(&once_value_20);
+ } else fra.me.REG[4] = once_value_20;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:198 */
+ if (!once_value_21) {
+ 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);
+ once_value_21 = fra.me.REG[4];
+ register_static_object(&once_value_21);
+ } else fra.me.REG[4] = once_value_21;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:199 */
+ if (!once_value_22) {
+ fra.me.REG[4] = BOX_NativeString("_less_or_equal");
+ REGB0 = TAG_Int(14);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_22 = fra.me.REG[4];
+ register_static_object(&once_value_22);
+ } else fra.me.REG[4] = once_value_22;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:200 */
+ if (!once_value_23) {
+ 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);
+ once_value_23 = fra.me.REG[4];
+ register_static_object(&once_value_23);
+ } else fra.me.REG[4] = once_value_23;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:201 */
+ if (!once_value_24) {
+ fra.me.REG[4] = BOX_NativeString("_ge");
+ REGB0 = TAG_Int(3);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_24 = fra.me.REG[4];
+ register_static_object(&once_value_24);
+ } else fra.me.REG[4] = once_value_24;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:202 */
+ if (!once_value_25) {
+ 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);
+ once_value_25 = fra.me.REG[4];
+ register_static_object(&once_value_25);
+ } else fra.me.REG[4] = once_value_25;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:203 */
+ if (!once_value_26) {
+ fra.me.REG[4] = BOX_NativeString("_not_equal");
+ REGB0 = TAG_Int(10);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_26 = fra.me.REG[4];
+ register_static_object(&once_value_26);
+ } else fra.me.REG[4] = once_value_26;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:204 */
+ if (!once_value_27) {
+ 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);
+ once_value_27 = fra.me.REG[4];
+ register_static_object(&once_value_27);
+ } else fra.me.REG[4] = once_value_27;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:205 */
+ if (!once_value_28) {
+ fra.me.REG[4] = BOX_NativeString("_right");
+ REGB0 = TAG_Int(6);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_28 = fra.me.REG[4];
+ register_static_object(&once_value_28);
+ } else fra.me.REG[4] = once_value_28;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:206 */
+ if (!once_value_29) {
+ 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);
+ once_value_29 = fra.me.REG[4];
+ register_static_object(&once_value_29);
+ } else fra.me.REG[4] = once_value_29;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:207 */
+ if (!once_value_30) {
+ fra.me.REG[4] = BOX_NativeString("_left");
+ REGB0 = TAG_Int(5);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_30 = fra.me.REG[4];
+ register_static_object(&once_value_30);
+ } else fra.me.REG[4] = once_value_30;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:208 */
+ if (!once_value_31) {
+ fra.me.REG[4] = BOX_NativeString("<=>");
+ REGB0 = TAG_Int(3);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_31 = fra.me.REG[4];
+ register_static_object(&once_value_31);
+ } else fra.me.REG[4] = once_value_31;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ REGB0 = REGB1;
+ }
+ if (UNTAG_Bool(REGB0)) {
+ /* primitive_info.nit:209 */
+ if (!once_value_32) {
+ fra.me.REG[4] = BOX_NativeString("_starship");
+ REGB0 = TAG_Int(9);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB0);
+ once_value_32 = fra.me.REG[4];
+ register_static_object(&once_value_32);
+ } else fra.me.REG[4] = once_value_32;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* ../lib/standard/collection/array.nit:24 */
+ REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+ }
+ REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
+ /* primitive_info.nit:210 */
+ REGB1 = TAG_Int(1);
+ /* ../lib/standard/kernel.nit:240 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+ /* primitive_info.nit:210 */
+ REGB1 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB1);
+ REGB0 = TAG_Char('=');
+ REGB2 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB0));
+ if (UNTAG_Bool(REGB2)) {
+ } else {
+ /* ../lib/standard/kernel.nit:381 */
+ REGB0 = TAG_Bool((REGB1)==(REGB0));
+ /* primitive_info.nit:210 */
+ REGB2 = REGB0;
+ }
+ if (UNTAG_Bool(REGB2)) {
+ /* primitive_info.nit:211 */
+ REGB2 = TAG_Int(3);
+ fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB2);
+ if (!once_value_33) {
+ fra.me.REG[5] = BOX_NativeString("");
+ REGB2 = TAG_Int(0);
+ fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB2);
+ once_value_33 = fra.me.REG[5];
+ register_static_object(&once_value_33);
+ } else fra.me.REG[5] = once_value_33;
+ fra.me.REG[5] = fra.me.REG[5];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[5]);
+ REGB2 = TAG_Int(0);
+ /* ../lib/standard/collection/array.nit:24 */
+ REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+ if (UNTAG_Bool(REGB0)) {
+ } else {
+ nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+ }
+ REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
+ /* primitive_info.nit:211 */
+ REGB1 = TAG_Int(1);
+ /* ../lib/standard/kernel.nit:240 */
+ REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+ /* primitive_info.nit:211 */
+ fra.me.REG[5] = CALL_standard___string___AbstractString___substring(fra.me.REG[2])(fra.me.REG[2], REGB2, REGB1);
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[5]);
+ if (!once_value_34) {
+ fra.me.REG[5] = BOX_NativeString("__assign");
+ REGB1 = TAG_Int(8);
+ fra.me.REG[5] = NEW_String_standard___string___String___with_native(fra.me.REG[5], REGB1);
+ once_value_34 = fra.me.REG[5];
+ register_static_object(&once_value_34);
+ } else fra.me.REG[5] = once_value_34;
+ fra.me.REG[5] = fra.me.REG[5];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[5]);
+ fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
+ fra.me.REG[3] = fra.me.REG[4];
+ } else {
+ /* primitive_info.nit:213 */
+ fra.me.REG[3] = fra.me.REG[2];
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ /* primitive_info.nit:216 */
+ REGB1 = TAG_Int(5);
+ fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
+ if (!once_value_35) {
+ 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);
+ once_value_35 = fra.me.REG[4];
+ register_static_object(&once_value_35);
+ } else fra.me.REG[4] = once_value_35;
+ fra.me.REG[4] = fra.me.REG[4];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[1])(fra.me.REG[1]);
+ fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ if (!once_value_36) {
+ 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);
+ once_value_36 = fra.me.REG[4];
+ register_static_object(&once_value_36);
+ } else fra.me.REG[4] = once_value_36;
+ fra.me.REG[4] = fra.me.REG[4];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4]);
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
+ if (!once_value_37) {
+ 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);
+ once_value_37 = fra.me.REG[3];
+ register_static_object(&once_value_37);
+ } else fra.me.REG[3] = once_value_37;
+ 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]);
+ goto label38;
+ } else {
+ /* primitive_info.nit:218 */
+ fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]);
+ if (!once_value_39) {
+ if (!once_value_40) {
+ fra.me.REG[4] = BOX_NativeString("init");
+ REGB1 = TAG_Int(4);
+ fra.me.REG[4] = NEW_String_standard___string___String___with_native(fra.me.REG[4], REGB1);
+ once_value_40 = fra.me.REG[4];
+ register_static_object(&once_value_40);
+ } else fra.me.REG[4] = once_value_40;
+ fra.me.REG[4] = fra.me.REG[4];
+ fra.me.REG[4] = CALL_symbol___String___to_symbol(fra.me.REG[4])(fra.me.REG[4]);
+ once_value_39 = fra.me.REG[4];
+ register_static_object(&once_value_39);
+ } else fra.me.REG[4] = once_value_39;
+ fra.me.REG[4] = fra.me.REG[4];
+ REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[3],fra.me.REG[4]));
+ if (UNTAG_Bool(REGB1)) {
+ } else {
+ REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
+ REGB1 = REGB2;
+ }
+ if (UNTAG_Bool(REGB1)) {
+ /* primitive_info.nit:219 */
+ REGB1 = TAG_Int(3);
+ fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
+ if (!once_value_41) {
+ fra.me.REG[3] = BOX_NativeString("new_");
+ REGB1 = TAG_Int(4);
+ fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1);
+ once_value_41 = fra.me.REG[3];
+ register_static_object(&once_value_41);
+ } else fra.me.REG[3] = once_value_41;
+ fra.me.REG[3] = fra.me.REG[3];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
+ fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[1])(fra.me.REG[1]);
+ fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
+ if (!once_value_42) {
+ 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);
+ once_value_42 = fra.me.REG[3];
+ register_static_object(&once_value_42);
+ } else fra.me.REG[3] = once_value_42;
+ fra.me.REG[3] = fra.me.REG[3];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
+ fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
+ fra.me.REG[2] = fra.me.REG[4];
+ goto label38;
+ } else {
+ /* primitive_info.nit:221 */
+ REGB1 = TAG_Int(5);
+ fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
+ if (!once_value_43) {
+ fra.me.REG[3] = BOX_NativeString("new_");
+ REGB1 = TAG_Int(4);
+ fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1);
+ once_value_43 = fra.me.REG[3];
+ register_static_object(&once_value_43);
+ } else fra.me.REG[3] = once_value_43;
+ fra.me.REG[3] = fra.me.REG[3];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
+ fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[1])(fra.me.REG[1]);
+ fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[1]);
+ if (!once_value_44) {
+ fra.me.REG[1] = BOX_NativeString("_");
+ REGB1 = TAG_Int(1);
+ fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
+ once_value_44 = fra.me.REG[1];
+ register_static_object(&once_value_44);
+ } else fra.me.REG[1] = once_value_44;
+ fra.me.REG[1] = fra.me.REG[1];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[1]);
+ fra.me.REG[0] = CALL_metamodel___abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]);
+ fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[0]);
+ if (!once_value_45) {
+ fra.me.REG[0] = BOX_NativeString("");
+ REGB1 = TAG_Int(0);
+ fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB1);
+ once_value_45 = fra.me.REG[0];
+ register_static_object(&once_value_45);
+ } else fra.me.REG[0] = once_value_45;
+ fra.me.REG[0] = fra.me.REG[0];
+ CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[0]);
+ fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
+ fra.me.REG[2] = fra.me.REG[4];
+ goto label38;
+ }
+ }
+ label38: while(0);
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[2];
+}