+++ /dev/null
-/* This C file is generated by NIT to compile module syntax___syntax_base. */
-#include "syntax___syntax_base._sep.h"
-static const char LOCATE_syntax___syntax_base___MMSrcModule___clear_ast[] = "syntax_base::MMSrcModule::clear_ast";
-void syntax___syntax_base___MMSrcModule___clear_ast(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 31;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcModule___clear_ast;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:32 */
- ATTR_syntax___syntax_base___MMSrcModule____nodes(fra.me.REG[0]) = NIT_NULL;
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcModule___node[] = "syntax_base::MMSrcModule::node";
-val_t syntax___syntax_base___MMSrcModule___node(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 34;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcModule___node;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:34 */
- fra.me.REG[1] = fra.me.REG[0];
- /* syntax/syntax_base.nit:35 */
- fra.me.REG[1] = CALL_syntax___syntax_base___MMModule___nodes(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[1]);
- REGB0 = TAG_Bool((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_parser___parser_nodes___AModule, ID_parser___parser_nodes___AModule)) /*cast AModule*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 35);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcModule___src_local_classes[] = "syntax_base::MMSrcModule::src_local_classes";
-val_t syntax___syntax_base___MMSrcModule___src_local_classes(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 37;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcModule___src_local_classes;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:37 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMSrcModule____src_local_classes(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_src_local_classes", LOCATE_syntax___syntax_base, 37);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMSrcModule____src_local_classes(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcModule___init[] = "syntax_base::MMSrcModule::init";
-void syntax___syntax_base___MMSrcModule___init(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4, val_t p5, int* init_table){
- int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMSrcModule].i;
- struct {struct stack_frame_t me; val_t MORE_REG[6];} fra;
- val_t tmp;
- if (init_table[itpos0]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 40;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcModule___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 7;
- 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[6] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- fra.me.REG[4] = p4;
- fra.me.REG[5] = p5;
- /* syntax/syntax_base.nit:40 */
- fra.me.REG[6] = fra.me.REG[0];
- /* syntax/syntax_base.nit:42 */
- CALL_metamodel___abstractmetamodel___MMModule___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[4], fra.me.REG[3], fra.me.REG[1], fra.me.REG[5], init_table);
- /* syntax/syntax_base.nit:43 */
- CALL_syntax___syntax_base___MMModule___nodes__eq(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[6], fra.me.REG[2]);
- /* syntax/syntax_base.nit:44 */
- fra.me.REG[2] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
- ATTR_syntax___syntax_base___MMSrcModule____src_local_classes(fra.me.REG[6]) = fra.me.REG[2];
- stack_frame_head = fra.me.prev;
- init_table[itpos0] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcModule___nodes[] = "syntax_base::MMSrcModule::(syntax_base::MMModule::nodes)";
-val_t syntax___syntax_base___MMSrcModule___nodes(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 47;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcModule___nodes;
- 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;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:49 */
- fra.me.REG[2] = ATTR_syntax___syntax_base___MMSrcModule____nodes(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[2] = ATTR_syntax___syntax_base___MMSrcModule____nodes(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 49);
- }
- REGB0 = CALL_standard___collection___abstract_collection___MapRead___has_key(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- } else {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- }
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMSrcModule____nodes(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 49);
- }
- fra.me.REG[1] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label1;
- } else {
- fra.me.REG[1] = NIT_NULL;
- goto label1;
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcModule___nodes__eq[] = "syntax_base::MMSrcModule::(syntax_base::MMModule::nodes=)";
-void syntax___syntax_base___MMSrcModule___nodes__eq(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 51;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcModule___nodes__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:53 */
- fra.me.REG[3] = ATTR_syntax___syntax_base___MMSrcModule____nodes(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 53);
- }
- REGB0 = CALL_standard___collection___abstract_collection___MapRead___has_key(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_syntax___syntax_base, 53);
- }
- /* syntax/syntax_base.nit:54 */
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMSrcModule____nodes(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 54);
- }
- CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2]);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMModule___nodes[] = "syntax_base::MMModule::nodes";
-val_t syntax___syntax_base___MMModule___nodes(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 59;
- fra.me.meth = LOCATE_syntax___syntax_base___MMModule___nodes;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:60 */
- fra.me.REG[1] = NIT_NULL;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMModule___nodes__eq[] = "syntax_base::MMModule::nodes=";
-void syntax___syntax_base___MMModule___nodes__eq(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 61;
- fra.me.meth = LOCATE_syntax___syntax_base___MMModule___nodes__eq;
- 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;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:62 */
- nit_abort("Aborted", NULL, LOCATE_syntax___syntax_base, 62);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMGlobalClass___check_visibility[] = "syntax_base::MMGlobalClass::check_visibility";
-val_t syntax___syntax_base___MMGlobalClass___check_visibility(val_t p0, val_t p1, val_t p2, val_t p3){
- struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t tmp;
- 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 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 66;
- fra.me.meth = LOCATE_syntax___syntax_base___MMGlobalClass___check_visibility;
- 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;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:68 */
- fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[4])(fra.me.REG[4]);
- /* syntax/syntax_base.nit:69 */
- REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[4], COLOR_syntax___syntax_base___MMSrcModule, ID_syntax___syntax_base___MMSrcModule)) /*cast MMSrcModule*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_syntax___syntax_base, 69);
- }
- /* syntax/syntax_base.nit:70 */
- REGB0 = CALL_metamodel___abstractmetamodel___MMModule___visibility_for(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- /* syntax/syntax_base.nit:71 */
- REGB1 = TAG_Int(3);
- REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- if (UNTAG_Bool(REGB2)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB1 = TAG_Bool((REGB0)==(REGB1));
- /* syntax/syntax_base.nit:71 */
- REGB2 = REGB1;
- }
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:72 */
- REGB2 = TAG_Bool(1);
- goto label1;
- } else {
- /* syntax/syntax_base.nit:73 */
- REGB1 = TAG_Int(0);
- REGB3 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- if (UNTAG_Bool(REGB3)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB1 = TAG_Bool((REGB0)==(REGB1));
- /* syntax/syntax_base.nit:73 */
- REGB3 = REGB1;
- }
- if (UNTAG_Bool(REGB3)) {
- /* syntax/syntax_base.nit:74 */
- REGB3 = TAG_Int(5);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB3);
- if (!once_value_2) {
- fra.me.REG[5] = BOX_NativeString("Visibility error: Class ");
- REGB3 = TAG_Int(24);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB3);
- once_value_2 = fra.me.REG[5];
- register_static_object(&once_value_2);
- } else fra.me.REG[5] = once_value_2;
- fra.me.REG[5] = fra.me.REG[5];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
- fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
- if (!once_value_3) {
- fra.me.REG[5] = BOX_NativeString(" comes from the hidden module ");
- REGB3 = TAG_Int(30);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB3);
- once_value_3 = fra.me.REG[5];
- register_static_object(&once_value_3);
- } else fra.me.REG[5] = once_value_3;
- fra.me.REG[5] = fra.me.REG[5];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
- 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[3])(fra.me.REG[3], fra.me.REG[4]);
- if (!once_value_4) {
- fra.me.REG[4] = BOX_NativeString(".");
- REGB3 = TAG_Int(1);
- fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB3);
- 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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2], fra.me.REG[3]);
- /* syntax/syntax_base.nit:75 */
- REGB3 = TAG_Bool(0);
- REGB2 = REGB3;
- goto label1;
- } else {
- /* syntax/syntax_base.nit:76 */
- REGB3 = CALL_metamodel___abstractmetamodel___MMGlobalClass___visibility_level(fra.me.REG[0])(fra.me.REG[0]);
- REGB1 = TAG_Int(3);
- REGB0 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB1));
- /* syntax/syntax_base.nit:76 */
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:77 */
- REGB1 = TAG_Int(3);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
- if (!once_value_5) {
- fra.me.REG[4] = BOX_NativeString("Visibility error: Class ");
- REGB1 = TAG_Int(24);
- fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1);
- 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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- 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[3])(fra.me.REG[3], fra.me.REG[0]);
- if (!once_value_6) {
- fra.me.REG[0] = BOX_NativeString(" is private.");
- REGB1 = TAG_Int(12);
- fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB1);
- once_value_6 = fra.me.REG[0];
- register_static_object(&once_value_6);
- } else fra.me.REG[0] = once_value_6;
- fra.me.REG[0] = fra.me.REG[0];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[0]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2], fra.me.REG[3]);
- /* syntax/syntax_base.nit:78 */
- REGB1 = TAG_Bool(0);
- REGB2 = REGB1;
- goto label1;
- }
- }
- }
- /* syntax/syntax_base.nit:80 */
- REGB1 = TAG_Bool(1);
- REGB2 = REGB1;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB2;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcLocalClass___node[] = "syntax_base::MMSrcLocalClass::node";
-val_t syntax___syntax_base___MMSrcLocalClass___node(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 87;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcLocalClass___node;
- 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;
- /* syntax/syntax_base.nit:87 */
- fra.me.REG[1] = fra.me.REG[0];
- /* syntax/syntax_base.nit:88 */
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[1] = CALL_syntax___syntax_base___MMModule___nodes(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- REGB0 = TAG_Bool((fra.me.REG[1]==NIT_NULL) || VAL_ISA(fra.me.REG[1], COLOR_parser___parser_nodes___AClassdef, ID_parser___parser_nodes___AClassdef)) /*cast nullable AClassdef*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 88);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcLocalClass___formal_dict[] = "syntax_base::MMSrcLocalClass::formal_dict";
-val_t syntax___syntax_base___MMSrcLocalClass___formal_dict(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 90;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcLocalClass___formal_dict;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:90 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMSrcLocalClass____formal_dict(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_formal_dict", LOCATE_syntax___syntax_base, 90);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMSrcLocalClass____formal_dict(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcLocalClass___src_local_properties[] = "syntax_base::MMSrcLocalClass::src_local_properties";
-val_t syntax___syntax_base___MMSrcLocalClass___src_local_properties(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 93;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcLocalClass___src_local_properties;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:93 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMSrcLocalClass____src_local_properties(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_src_local_properties", LOCATE_syntax___syntax_base, 93);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMSrcLocalClass____src_local_properties(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcLocalClass___init[] = "syntax_base::MMSrcLocalClass::init";
-void syntax___syntax_base___MMSrcLocalClass___init(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4, int* init_table){
- int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMSrcLocalClass].i;
- struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
- val_t REGB0;
- val_t tmp;
- if (init_table[itpos1]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 96;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcLocalClass___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 5;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- REGB0 = p4;
- /* syntax/syntax_base.nit:96 */
- fra.me.REG[4] = fra.me.REG[0];
- /* syntax/syntax_base.nit:98 */
- CALL_metamodel___abstractmetamodel___MMLocalClass___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], REGB0, init_table);
- /* syntax/syntax_base.nit:99 */
- CALL_syntax___syntax_base___MMModule___nodes__eq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[4], fra.me.REG[3]);
- /* syntax/syntax_base.nit:100 */
- fra.me.REG[3] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
- ATTR_syntax___syntax_base___MMSrcLocalClass____src_local_properties(fra.me.REG[4]) = fra.me.REG[3];
- stack_frame_head = fra.me.prev;
- init_table[itpos1] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMGlobalProperty___check_visibility[] = "syntax_base::MMGlobalProperty::check_visibility";
-val_t syntax___syntax_base___MMGlobalProperty___check_visibility(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4){
- struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t REGB4;
- val_t tmp;
- 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 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 105;
- fra.me.meth = LOCATE_syntax___syntax_base___MMGlobalProperty___check_visibility;
- 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;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- REGB0 = p4;
- /* syntax/syntax_base.nit:107 */
- fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMGlobalProperty___local_class(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[4])(fra.me.REG[4]);
- /* syntax/syntax_base.nit:108 */
- REGB1 = TAG_Bool(VAL_ISA(fra.me.REG[4], COLOR_syntax___syntax_base___MMSrcModule, ID_syntax___syntax_base___MMSrcModule)) /*cast MMSrcModule*/;
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_syntax___syntax_base, 108);
- }
- /* syntax/syntax_base.nit:109 */
- REGB1 = CALL_metamodel___abstractmetamodel___MMModule___visibility_for(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- /* syntax/syntax_base.nit:110 */
- REGB2 = TAG_Int(3);
- REGB3 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB2));
- if (UNTAG_Bool(REGB3)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB2 = TAG_Bool((REGB1)==(REGB2));
- /* syntax/syntax_base.nit:110 */
- REGB3 = REGB2;
- }
- if (UNTAG_Bool(REGB3)) {
- /* syntax/syntax_base.nit:111 */
- REGB3 = TAG_Bool(1);
- goto label1;
- } else {
- /* syntax/syntax_base.nit:112 */
- REGB2 = TAG_Int(0);
- REGB4 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB2));
- if (UNTAG_Bool(REGB4)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB2 = TAG_Bool((REGB1)==(REGB2));
- /* syntax/syntax_base.nit:112 */
- REGB4 = REGB2;
- }
- if (UNTAG_Bool(REGB4)) {
- /* syntax/syntax_base.nit:114 */
- REGB4 = TAG_Int(5);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB4);
- if (!once_value_2) {
- fra.me.REG[5] = BOX_NativeString("Visibility error: Property ");
- REGB4 = TAG_Int(27);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB4);
- once_value_2 = fra.me.REG[5];
- register_static_object(&once_value_2);
- } else fra.me.REG[5] = once_value_2;
- fra.me.REG[5] = fra.me.REG[5];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
- fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
- if (!once_value_3) {
- fra.me.REG[5] = BOX_NativeString(" comes from the hidden module ");
- REGB4 = TAG_Int(30);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB4);
- once_value_3 = fra.me.REG[5];
- register_static_object(&once_value_3);
- } else fra.me.REG[5] = once_value_3;
- fra.me.REG[5] = fra.me.REG[5];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
- 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[3])(fra.me.REG[3], fra.me.REG[4]);
- if (!once_value_4) {
- fra.me.REG[4] = BOX_NativeString(".");
- REGB4 = TAG_Int(1);
- fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB4);
- 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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2], fra.me.REG[3]);
- /* syntax/syntax_base.nit:115 */
- REGB4 = TAG_Bool(0);
- REGB3 = REGB4;
- goto label1;
- } else {
- /* syntax/syntax_base.nit:116 */
- REGB4 = CALL_metamodel___abstractmetamodel___MMGlobalProperty___visibility_level(fra.me.REG[0])(fra.me.REG[0]);
- REGB2 = TAG_Int(3);
- REGB1 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB2));
- /* syntax/syntax_base.nit:116 */
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:117 */
- REGB2 = TAG_Int(3);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB2);
- if (!once_value_5) {
- fra.me.REG[4] = BOX_NativeString("Visibility error: Property ");
- REGB2 = TAG_Int(27);
- fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB2);
- 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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- if (!once_value_6) {
- fra.me.REG[4] = BOX_NativeString(" is private.");
- REGB2 = TAG_Int(12);
- fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB2);
- 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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2], fra.me.REG[3]);
- /* syntax/syntax_base.nit:118 */
- REGB2 = TAG_Bool(0);
- REGB3 = REGB2;
- goto label1;
- } else {
- /* syntax/syntax_base.nit:119 */
- REGB2 = CALL_metamodel___abstractmetamodel___MMGlobalProperty___visibility_level(fra.me.REG[0])(fra.me.REG[0]);
- REGB4 = TAG_Int(2);
- REGB1 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB1)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:243 */
- REGB4 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB4));
- /* syntax/syntax_base.nit:119 */
- if (UNTAG_Bool(REGB4)) {
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- } else {
- REGB4 = TAG_Bool(0);
- REGB0 = REGB4;
- }
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:120 */
- REGB0 = TAG_Int(3);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_7) {
- fra.me.REG[4] = BOX_NativeString("Visibility error: Property ");
- REGB0 = TAG_Int(27);
- fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
- 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[3])(fra.me.REG[3], fra.me.REG[0]);
- if (!once_value_8) {
- fra.me.REG[0] = BOX_NativeString(" is protected and can only acceded by self.");
- REGB0 = TAG_Int(43);
- fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
- once_value_8 = fra.me.REG[0];
- register_static_object(&once_value_8);
- } else fra.me.REG[0] = once_value_8;
- fra.me.REG[0] = fra.me.REG[0];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[0]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2], fra.me.REG[3]);
- /* syntax/syntax_base.nit:121 */
- REGB0 = TAG_Bool(0);
- REGB3 = REGB0;
- goto label1;
- }
- }
- }
- }
- /* syntax/syntax_base.nit:123 */
- REGB0 = TAG_Bool(1);
- REGB3 = REGB0;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB3;
-}
-static const char LOCATE_syntax___syntax_base___MMLocalProperty___node[] = "syntax_base::MMLocalProperty::node";
-val_t syntax___syntax_base___MMLocalProperty___node(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 128;
- fra.me.meth = LOCATE_syntax___syntax_base___MMLocalProperty___node;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:129 */
- fra.me.REG[0] = NIT_NULL;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMLocalProperty___is_init[] = "syntax_base::MMLocalProperty::is_init";
-val_t syntax___syntax_base___MMLocalProperty___is_init(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 131;
- fra.me.meth = LOCATE_syntax___syntax_base___MMLocalProperty___is_init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:132 */
- REGB0 = TAG_Bool(0);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcAttribute___node[] = "syntax_base::MMSrcAttribute::(syntax_base::MMLocalProperty::node)";
-val_t syntax___syntax_base___MMSrcAttribute___node(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 138;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcAttribute___node;
- 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;
- /* syntax/syntax_base.nit:138 */
- fra.me.REG[1] = fra.me.REG[0];
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___mmmodule(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[1] = CALL_syntax___syntax_base___MMModule___nodes(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- REGB0 = TAG_Bool((fra.me.REG[1]==NIT_NULL) || VAL_ISA(fra.me.REG[1], COLOR_parser___parser_nodes___AAttrPropdef, ID_parser___parser_nodes___AAttrPropdef)) /*cast nullable AAttrPropdef*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 138);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMSrcAttribute___init[] = "syntax_base::MMSrcAttribute::init";
-void syntax___syntax_base___MMSrcAttribute___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos2 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMSrcAttribute].i;
- struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
- val_t tmp;
- if (init_table[itpos2]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 139;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcAttribute___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 5;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:139 */
- fra.me.REG[4] = fra.me.REG[0];
- /* syntax/syntax_base.nit:141 */
- CALL_metamodel___abstractmetamodel___MMLocalProperty___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- /* syntax/syntax_base.nit:142 */
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[2])(fra.me.REG[2]);
- CALL_syntax___syntax_base___MMModule___nodes__eq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4], fra.me.REG[3]);
- stack_frame_head = fra.me.prev;
- init_table[itpos2] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcMethod___is_intern[] = "syntax_base::MMSrcMethod::(abstractmetamodel::MMMethod::is_intern)";
-val_t syntax___syntax_base___MMSrcMethod___is_intern(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 149;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcMethod___is_intern;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:149 */
- REGB0 = TAG_Bool(0);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcMethod___is_extern[] = "syntax_base::MMSrcMethod::(abstractmetamodel::MMMethod::is_extern)";
-val_t syntax___syntax_base___MMSrcMethod___is_extern(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 150;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcMethod___is_extern;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:150 */
- REGB0 = TAG_Bool(0);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcMethod___is_abstract[] = "syntax_base::MMSrcMethod::(abstractmetamodel::MMMethod::is_abstract)";
-val_t syntax___syntax_base___MMSrcMethod___is_abstract(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 151;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcMethod___is_abstract;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:151 */
- REGB0 = TAG_Bool(0);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcMethod___extern_name[] = "syntax_base::MMSrcMethod::(abstractmetamodel::MMMethod::extern_name)";
-val_t syntax___syntax_base___MMSrcMethod___extern_name(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 152;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcMethod___extern_name;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:152 */
- fra.me.REG[0] = NIT_NULL;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMAttrImplementationMethod___node[] = "syntax_base::MMAttrImplementationMethod::(syntax_base::MMLocalProperty::node)";
-val_t syntax___syntax_base___MMAttrImplementationMethod___node(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 158;
- fra.me.meth = LOCATE_syntax___syntax_base___MMAttrImplementationMethod___node;
- 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;
- /* syntax/syntax_base.nit:158 */
- fra.me.REG[1] = fra.me.REG[0];
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___mmmodule(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[1] = CALL_syntax___syntax_base___MMModule___nodes(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- REGB0 = TAG_Bool((fra.me.REG[1]==NIT_NULL) || VAL_ISA(fra.me.REG[1], COLOR_parser___parser_nodes___AAttrPropdef, ID_parser___parser_nodes___AAttrPropdef)) /*cast nullable AAttrPropdef*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 158);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMAttrImplementationMethod___init[] = "syntax_base::MMAttrImplementationMethod::init";
-void syntax___syntax_base___MMAttrImplementationMethod___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos3 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMAttrImplementationMethod].i;
- struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
- val_t tmp;
- if (init_table[itpos3]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 159;
- fra.me.meth = LOCATE_syntax___syntax_base___MMAttrImplementationMethod___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 5;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:159 */
- fra.me.REG[4] = fra.me.REG[0];
- /* syntax/syntax_base.nit:161 */
- CALL_metamodel___abstractmetamodel___MMLocalProperty___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- /* syntax/syntax_base.nit:162 */
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[2])(fra.me.REG[2]);
- CALL_syntax___syntax_base___MMModule___nodes__eq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4], fra.me.REG[3]);
- stack_frame_head = fra.me.prev;
- init_table[itpos3] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMReadImplementationMethod___init[] = "syntax_base::MMReadImplementationMethod::init";
-void syntax___syntax_base___MMReadImplementationMethod___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos4 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMReadImplementationMethod].i;
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t tmp;
- if (init_table[itpos4]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 169;
- fra.me.meth = LOCATE_syntax___syntax_base___MMReadImplementationMethod___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:171 */
- CALL_syntax___syntax_base___MMAttrImplementationMethod___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], fra.me.REG[3], init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos4] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMWriteImplementationMethod___init[] = "syntax_base::MMWriteImplementationMethod::init";
-void syntax___syntax_base___MMWriteImplementationMethod___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos5 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMWriteImplementationMethod].i;
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t tmp;
- if (init_table[itpos5]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 178;
- fra.me.meth = LOCATE_syntax___syntax_base___MMWriteImplementationMethod___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:180 */
- CALL_syntax___syntax_base___MMAttrImplementationMethod___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], fra.me.REG[3], init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos5] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___is_init[] = "syntax_base::MMMethSrcMethod::(syntax_base::MMLocalProperty::is_init)";
-val_t syntax___syntax_base___MMMethSrcMethod___is_init(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 187;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___is_init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:187 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMMethSrcMethod____is_init(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_is_init", LOCATE_syntax___syntax_base, 187);
- }
- REGB0 = ATTR_syntax___syntax_base___MMMethSrcMethod____is_init(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___is_intern[] = "syntax_base::MMMethSrcMethod::(abstractmetamodel::MMMethod::is_intern)";
-val_t syntax___syntax_base___MMMethSrcMethod___is_intern(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 188;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___is_intern;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:188 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMMethSrcMethod____is_intern(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_is_intern", LOCATE_syntax___syntax_base, 188);
- }
- REGB0 = ATTR_syntax___syntax_base___MMMethSrcMethod____is_intern(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___is_extern[] = "syntax_base::MMMethSrcMethod::(abstractmetamodel::MMMethod::is_extern)";
-val_t syntax___syntax_base___MMMethSrcMethod___is_extern(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 189;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___is_extern;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:189 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMMethSrcMethod____is_extern(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_is_extern", LOCATE_syntax___syntax_base, 189);
- }
- REGB0 = ATTR_syntax___syntax_base___MMMethSrcMethod____is_extern(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___is_abstract[] = "syntax_base::MMMethSrcMethod::(abstractmetamodel::MMMethod::is_abstract)";
-val_t syntax___syntax_base___MMMethSrcMethod___is_abstract(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 190;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___is_abstract;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:190 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMMethSrcMethod____is_abstract(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_is_abstract", LOCATE_syntax___syntax_base, 190);
- }
- REGB0 = ATTR_syntax___syntax_base___MMMethSrcMethod____is_abstract(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___extern_name[] = "syntax_base::MMMethSrcMethod::(abstractmetamodel::MMMethod::extern_name)";
-val_t syntax___syntax_base___MMMethSrcMethod___extern_name(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 191;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___extern_name;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:191 */
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMMethSrcMethod____extern_name(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___extern_name__eq[] = "syntax_base::MMMethSrcMethod::extern_name=";
-void syntax___syntax_base___MMMethSrcMethod___extern_name__eq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 191;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___extern_name__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:191 */
- ATTR_syntax___syntax_base___MMMethSrcMethod____extern_name(fra.me.REG[0]) = fra.me.REG[1];
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___explicit_casts[] = "syntax_base::MMMethSrcMethod::(static_type::MMMethod::explicit_casts)";
-val_t syntax___syntax_base___MMMethSrcMethod___explicit_casts(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 192;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___explicit_casts;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:192 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMMethSrcMethod____explicit_casts(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_explicit_casts", LOCATE_syntax___syntax_base, 192);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMMethSrcMethod____explicit_casts(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___explicit_imports[] = "syntax_base::MMMethSrcMethod::(abstractmetamodel::MMMethod::explicit_imports)";
-val_t syntax___syntax_base___MMMethSrcMethod___explicit_imports(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 193;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___explicit_imports;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:193 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMMethSrcMethod____explicit_imports(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_explicit_imports", LOCATE_syntax___syntax_base, 193);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMMethSrcMethod____explicit_imports(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___node[] = "syntax_base::MMMethSrcMethod::(syntax_base::MMLocalProperty::node)";
-val_t syntax___syntax_base___MMMethSrcMethod___node(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 194;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___node;
- 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;
- /* syntax/syntax_base.nit:194 */
- fra.me.REG[1] = fra.me.REG[0];
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___mmmodule(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[1] = CALL_syntax___syntax_base___MMModule___nodes(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- REGB0 = TAG_Bool((fra.me.REG[1]==NIT_NULL) || VAL_ISA(fra.me.REG[1], COLOR_parser___parser_nodes___AMethPropdef, ID_parser___parser_nodes___AMethPropdef)) /*cast nullable AMethPropdef*/;
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 194);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___MMMethSrcMethod___init[] = "syntax_base::MMMethSrcMethod::init";
-void syntax___syntax_base___MMMethSrcMethod___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos6 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMMethSrcMethod].i;
- struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
- val_t REGB0;
- val_t tmp;
- if (init_table[itpos6]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 195;
- fra.me.meth = LOCATE_syntax___syntax_base___MMMethSrcMethod___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 5;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:195 */
- fra.me.REG[4] = fra.me.REG[0];
- /* syntax/syntax_base.nit:197 */
- CALL_metamodel___abstractmetamodel___MMLocalProperty___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- /* syntax/syntax_base.nit:198 */
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[2])(fra.me.REG[2]);
- CALL_syntax___syntax_base___MMModule___nodes__eq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[4], fra.me.REG[3]);
- /* syntax/syntax_base.nit:199 */
- fra.me.REG[3] = CALL_syntax___syntax_base___MMLocalProperty___node(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_parser___parser_nodes___AInitPropdef, ID_parser___parser_nodes___AInitPropdef)) /*cast AInitPropdef*/;
- ATTR_syntax___syntax_base___MMMethSrcMethod____is_init(fra.me.REG[4]) = REGB0;
- /* syntax/syntax_base.nit:200 */
- fra.me.REG[3] = CALL_syntax___syntax_base___MMLocalProperty___node(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_parser___parser_nodes___AInternMethPropdef, ID_parser___parser_nodes___AInternMethPropdef)) /*cast AInternMethPropdef*/;
- ATTR_syntax___syntax_base___MMMethSrcMethod____is_intern(fra.me.REG[4]) = REGB0;
- /* syntax/syntax_base.nit:201 */
- fra.me.REG[3] = CALL_syntax___syntax_base___MMLocalProperty___node(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_parser___parser_nodes___AExternPropdef, ID_parser___parser_nodes___AExternPropdef)) /*cast AExternPropdef*/;
- ATTR_syntax___syntax_base___MMMethSrcMethod____is_extern(fra.me.REG[4]) = REGB0;
- /* syntax/syntax_base.nit:202 */
- fra.me.REG[3] = CALL_syntax___syntax_base___MMLocalProperty___node(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = TAG_Bool((fra.me.REG[3]!=NIT_NULL) && VAL_ISA(fra.me.REG[3], COLOR_parser___parser_nodes___ADeferredMethPropdef, ID_parser___parser_nodes___ADeferredMethPropdef)) /*cast ADeferredMethPropdef*/;
- ATTR_syntax___syntax_base___MMMethSrcMethod____is_abstract(fra.me.REG[4]) = REGB0;
- /* syntax/syntax_base.nit:203 */
- ATTR_syntax___syntax_base___MMMethSrcMethod____extern_name(fra.me.REG[4]) = NIT_NULL;
- /* syntax/syntax_base.nit:205 */
- REGB0 = CALL_metamodel___abstractmetamodel___MMMethod___is_extern(fra.me.REG[4])(fra.me.REG[4]);
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:206 */
- fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalProperty___mmmodule(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = TAG_Bool(1);
- CALL_metamodel___abstractmetamodel___MMModule___is_extern_hybrid__eq(fra.me.REG[4])(fra.me.REG[4], REGB0);
- }
- stack_frame_head = fra.me.prev;
- init_table[itpos6] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMSrcTypeProperty___init[] = "syntax_base::MMSrcTypeProperty::init";
-void syntax___syntax_base___MMSrcTypeProperty___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos7 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMSrcTypeProperty].i;
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t tmp;
- if (init_table[itpos7]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 215;
- fra.me.meth = LOCATE_syntax___syntax_base___MMSrcTypeProperty___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:217 */
- CALL_metamodel___abstractmetamodel___MMLocalProperty___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos7] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___MMImplicitInit___super_init[] = "syntax_base::MMImplicitInit::super_init";
-val_t syntax___syntax_base___MMImplicitInit___super_init(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 224;
- fra.me.meth = LOCATE_syntax___syntax_base___MMImplicitInit___super_init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:224 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 224);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___MMImplicitInit___is_init[] = "syntax_base::MMImplicitInit::(syntax_base::MMLocalProperty::is_init)";
-val_t syntax___syntax_base___MMImplicitInit___is_init(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 225;
- fra.me.meth = LOCATE_syntax___syntax_base___MMImplicitInit___is_init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:225 */
- REGB0 = TAG_Bool(1);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___MMImplicitInit___unassigned_attributes[] = "syntax_base::MMImplicitInit::unassigned_attributes";
-val_t syntax___syntax_base___MMImplicitInit___unassigned_attributes(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 226;
- fra.me.meth = LOCATE_syntax___syntax_base___MMImplicitInit___unassigned_attributes;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:226 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMImplicitInit____unassigned_attributes(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_unassigned_attributes", LOCATE_syntax___syntax_base, 226);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMImplicitInit____unassigned_attributes(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMImplicitInit___super_inits[] = "syntax_base::MMImplicitInit::super_inits";
-val_t syntax___syntax_base___MMImplicitInit___super_inits(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 227;
- fra.me.meth = LOCATE_syntax___syntax_base___MMImplicitInit___super_inits;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:227 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___MMImplicitInit____super_inits(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_super_inits", LOCATE_syntax___syntax_base, 227);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___MMImplicitInit____super_inits(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___MMImplicitInit___init[] = "syntax_base::MMImplicitInit::init";
-void syntax___syntax_base___MMImplicitInit___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos8 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___MMImplicitInit].i;
- struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
- val_t REGB0;
- val_t tmp;
- static val_t once_value_1; /* Once value */
- static val_t once_value_2; /* Once value */
- if (init_table[itpos8]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 228;
- fra.me.meth = LOCATE_syntax___syntax_base___MMImplicitInit___init;
- 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;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:228 */
- fra.me.REG[4] = fra.me.REG[0];
- /* syntax/syntax_base.nit:230 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[5] = BOX_NativeString("init");
- REGB0 = TAG_Int(4);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0);
- once_value_2 = fra.me.REG[5];
- register_static_object(&once_value_2);
- } else fra.me.REG[5] = once_value_2;
- fra.me.REG[5] = fra.me.REG[5];
- fra.me.REG[5] = CALL_symbol___String___to_symbol(fra.me.REG[5])(fra.me.REG[5]);
- once_value_1 = fra.me.REG[5];
- register_static_object(&once_value_1);
- } else fra.me.REG[5] = once_value_1;
- fra.me.REG[5] = fra.me.REG[5];
- CALL_syntax___syntax_base___MMMethSrcMethod___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[5], fra.me.REG[1], NIT_NULL, init_table);
- /* syntax/syntax_base.nit:231 */
- ATTR_syntax___syntax_base___MMImplicitInit____unassigned_attributes(fra.me.REG[4]) = fra.me.REG[2];
- /* syntax/syntax_base.nit:232 */
- ATTR_syntax___syntax_base___MMImplicitInit____super_inits(fra.me.REG[4]) = fra.me.REG[3];
- stack_frame_head = fra.me.prev;
- init_table[itpos8] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___Variable___name[] = "syntax_base::Variable::name";
-val_t syntax___syntax_base___Variable___name(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 238;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___name;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:238 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___Variable____name(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_name", LOCATE_syntax___syntax_base, 238);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___Variable____name(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___Variable___decl[] = "syntax_base::Variable::decl";
-val_t syntax___syntax_base___Variable___decl(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 241;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___decl;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:241 */
- fra.me.REG[0] = ATTR_syntax___syntax_base___Variable____decl(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___Variable___stype[] = "syntax_base::Variable::stype";
-val_t syntax___syntax_base___Variable___stype(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 244;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___stype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:244 */
- fra.me.REG[0] = ATTR_syntax___syntax_base___Variable____stype(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___Variable___stype__eq[] = "syntax_base::Variable::stype=";
-void syntax___syntax_base___Variable___stype__eq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 244;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___stype__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:244 */
- ATTR_syntax___syntax_base___Variable____stype(fra.me.REG[0]) = fra.me.REG[1];
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___Variable___to_s[] = "syntax_base::Variable::(string::Object::to_s)";
-val_t syntax___syntax_base___Variable___to_s(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 247;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___to_s;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:247 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___Variable____name(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_name", LOCATE_syntax___syntax_base, 247);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___Variable____name(fra.me.REG[0]);
- fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___Variable___kind[] = "syntax_base::Variable::kind";
-val_t syntax___syntax_base___Variable___kind(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 249;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___kind;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:249 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 249);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___Variable___init[] = "syntax_base::Variable::init";
-void syntax___syntax_base___Variable___init(val_t p0, val_t p1, val_t p2, int* init_table){
- int itpos9 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___Variable].i;
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t tmp;
- if (init_table[itpos9]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 251;
- fra.me.meth = LOCATE_syntax___syntax_base___Variable___init;
- 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;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:253 */
- ATTR_syntax___syntax_base___Variable____name(fra.me.REG[0]) = fra.me.REG[1];
- /* syntax/syntax_base.nit:254 */
- ATTR_syntax___syntax_base___Variable____decl(fra.me.REG[0]) = fra.me.REG[2];
- stack_frame_head = fra.me.prev;
- init_table[itpos9] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___VarVariable___kind[] = "syntax_base::VarVariable::(syntax_base::Variable::kind)";
-val_t syntax___syntax_base___VarVariable___kind(val_t p0){
- struct {struct stack_frame_t me;} 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_syntax___syntax_base;
- fra.me.line = 261;
- fra.me.meth = LOCATE_syntax___syntax_base___VarVariable___kind;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:261 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[0] = BOX_NativeString("variable");
- REGB0 = TAG_Int(8);
- fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
- once_value_2 = fra.me.REG[0];
- register_static_object(&once_value_2);
- } else fra.me.REG[0] = once_value_2;
- fra.me.REG[0] = fra.me.REG[0];
- once_value_1 = fra.me.REG[0];
- register_static_object(&once_value_1);
- } else fra.me.REG[0] = once_value_1;
- fra.me.REG[0] = fra.me.REG[0];
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___VarVariable___init[] = "syntax_base::VarVariable::init";
-void syntax___syntax_base___VarVariable___init(val_t p0, val_t p1, val_t p2, int* init_table){
- int itpos10 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___VarVariable].i;
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t tmp;
- if (init_table[itpos10]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 262;
- fra.me.meth = LOCATE_syntax___syntax_base___VarVariable___init;
- 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;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:262 */
- CALL_syntax___syntax_base___Variable___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos10] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___ParamVariable___kind[] = "syntax_base::ParamVariable::(syntax_base::Variable::kind)";
-val_t syntax___syntax_base___ParamVariable___kind(val_t p0){
- struct {struct stack_frame_t me;} 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_syntax___syntax_base;
- fra.me.line = 268;
- fra.me.meth = LOCATE_syntax___syntax_base___ParamVariable___kind;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:268 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[0] = BOX_NativeString("parameter");
- REGB0 = TAG_Int(9);
- fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
- once_value_2 = fra.me.REG[0];
- register_static_object(&once_value_2);
- } else fra.me.REG[0] = once_value_2;
- fra.me.REG[0] = fra.me.REG[0];
- once_value_1 = fra.me.REG[0];
- register_static_object(&once_value_1);
- } else fra.me.REG[0] = once_value_1;
- fra.me.REG[0] = fra.me.REG[0];
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___ParamVariable___init[] = "syntax_base::ParamVariable::init";
-void syntax___syntax_base___ParamVariable___init(val_t p0, val_t p1, val_t p2, int* init_table){
- int itpos11 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___ParamVariable].i;
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t tmp;
- if (init_table[itpos11]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 269;
- fra.me.meth = LOCATE_syntax___syntax_base___ParamVariable___init;
- 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;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:269 */
- CALL_syntax___syntax_base___Variable___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos11] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AutoVariable___kind[] = "syntax_base::AutoVariable::(syntax_base::Variable::kind)";
-val_t syntax___syntax_base___AutoVariable___kind(val_t p0){
- struct {struct stack_frame_t me;} 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_syntax___syntax_base;
- fra.me.line = 275;
- fra.me.meth = LOCATE_syntax___syntax_base___AutoVariable___kind;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:275 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[0] = BOX_NativeString("automatic variable");
- REGB0 = TAG_Int(18);
- fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
- once_value_2 = fra.me.REG[0];
- register_static_object(&once_value_2);
- } else fra.me.REG[0] = once_value_2;
- fra.me.REG[0] = fra.me.REG[0];
- once_value_1 = fra.me.REG[0];
- register_static_object(&once_value_1);
- } else fra.me.REG[0] = once_value_1;
- fra.me.REG[0] = fra.me.REG[0];
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AutoVariable___init[] = "syntax_base::AutoVariable::init";
-void syntax___syntax_base___AutoVariable___init(val_t p0, val_t p1, val_t p2, int* init_table){
- int itpos12 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___AutoVariable].i;
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t tmp;
- if (init_table[itpos12]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 276;
- fra.me.meth = LOCATE_syntax___syntax_base___AutoVariable___init;
- 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;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:276 */
- CALL_syntax___syntax_base___Variable___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- stack_frame_head = fra.me.prev;
- init_table[itpos12] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___ClosureVariable___kind[] = "syntax_base::ClosureVariable::(syntax_base::Variable::kind)";
-val_t syntax___syntax_base___ClosureVariable___kind(val_t p0){
- struct {struct stack_frame_t me;} 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_syntax___syntax_base;
- fra.me.line = 283;
- fra.me.meth = LOCATE_syntax___syntax_base___ClosureVariable___kind;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:283 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[0] = BOX_NativeString("closure");
- REGB0 = TAG_Int(7);
- fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
- once_value_2 = fra.me.REG[0];
- register_static_object(&once_value_2);
- } else fra.me.REG[0] = once_value_2;
- fra.me.REG[0] = fra.me.REG[0];
- once_value_1 = fra.me.REG[0];
- register_static_object(&once_value_1);
- } else fra.me.REG[0] = once_value_1;
- fra.me.REG[0] = fra.me.REG[0];
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___ClosureVariable___closure[] = "syntax_base::ClosureVariable::closure";
-val_t syntax___syntax_base___ClosureVariable___closure(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 285;
- fra.me.meth = LOCATE_syntax___syntax_base___ClosureVariable___closure;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:285 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___ClosureVariable____closure(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_closure", LOCATE_syntax___syntax_base, 285);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___ClosureVariable____closure(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___ClosureVariable___init[] = "syntax_base::ClosureVariable::init";
-void syntax___syntax_base___ClosureVariable___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
- int itpos13 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___ClosureVariable].i;
- struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
- val_t tmp;
- if (init_table[itpos13]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 288;
- fra.me.meth = LOCATE_syntax___syntax_base___ClosureVariable___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 5;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:288 */
- fra.me.REG[4] = fra.me.REG[0];
- /* syntax/syntax_base.nit:290 */
- CALL_syntax___syntax_base___Variable___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], init_table);
- /* syntax/syntax_base.nit:291 */
- ATTR_syntax___syntax_base___ClosureVariable____closure(fra.me.REG[4]) = fra.me.REG[3];
- stack_frame_head = fra.me.prev;
- init_table[itpos13] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name[] = "syntax_base::AbsSyntaxVisitor::get_type_by_name";
-val_t syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[5];} 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_syntax___syntax_base;
- fra.me.line = 300;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_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;
- /* syntax/syntax_base.nit:302 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 302);
- }
- fra.me.REG[2] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- REGB0 = CALL_metamodel___abstractmetamodel___MMModule___has_global_class_named(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_tc", LOCATE_syntax___syntax_base, 302);
- }
- fra.me.REG[2] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0]);
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 302);
- }
- fra.me.REG[3] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMModule___location(fra.me.REG[3])(fra.me.REG[3]);
- REGB0 = TAG_Int(3);
- fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_1) {
- fra.me.REG[5] = BOX_NativeString("Missing necessary class: \"");
- REGB0 = TAG_Int(26);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0);
- once_value_1 = fra.me.REG[5];
- register_static_object(&once_value_1);
- } else fra.me.REG[5] = once_value_1;
- 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[5] = 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[5]);
- if (!once_value_2) {
- fra.me.REG[5] = BOX_NativeString("\"");
- REGB0 = TAG_Int(1);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0);
- once_value_2 = fra.me.REG[5];
- register_static_object(&once_value_2);
- } else fra.me.REG[5] = once_value_2;
- 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]);
- CALL_toolcontext___ToolContext___fatal_error(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3], fra.me.REG[4]);
- }
- /* syntax/syntax_base.nit:303 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 303);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMModule___class_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* syntax/syntax_base.nit:304 */
- fra.me.REG[1] = CALL_metamodel___static_type___MMLocalClass___get_type(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_syntax___syntax_base___AbsSyntaxVisitor___get_instantiated_type_by_name[] = "syntax_base::AbsSyntaxVisitor::get_instantiated_type_by_name";
-val_t syntax___syntax_base___AbsSyntaxVisitor___get_instantiated_type_by_name(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[6];} 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_syntax___syntax_base;
- fra.me.line = 307;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___get_instantiated_type_by_name;
- fra.me.has_broke = 0;
- fra.me.REG_size = 7;
- 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[6] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:309 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 309);
- }
- fra.me.REG[3] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- REGB0 = CALL_metamodel___abstractmetamodel___MMModule___has_global_class_named(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_tc", LOCATE_syntax___syntax_base, 309);
- }
- fra.me.REG[3] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0]);
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 309);
- }
- fra.me.REG[4] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMModule___location(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = TAG_Int(3);
- fra.me.REG[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_1) {
- fra.me.REG[6] = BOX_NativeString("Missing necessary class: \"");
- REGB0 = TAG_Int(26);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0);
- once_value_1 = fra.me.REG[6];
- register_static_object(&once_value_1);
- } else fra.me.REG[6] = once_value_1;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- if (!once_value_2) {
- fra.me.REG[6] = BOX_NativeString("\"");
- REGB0 = TAG_Int(1);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0);
- once_value_2 = fra.me.REG[6];
- register_static_object(&once_value_2);
- } else fra.me.REG[6] = once_value_2;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[5])(fra.me.REG[5]);
- CALL_toolcontext___ToolContext___fatal_error(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4], fra.me.REG[5]);
- }
- /* syntax/syntax_base.nit:310 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 310);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- fra.me.REG[1] = CALL_metamodel___abstractmetamodel___MMModule___class_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* syntax/syntax_base.nit:311 */
- fra.me.REG[2] = CALL_metamodel___genericity___MMLocalClass___get_instantiate_type(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_object[] = "syntax_base::AbsSyntaxVisitor::type_object";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_object(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 314;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_object;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:317 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("Object");
- REGB0 = TAG_Int(6);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_bool[] = "syntax_base::AbsSyntaxVisitor::type_bool";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_bool(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 320;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_bool;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:323 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("Bool");
- REGB0 = TAG_Int(4);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_int[] = "syntax_base::AbsSyntaxVisitor::type_int";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_int(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 326;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_int;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:329 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("Int");
- REGB0 = TAG_Int(3);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_float[] = "syntax_base::AbsSyntaxVisitor::type_float";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_float(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 332;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_float;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:335 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("Float");
- REGB0 = TAG_Int(5);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_char[] = "syntax_base::AbsSyntaxVisitor::type_char";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_char(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 338;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_char;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:341 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("Char");
- REGB0 = TAG_Int(4);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_string[] = "syntax_base::AbsSyntaxVisitor::type_string";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_string(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 344;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_string;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:347 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("String");
- REGB0 = TAG_Int(6);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_nativestring[] = "syntax_base::AbsSyntaxVisitor::type_nativestring";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_nativestring(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 350;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_nativestring;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:353 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("NativeString");
- REGB0 = TAG_Int(12);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_array[] = "syntax_base::AbsSyntaxVisitor::type_array";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_array(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} 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_syntax___syntax_base;
- fra.me.line = 356;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_array;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:359 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[2] = BOX_NativeString("Array");
- REGB0 = TAG_Int(5);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(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];
- fra.me.REG[2] = CALL_symbol___String___to_symbol(fra.me.REG[2])(fra.me.REG[2]);
- 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];
- REGB0 = TAG_Int(1);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
- fra.me.REG[3] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_instantiated_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2], fra.me.REG[3]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[3];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_discrete[] = "syntax_base::AbsSyntaxVisitor::type_discrete";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_discrete(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} 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_syntax___syntax_base;
- fra.me.line = 362;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_discrete;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:365 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[1] = BOX_NativeString("Discrete");
- REGB0 = TAG_Int(8);
- fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
- once_value_2 = fra.me.REG[1];
- register_static_object(&once_value_2);
- } else fra.me.REG[1] = once_value_2;
- fra.me.REG[1] = fra.me.REG[1];
- fra.me.REG[1] = CALL_symbol___String___to_symbol(fra.me.REG[1])(fra.me.REG[1]);
- 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];
- fra.me.REG[1] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_range[] = "syntax_base::AbsSyntaxVisitor::type_range";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_range(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} 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_syntax___syntax_base;
- fra.me.line = 368;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_range;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:371 */
- if (!once_value_1) {
- if (!once_value_2) {
- fra.me.REG[2] = BOX_NativeString("Range");
- REGB0 = TAG_Int(5);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(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];
- fra.me.REG[2] = CALL_symbol___String___to_symbol(fra.me.REG[2])(fra.me.REG[2]);
- 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];
- REGB0 = TAG_Int(1);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
- fra.me.REG[3] = CALL_syntax___syntax_base___AbsSyntaxVisitor___get_instantiated_type_by_name(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2], fra.me.REG[3]);
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[3];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_none[] = "syntax_base::AbsSyntaxVisitor::type_none";
-val_t syntax___syntax_base___AbsSyntaxVisitor___type_none(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 374;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___type_none;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:377 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 377);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- fra.me.REG[0] = CALL_metamodel___static_type___MMModule___type_none(fra.me.REG[0])(fra.me.REG[0]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___get_method[] = "syntax_base::AbsSyntaxVisitor::get_method";
-val_t syntax___syntax_base___AbsSyntaxVisitor___get_method(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
- val_t REGB0;
- 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 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 380;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___get_method;
- 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;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:382 */
- fra.me.REG[3] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[1])(fra.me.REG[1]);
- REGB0 = CALL_metamodel___abstractmetamodel___MMLocalClass___has_global_property_by_name(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[2]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:383 */
- fra.me.REG[3] = CALL_parser___parser_nodes___Visitor___current_node(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Int(5);
- fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_1) {
- fra.me.REG[5] = BOX_NativeString("Fatal Error: ");
- REGB0 = TAG_Int(13);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0);
- once_value_1 = fra.me.REG[5];
- register_static_object(&once_value_1);
- } else fra.me.REG[5] = once_value_1;
- 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[5] = 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[5]);
- if (!once_value_2) {
- fra.me.REG[5] = BOX_NativeString(" must have a property named ");
- REGB0 = TAG_Int(28);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0);
- once_value_2 = fra.me.REG[5];
- register_static_object(&once_value_2);
- } else fra.me.REG[5] = once_value_2;
- 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[5] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[5]);
- if (!once_value_3) {
- fra.me.REG[5] = BOX_NativeString(".");
- REGB0 = TAG_Int(1);
- fra.me.REG[5] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[5])(fra.me.REG[5], REGB0);
- once_value_3 = fra.me.REG[5];
- register_static_object(&once_value_3);
- } else fra.me.REG[5] = once_value_3;
- 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]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___fatal_error(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3], fra.me.REG[4]);
- }
- /* syntax/syntax_base.nit:385 */
- fra.me.REG[1] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___select_method(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
- goto label4;
- label4: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___mmmodule[] = "syntax_base::AbsSyntaxVisitor::mmmodule";
-val_t syntax___syntax_base___AbsSyntaxVisitor___mmmodule(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 388;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___mmmodule;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:388 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_mmmodule", LOCATE_syntax___syntax_base, 388);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_class[] = "syntax_base::AbsSyntaxVisitor::local_class";
-val_t syntax___syntax_base___AbsSyntaxVisitor___local_class(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 391;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_class;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:391 */
- fra.me.REG[1] = fra.me.REG[0];
- /* syntax/syntax_base.nit:392 */
- fra.me.REG[1] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____local_class(fra.me.REG[1]);
- REGB0 = TAG_Bool(fra.me.REG[1]!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 392);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_class__eq[] = "syntax_base::AbsSyntaxVisitor::local_class=";
-void syntax___syntax_base___AbsSyntaxVisitor___local_class__eq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 393;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_class__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:393 */
- ATTR_syntax___syntax_base___AbsSyntaxVisitor____local_class(fra.me.REG[0]) = fra.me.REG[1];
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_property[] = "syntax_base::AbsSyntaxVisitor::local_property";
-val_t syntax___syntax_base___AbsSyntaxVisitor___local_property(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 395;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_property;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:395 */
- fra.me.REG[1] = fra.me.REG[0];
- /* syntax/syntax_base.nit:396 */
- fra.me.REG[1] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____local_property(fra.me.REG[1]);
- REGB0 = TAG_Bool(fra.me.REG[1]!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_syntax___syntax_base, 396);
- }
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_property__eq[] = "syntax_base::AbsSyntaxVisitor::local_property=";
-void syntax___syntax_base___AbsSyntaxVisitor___local_property__eq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 397;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___local_property__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:397 */
- ATTR_syntax___syntax_base___AbsSyntaxVisitor____local_property(fra.me.REG[0]) = fra.me.REG[1];
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___tc[] = "syntax_base::AbsSyntaxVisitor::tc";
-val_t syntax___syntax_base___AbsSyntaxVisitor___tc(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 399;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___tc;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:399 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_tc", LOCATE_syntax___syntax_base, 399);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___error[] = "syntax_base::AbsSyntaxVisitor::error";
-void syntax___syntax_base___AbsSyntaxVisitor___error(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 402;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___error;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:405 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_tc", LOCATE_syntax___syntax_base, 405);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[3] = NIT_NULL;
- } else {
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 405);
- }
- fra.me.REG[1] = CALL_parser___parser_nodes___ANode___hot_location(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[3] = fra.me.REG[1];
- }
- CALL_toolcontext___ToolContext___error(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3], fra.me.REG[2]);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___fatal_error[] = "syntax_base::AbsSyntaxVisitor::fatal_error";
-void syntax___syntax_base___AbsSyntaxVisitor___fatal_error(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 408;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___fatal_error;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:411 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_tc", LOCATE_syntax___syntax_base, 411);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[3] = NIT_NULL;
- } else {
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 411);
- }
- fra.me.REG[1] = CALL_parser___parser_nodes___ANode___hot_location(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[3] = fra.me.REG[1];
- }
- CALL_toolcontext___ToolContext___fatal_error(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3], fra.me.REG[2]);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___warning[] = "syntax_base::AbsSyntaxVisitor::warning";
-void syntax___syntax_base___AbsSyntaxVisitor___warning(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 414;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___warning;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:417 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_tc", LOCATE_syntax___syntax_base, 417);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[3] = NIT_NULL;
- } else {
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 417);
- }
- fra.me.REG[1] = CALL_parser___parser_nodes___ANode___hot_location(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[3] = fra.me.REG[1];
- }
- CALL_toolcontext___ToolContext___warning(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3], fra.me.REG[2]);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform[] = "syntax_base::AbsSyntaxVisitor::check_conform";
-val_t syntax___syntax_base___AbsSyntaxVisitor___check_conform(val_t p0, val_t p1, val_t p2, val_t p3){
- 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_2; /* Once value */
- static val_t once_value_3; /* Once value */
- static val_t once_value_4; /* Once value */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 420;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform;
- 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;
- fra.me.REG[2] = p2;
- fra.me.REG[3] = p3;
- /* syntax/syntax_base.nit:423 */
- REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(1);
- } else {
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- REGB2 = TAG_Bool(0);
- REGB1 = REGB2;
- } else {
- REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
- REGB1 = REGB2;
- }
- }
- REGB0 = REGB1;
- }
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:424 */
- REGB0 = TAG_Bool(0);
- goto label1;
- }
- /* syntax/syntax_base.nit:426 */
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 426);
- }
- REGB1 = CALL_metamodel___static_type___MMType_____l(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:427 */
- REGB1 = TAG_Bool(1);
- REGB0 = REGB1;
- goto label1;
- }
- /* syntax/syntax_base.nit:429 */
- REGB1 = TAG_Int(5);
- fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
- if (!once_value_2) {
- fra.me.REG[5] = BOX_NativeString("Type error: expected ");
- REGB1 = TAG_Int(21);
- 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;
- 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[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_3) {
- fra.me.REG[3] = BOX_NativeString(", got ");
- REGB1 = TAG_Int(6);
- fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB1);
- once_value_3 = fra.me.REG[3];
- register_static_object(&once_value_3);
- } else fra.me.REG[3] = once_value_3;
- 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[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[2]);
- if (!once_value_4) {
- fra.me.REG[2] = BOX_NativeString("");
- REGB1 = TAG_Int(0);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB1);
- once_value_4 = fra.me.REG[2];
- register_static_object(&once_value_4);
- } else fra.me.REG[2] = once_value_4;
- fra.me.REG[2] = fra.me.REG[2];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[2]);
- fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[4]);
- /* syntax/syntax_base.nit:430 */
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_expr[] = "syntax_base::AbsSyntaxVisitor::check_expr";
-val_t syntax___syntax_base___AbsSyntaxVisitor___check_expr(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} 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_4; /* Once value */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 433;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_expr;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:438 */
- REGB0 = CALL_syntax___syntax_base___AExpr___is_typed(fra.me.REG[1])(fra.me.REG[1]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:439 */
- fra.me.REG[2] = CALL_syntax___syntax_base___AbsSyntaxVisitor___tc(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = CALL_toolcontext___ToolContext___error_count(fra.me.REG[2])(fra.me.REG[2]);
- REGB1 = TAG_Int(0);
- REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- if (UNTAG_Bool(REGB2)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB1 = TAG_Bool((REGB0)==(REGB1));
- /* syntax/syntax_base.nit:439 */
- REGB2 = REGB1;
- }
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:440 */
- REGB2 = TAG_Int(3);
- fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB2);
- if (!once_value_1) {
- fra.me.REG[3] = BOX_NativeString("");
- REGB2 = TAG_Int(0);
- fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB2);
- 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];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
- fra.me.REG[3] = CALL_parser___parser_nodes___ANode___location(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[2])(fra.me.REG[2], fra.me.REG[3]);
- if (!once_value_2) {
- fra.me.REG[3] = BOX_NativeString(" not typed but not error");
- REGB2 = TAG_Int(24);
- fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB2);
- 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];
- 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]);
- CALL_standard___file___Object___print(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
- /* syntax/syntax_base.nit:441 */
- nit_abort("Aborted", NULL, LOCATE_syntax___syntax_base, 441);
- }
- /* syntax/syntax_base.nit:445 */
- REGB2 = TAG_Bool(0);
- goto label3;
- } else {
- /* syntax/syntax_base.nit:446 */
- REGB1 = CALL_syntax___syntax_base___AExpr___is_statement(fra.me.REG[1])(fra.me.REG[1]);
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:447 */
- if (!once_value_4) {
- fra.me.REG[2] = BOX_NativeString("Type error: expected expression.");
- REGB1 = TAG_Int(32);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB1);
- once_value_4 = fra.me.REG[2];
- register_static_object(&once_value_4);
- } else fra.me.REG[2] = once_value_4;
- fra.me.REG[2] = fra.me.REG[2];
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2]);
- /* syntax/syntax_base.nit:448 */
- REGB1 = TAG_Bool(0);
- REGB2 = REGB1;
- goto label3;
- }
- }
- /* syntax/syntax_base.nit:450 */
- REGB1 = TAG_Bool(1);
- REGB2 = REGB1;
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return REGB2;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform_expr[] = "syntax_base::AbsSyntaxVisitor::check_conform_expr";
-val_t syntax___syntax_base___AbsSyntaxVisitor___check_conform_expr(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 453;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform_expr;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:456 */
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(0);
- goto label1;
- }
- /* syntax/syntax_base.nit:457 */
- REGB1 = CALL_syntax___syntax_base___AbsSyntaxVisitor___check_expr(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- if (UNTAG_Bool(REGB1)) {
- fra.me.REG[3] = CALL_syntax___syntax_base___AExpr___stype(fra.me.REG[1])(fra.me.REG[1]);
- REGB1 = CALL_syntax___syntax_base___AbsSyntaxVisitor___check_conform(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[3], fra.me.REG[2]);
- REGB0 = REGB1;
- goto label1;
- } else {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- goto label1;
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return REGB0;
-}
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr[] = "syntax_base::AbsSyntaxVisitor::check_conform_multiexpr";
-val_t syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr(val_t p0, val_t p1, val_t p2){
- struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 460;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr;
- fra.me.has_broke = 0;
- fra.me.REG_size = 5;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:472 */
- fra.me.REG[3] = NIT_NULL;
- CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[2])(fra.me.REG[2], (&(fra.me)), ((fun_t)OC_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr_1));
- switch ((&(fra.me))->has_broke) {
- case 0: break;
- case 1: (&(fra.me))->has_broke = 0; goto label3;
- }
- /* syntax/syntax_base.nit:486 */
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Assert failed", NULL, LOCATE_syntax___syntax_base, 486);
- }
- CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[2])(fra.me.REG[2], (&(fra.me)), ((fun_t)OC_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr_4));
- switch ((&(fra.me))->has_broke) {
- case 0: break;
- case 1: (&(fra.me))->has_broke = 0; goto label3;
- }
- /* syntax/syntax_base.nit:497 */
- fra.me.REG[4] = fra.me.REG[1];
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[4];
-}
- void OC_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- fun_t CREG[1];
- val_t tmp;
- /* syntax/syntax_base.nit:473 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 0;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr;
- 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.closure_ctx = closctx_param;
- fra.me.closure_funs = CREG;
- fra.me.REG[0] = p0;
- CREG[0] = clos_fun0;
- /* syntax/syntax_base.nit:474 */
- REGB0 = CALL_syntax___syntax_base___AbsSyntaxVisitor___check_expr(closctx->REG[0])(closctx->REG[0], fra.me.REG[0]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- closctx->REG[4] = NIT_NULL;
- closctx->has_broke = 1;
- goto label2;
- }
- /* syntax/syntax_base.nit:475 */
- fra.me.REG[1] = CALL_syntax___syntax_base___AExpr___stype(fra.me.REG[0])(fra.me.REG[0]);
- /* syntax/syntax_base.nit:476 */
- REGB0 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(closctx->REG[1])(closctx->REG[1], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 476);
- }
- REGB0 = CALL_metamodel___static_type___MMType___is_nullable(closctx->REG[1])(closctx->REG[1]);
- REGB1 = CALL_metamodel___static_type___MMType___is_nullable(fra.me.REG[1])(fra.me.REG[1]);
- REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
- if (UNTAG_Bool(REGB2)) {
- } else {
- /* ../lib/standard/kernel.nit:199 */
- REGB1 = TAG_Bool((REGB0)==(REGB1));
- /* syntax/syntax_base.nit:476 */
- REGB2 = REGB1;
- }
- REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
- } else {
- REGB1 = TAG_Bool(0);
- REGB2 = REGB1;
- }
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:478 */
- REGB2 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 478);
- }
- fra.me.REG[2] = CALL_metamodel___static_type___MMType___as_nullable(closctx->REG[1])(closctx->REG[1]);
- closctx->REG[1] = fra.me.REG[2];
- /* syntax/syntax_base.nit:479 */
- fra.me.REG[2] = CALL_metamodel___static_type___MMType___as_nullable(fra.me.REG[1])(fra.me.REG[1]);
- fra.me.REG[1] = fra.me.REG[2];
- }
- /* syntax/syntax_base.nit:481 */
- REGB2 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB2)) {
- } else {
- REGB1 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB2 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(closctx->REG[1])(closctx->REG[1], NIT_NULL);
- REGB2 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB2)) {
- REGB2 = TAG_Bool(1);
- } else {
- REGB1 = TAG_Bool(closctx->REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 481);
- }
- REGB1 = CALL_metamodel___static_type___MMType_____l(closctx->REG[1])(closctx->REG[1], fra.me.REG[1]);
- REGB2 = REGB1;
- }
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:482 */
- closctx->REG[1] = fra.me.REG[1];
- /* syntax/syntax_base.nit:483 */
- closctx->REG[3] = fra.me.REG[0];
- }
- label2: while(0);
- stack_frame_head = fra.me.prev;
- return;
- }
- void OC_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr_4(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- fun_t CREG[1];
- val_t tmp;
- 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 */
- /* syntax/syntax_base.nit:487 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 0;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___check_conform_multiexpr;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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.closure_ctx = closctx_param;
- fra.me.closure_funs = CREG;
- fra.me.REG[0] = p0;
- CREG[0] = clos_fun0;
- /* syntax/syntax_base.nit:488 */
- fra.me.REG[1] = CALL_syntax___syntax_base___AExpr___stype(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = CALL_metamodel___static_type___MMType_____l(fra.me.REG[1])(fra.me.REG[1], closctx->REG[1]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:489 */
- REGB0 = TAG_Bool(closctx->REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(closctx->REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(closctx->REG[3])(closctx->REG[3], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:490 */
- REGB0 = TAG_Int(5);
- fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_5) {
- fra.me.REG[2] = BOX_NativeString("Type error: no most general type. Got ");
- REGB0 = TAG_Int(38);
- 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;
- 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_syntax___syntax_base___AExpr___stype(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]);
- CALL_standard___collection___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(" and ");
- REGB0 = TAG_Int(5);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
- once_value_6 = fra.me.REG[2];
- register_static_object(&once_value_6);
- } else fra.me.REG[2] = once_value_6;
- 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_standard___string___Object___to_s(closctx->REG[1])(closctx->REG[1]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
- if (!once_value_7) {
- fra.me.REG[2] = BOX_NativeString(".");
- REGB0 = TAG_Int(1);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
- once_value_7 = fra.me.REG[2];
- register_static_object(&once_value_7);
- } else fra.me.REG[2] = once_value_7;
- 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]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(closctx->REG[0])(closctx->REG[0], fra.me.REG[0], fra.me.REG[1]);
- } else {
- /* syntax/syntax_base.nit:492 */
- REGB0 = TAG_Int(7);
- fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_8) {
- fra.me.REG[2] = BOX_NativeString("Type error: no most general type. Got ");
- REGB0 = TAG_Int(38);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
- once_value_8 = fra.me.REG[2];
- register_static_object(&once_value_8);
- } else fra.me.REG[2] = once_value_8;
- 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_syntax___syntax_base___AExpr___stype(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]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
- if (!once_value_9) {
- fra.me.REG[2] = BOX_NativeString(" and ");
- REGB0 = TAG_Int(5);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
- once_value_9 = fra.me.REG[2];
- register_static_object(&once_value_9);
- } else fra.me.REG[2] = once_value_9;
- 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_standard___string___Object___to_s(closctx->REG[1])(closctx->REG[1]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
- if (!once_value_10) {
- fra.me.REG[2] = BOX_NativeString(" at ");
- REGB0 = TAG_Int(4);
- fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
- once_value_10 = fra.me.REG[2];
- register_static_object(&once_value_10);
- } else fra.me.REG[2] = once_value_10;
- 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]);
- REGB0 = TAG_Bool(closctx->REG[3]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 492);
- }
- fra.me.REG[2] = CALL_parser___parser_nodes___ANode___location(closctx->REG[3])(closctx->REG[3]);
- fra.me.REG[3] = CALL_parser___parser_nodes___ANode___location(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[3] = CALL_location___Location___relative_to(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]);
- if (!once_value_11) {
- fra.me.REG[3] = BOX_NativeString(".");
- REGB0 = TAG_Int(1);
- 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;
- fra.me.REG[3] = fra.me.REG[3];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[3]);
- fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(closctx->REG[0])(closctx->REG[0], fra.me.REG[0], fra.me.REG[1]);
- }
- /* syntax/syntax_base.nit:494 */
- closctx->REG[4] = NIT_NULL;
- closctx->has_broke = 1;
- goto label12;
- }
- label12: while(0);
- stack_frame_head = fra.me.prev;
- return;
- }
-static const char LOCATE_syntax___syntax_base___AbsSyntaxVisitor___init[] = "syntax_base::AbsSyntaxVisitor::init";
-void syntax___syntax_base___AbsSyntaxVisitor___init(val_t p0, val_t p1, val_t p2, int* init_table){
- int itpos14 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___syntax_base___AbsSyntaxVisitor].i;
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t tmp;
- if (init_table[itpos14]) return;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 500;
- fra.me.meth = LOCATE_syntax___syntax_base___AbsSyntaxVisitor___init;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- fra.me.REG[2] = p2;
- /* syntax/syntax_base.nit:500 */
- fra.me.REG[3] = fra.me.REG[0];
- CALL_parser___parser_nodes___Visitor___init(fra.me.REG[0])(fra.me.REG[0], init_table);
- /* syntax/syntax_base.nit:502 */
- ATTR_syntax___syntax_base___AbsSyntaxVisitor____tc(fra.me.REG[3]) = fra.me.REG[1];
- /* syntax/syntax_base.nit:503 */
- ATTR_syntax___syntax_base___AbsSyntaxVisitor____mmmodule(fra.me.REG[3]) = fra.me.REG[2];
- stack_frame_head = fra.me.prev;
- init_table[itpos14] = 1;
- return;
-}
-static const char LOCATE_syntax___syntax_base___ANode___accept_abs_syntax_visitor[] = "syntax_base::ANode::accept_abs_syntax_visitor";
-void syntax___syntax_base___ANode___accept_abs_syntax_visitor(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 510;
- fra.me.meth = LOCATE_syntax___syntax_base___ANode___accept_abs_syntax_visitor;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:510 */
- CALL_parser___parser_nodes___ANode___visit_all(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___Token___to_symbol[] = "syntax_base::Token::to_symbol";
-val_t syntax___syntax_base___Token___to_symbol(val_t p0){
- struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 516;
- fra.me.meth = LOCATE_syntax___syntax_base___Token___to_symbol;
- 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;
- /* syntax/syntax_base.nit:520 */
- fra.me.REG[1] = ATTR_syntax___syntax_base___Token____symbol_cache(fra.me.REG[0]);
- /* syntax/syntax_base.nit:521 */
- REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:522 */
- fra.me.REG[2] = CALL_parser___parser_nodes___Token___text(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[2] = CALL_symbol___String___to_symbol(fra.me.REG[2])(fra.me.REG[2]);
- fra.me.REG[1] = fra.me.REG[2];
- /* syntax/syntax_base.nit:523 */
- ATTR_syntax___syntax_base___Token____symbol_cache(fra.me.REG[0]) = fra.me.REG[1];
- }
- /* syntax/syntax_base.nit:525 */
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[1];
-}
-static const char LOCATE_syntax___syntax_base___AClassdef___local_class[] = "syntax_base::AClassdef::local_class";
-val_t syntax___syntax_base___AClassdef___local_class(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 530;
- fra.me.meth = LOCATE_syntax___syntax_base___AClassdef___local_class;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:530 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 530);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AClassdef___next_node[] = "syntax_base::AClassdef::next_node";
-val_t syntax___syntax_base___AClassdef___next_node(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 533;
- fra.me.meth = LOCATE_syntax___syntax_base___AClassdef___next_node;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:533 */
- fra.me.REG[0] = ATTR_syntax___syntax_base___AClassdef____next_node(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AClassdef___next_node__eq[] = "syntax_base::AClassdef::next_node=";
-void syntax___syntax_base___AClassdef___next_node__eq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 533;
- fra.me.meth = LOCATE_syntax___syntax_base___AClassdef___next_node__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:533 */
- ATTR_syntax___syntax_base___AClassdef____next_node(fra.me.REG[0]) = fra.me.REG[1];
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___APropdef___self_var[] = "syntax_base::APropdef::self_var";
-val_t syntax___syntax_base___APropdef___self_var(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 538;
- fra.me.meth = LOCATE_syntax___syntax_base___APropdef___self_var;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:538 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 538);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAttrPropdef___prop[] = "syntax_base::AAttrPropdef::prop";
-val_t syntax___syntax_base___AAttrPropdef___prop(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 543;
- fra.me.meth = LOCATE_syntax___syntax_base___AAttrPropdef___prop;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:543 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 543);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAttrPropdef___readmethod[] = "syntax_base::AAttrPropdef::readmethod";
-val_t syntax___syntax_base___AAttrPropdef___readmethod(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 546;
- fra.me.meth = LOCATE_syntax___syntax_base___AAttrPropdef___readmethod;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:546 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 546);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAttrPropdef___writemethod[] = "syntax_base::AAttrPropdef::writemethod";
-val_t syntax___syntax_base___AAttrPropdef___writemethod(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 549;
- fra.me.meth = LOCATE_syntax___syntax_base___AAttrPropdef___writemethod;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:549 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 549);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AConcreteInitPropdef___super_init_calls[] = "syntax_base::AConcreteInitPropdef::super_init_calls";
-val_t syntax___syntax_base___AConcreteInitPropdef___super_init_calls(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 554;
- fra.me.meth = LOCATE_syntax___syntax_base___AConcreteInitPropdef___super_init_calls;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:554 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AConcreteInitPropdef____super_init_calls(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_super_init_calls", LOCATE_syntax___syntax_base, 554);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AConcreteInitPropdef____super_init_calls(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AConcreteInitPropdef___explicit_super_init_calls[] = "syntax_base::AConcreteInitPropdef::explicit_super_init_calls";
-val_t syntax___syntax_base___AConcreteInitPropdef___explicit_super_init_calls(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 555;
- fra.me.meth = LOCATE_syntax___syntax_base___AConcreteInitPropdef___explicit_super_init_calls;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:555 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AConcreteInitPropdef____explicit_super_init_calls(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_explicit_super_init_calls", LOCATE_syntax___syntax_base, 555);
- }
- fra.me.REG[0] = ATTR_syntax___syntax_base___AConcreteInitPropdef____explicit_super_init_calls(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AMethPropdef___method[] = "syntax_base::AMethPropdef::method";
-val_t syntax___syntax_base___AMethPropdef___method(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 559;
- fra.me.meth = LOCATE_syntax___syntax_base___AMethPropdef___method;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:559 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 559);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___ATypePropdef___prop[] = "syntax_base::ATypePropdef::prop";
-val_t syntax___syntax_base___ATypePropdef___prop(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 564;
- fra.me.meth = LOCATE_syntax___syntax_base___ATypePropdef___prop;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:564 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 564);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AParam___position[] = "syntax_base::AParam::position";
-val_t syntax___syntax_base___AParam___position(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 569;
- fra.me.meth = LOCATE_syntax___syntax_base___AParam___position;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:569 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 569);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AParam___variable[] = "syntax_base::AParam::variable";
-val_t syntax___syntax_base___AParam___variable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 572;
- fra.me.meth = LOCATE_syntax___syntax_base___AParam___variable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:572 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 572);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AClosureDecl___position[] = "syntax_base::AClosureDecl::position";
-val_t syntax___syntax_base___AClosureDecl___position(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 577;
- fra.me.meth = LOCATE_syntax___syntax_base___AClosureDecl___position;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:577 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 577);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AClosureDecl___variable[] = "syntax_base::AClosureDecl::variable";
-val_t syntax___syntax_base___AClosureDecl___variable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 580;
- fra.me.meth = LOCATE_syntax___syntax_base___AClosureDecl___variable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:580 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 580);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AType___is_typed[] = "syntax_base::AType::is_typed";
-val_t syntax___syntax_base___AType___is_typed(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 585;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___is_typed;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:585 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 585);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AType___stype[] = "syntax_base::AType::stype";
-val_t syntax___syntax_base___AType___stype(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 590;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___stype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:590 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 590);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AType___get_local_class[] = "syntax_base::AType::get_local_class";
-val_t syntax___syntax_base___AType___get_local_class(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[7];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- static val_t once_value_1; /* Once value */
- static val_t once_value_2; /* 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 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 596;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___get_local_class;
- fra.me.has_broke = 0;
- fra.me.REG_size = 8;
- 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[6] = NIT_NULL;
- fra.me.REG[7] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:601 */
- fra.me.REG[2] = CALL_parser___parser_nodes___AType___n_id(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[2] = CALL_syntax___syntax_base___Token___to_symbol(fra.me.REG[2])(fra.me.REG[2]);
- /* syntax/syntax_base.nit:602 */
- fra.me.REG[3] = CALL_syntax___syntax_base___AbsSyntaxVisitor___mmmodule(fra.me.REG[1])(fra.me.REG[1]);
- /* syntax/syntax_base.nit:603 */
- fra.me.REG[4] = CALL_syntax___syntax_base___AbsSyntaxVisitor___local_class(fra.me.REG[1])(fra.me.REG[1]);
- /* syntax/syntax_base.nit:605 */
- fra.me.REG[5] = CALL_syntax___syntax_base___MMSrcLocalClass___formal_dict(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = CALL_standard___collection___abstract_collection___MapRead___has_key(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[2]);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(1);
- } else {
- REGB1 = CALL_metamodel___abstractmetamodel___MMLocalClass___has_global_property_by_name(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[2]);
- REGB0 = REGB1;
- }
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:606 */
- fra.me.REG[4] = CALL_parser___parser_nodes___AType___n_id(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Int(3);
- fra.me.REG[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_1) {
- fra.me.REG[6] = BOX_NativeString("Type error: ");
- REGB0 = TAG_Int(12);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0);
- once_value_1 = fra.me.REG[6];
- register_static_object(&once_value_1);
- } else fra.me.REG[6] = once_value_1;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- if (!once_value_2) {
- fra.me.REG[6] = BOX_NativeString(" is a formal type");
- REGB0 = TAG_Int(17);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0);
- once_value_2 = fra.me.REG[6];
- register_static_object(&once_value_2);
- } else fra.me.REG[6] = once_value_2;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[5])(fra.me.REG[5]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[4], fra.me.REG[5]);
- /* syntax/syntax_base.nit:607 */
- REGB0 = TAG_Bool(1);
- ATTR_syntax___syntax_base___AType____stype_cached(fra.me.REG[0]) = REGB0;
- /* syntax/syntax_base.nit:608 */
- fra.me.REG[5] = NIT_NULL;
- goto label3;
- }
- /* syntax/syntax_base.nit:611 */
- REGB0 = CALL_metamodel___abstractmetamodel___MMModule___has_global_class_named(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[2]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:612 */
- fra.me.REG[4] = CALL_parser___parser_nodes___AType___n_id(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Int(5);
- fra.me.REG[6] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_4) {
- fra.me.REG[7] = BOX_NativeString("Type error: class ");
- REGB0 = TAG_Int(18);
- fra.me.REG[7] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[7])(fra.me.REG[7], REGB0);
- once_value_4 = fra.me.REG[7];
- register_static_object(&once_value_4);
- } else fra.me.REG[7] = once_value_4;
- fra.me.REG[7] = fra.me.REG[7];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- fra.me.REG[7] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- if (!once_value_5) {
- fra.me.REG[7] = BOX_NativeString(" not found in module ");
- REGB0 = TAG_Int(21);
- fra.me.REG[7] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[7])(fra.me.REG[7], REGB0);
- once_value_5 = fra.me.REG[7];
- register_static_object(&once_value_5);
- } else fra.me.REG[7] = once_value_5;
- fra.me.REG[7] = fra.me.REG[7];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- fra.me.REG[7] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- if (!once_value_6) {
- fra.me.REG[7] = BOX_NativeString(".");
- REGB0 = TAG_Int(1);
- fra.me.REG[7] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[7])(fra.me.REG[7], REGB0);
- once_value_6 = fra.me.REG[7];
- register_static_object(&once_value_6);
- } else fra.me.REG[7] = once_value_6;
- fra.me.REG[7] = fra.me.REG[7];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[6])(fra.me.REG[6]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[4], fra.me.REG[6]);
- /* syntax/syntax_base.nit:613 */
- REGB0 = TAG_Bool(1);
- ATTR_syntax___syntax_base___AType____stype_cached(fra.me.REG[0]) = REGB0;
- /* syntax/syntax_base.nit:614 */
- fra.me.REG[5] = NIT_NULL;
- goto label3;
- }
- /* syntax/syntax_base.nit:617 */
- fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMModule___class_by_name(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[2]);
- /* syntax/syntax_base.nit:618 */
- fra.me.REG[6] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[2])(fra.me.REG[2]);
- CALL_syntax___syntax_base___MMGlobalClass___check_visibility(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[1], fra.me.REG[0], fra.me.REG[3]);
- /* syntax/syntax_base.nit:619 */
- fra.me.REG[5] = fra.me.REG[2];
- goto label3;
- label3: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[5];
-}
-static const char LOCATE_syntax___syntax_base___AType___get_unchecked_stype[] = "syntax_base::AType::get_unchecked_stype";
-val_t syntax___syntax_base___AType___get_unchecked_stype(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[7];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t REGB3;
- val_t tmp;
- 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 */
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 622;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___get_unchecked_stype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 8;
- 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[6] = NIT_NULL;
- fra.me.REG[7] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:628 */
- REGB0 = TAG_Bool(ATTR_syntax___syntax_base___AType____stype_cached(fra.me.REG[0])!=NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- nit_abort("Uninitialized attribute %s", "_stype_cached", LOCATE_syntax___syntax_base, 628);
- }
- REGB0 = ATTR_syntax___syntax_base___AType____stype_cached(fra.me.REG[0]);
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[2] = ATTR_syntax___syntax_base___AType____stype_cache(fra.me.REG[0]);
- goto label1;
- }
- /* syntax/syntax_base.nit:629 */
- REGB0 = TAG_Bool(1);
- ATTR_syntax___syntax_base___AType____stype_cached(fra.me.REG[0]) = REGB0;
- /* syntax/syntax_base.nit:631 */
- fra.me.REG[3] = CALL_parser___parser_nodes___AType___n_id(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[3] = CALL_syntax___syntax_base___Token___to_symbol(fra.me.REG[3])(fra.me.REG[3]);
- /* syntax/syntax_base.nit:632 */
- fra.me.REG[4] = CALL_syntax___syntax_base___AbsSyntaxVisitor___mmmodule(fra.me.REG[1])(fra.me.REG[1]);
- /* syntax/syntax_base.nit:633 */
- fra.me.REG[4] = CALL_syntax___syntax_base___AbsSyntaxVisitor___local_class(fra.me.REG[1])(fra.me.REG[1]);
- /* syntax/syntax_base.nit:636 */
- fra.me.REG[5] = CALL_syntax___syntax_base___MMSrcLocalClass___formal_dict(fra.me.REG[4])(fra.me.REG[4]);
- REGB0 = CALL_standard___collection___abstract_collection___MapRead___has_key(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[3]);
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:637 */
- fra.me.REG[5] = CALL_parser___parser_nodes___AType___n_types(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = CALL_standard___collection___abstract_collection___Collection___length(fra.me.REG[5])(fra.me.REG[5]);
- REGB1 = TAG_Int(0);
- 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:244 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
- /* syntax/syntax_base.nit:637 */
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:638 */
- REGB1 = TAG_Int(3);
- fra.me.REG[5] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
- if (!once_value_2) {
- fra.me.REG[6] = BOX_NativeString("Type error: formal type ");
- REGB1 = TAG_Int(24);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB1);
- once_value_2 = fra.me.REG[6];
- register_static_object(&once_value_2);
- } else fra.me.REG[6] = once_value_2;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- if (!once_value_3) {
- fra.me.REG[6] = BOX_NativeString(" cannot have formal parameters.");
- REGB1 = TAG_Int(31);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB1);
- once_value_3 = fra.me.REG[6];
- register_static_object(&once_value_3);
- } else fra.me.REG[6] = once_value_3;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[6]);
- fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[5])(fra.me.REG[5]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], fra.me.REG[5]);
- /* syntax/syntax_base.nit:639 */
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:641 */
- fra.me.REG[5] = CALL_syntax___syntax_base___MMSrcLocalClass___formal_dict(fra.me.REG[4])(fra.me.REG[4]);
- fra.me.REG[5] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[5])(fra.me.REG[5], fra.me.REG[3]);
- /* syntax/syntax_base.nit:642 */
- fra.me.REG[6] = CALL_parser___parser_nodes___AType___n_kwnullable(fra.me.REG[0])(fra.me.REG[0]);
- REGB1 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- } else {
- REGB0 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(0);
- REGB1 = REGB0;
- } else {
- REGB0 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[6])(fra.me.REG[6], NIT_NULL);
- REGB1 = REGB0;
- }
- }
- REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(fra.me.REG[5]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 642);
- }
- fra.me.REG[6] = CALL_metamodel___static_type___MMType___as_nullable(fra.me.REG[5])(fra.me.REG[5]);
- fra.me.REG[5] = fra.me.REG[6];
- }
- /* syntax/syntax_base.nit:643 */
- ATTR_syntax___syntax_base___AType____stype_cache(fra.me.REG[0]) = fra.me.REG[5];
- /* syntax/syntax_base.nit:644 */
- fra.me.REG[2] = fra.me.REG[5];
- goto label1;
- }
- /* syntax/syntax_base.nit:647 */
- REGB1 = CALL_metamodel___abstractmetamodel___MMLocalClass___has_global_property_by_name(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:648 */
- fra.me.REG[6] = CALL_parser___parser_nodes___AType___n_types(fra.me.REG[0])(fra.me.REG[0]);
- REGB1 = CALL_standard___collection___abstract_collection___Collection___length(fra.me.REG[6])(fra.me.REG[6]);
- REGB0 = TAG_Int(0);
- REGB2 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:244 */
- REGB0 = TAG_Bool(UNTAG_Int(REGB1)>UNTAG_Int(REGB0));
- /* syntax/syntax_base.nit:648 */
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:649 */
- REGB0 = TAG_Int(3);
- fra.me.REG[6] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_4) {
- fra.me.REG[7] = BOX_NativeString("Type error: formal type ");
- REGB0 = TAG_Int(24);
- fra.me.REG[7] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[7])(fra.me.REG[7], REGB0);
- once_value_4 = fra.me.REG[7];
- register_static_object(&once_value_4);
- } else fra.me.REG[7] = once_value_4;
- fra.me.REG[7] = fra.me.REG[7];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- fra.me.REG[7] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- if (!once_value_5) {
- fra.me.REG[7] = BOX_NativeString(" cannot have formal parameters.");
- REGB0 = TAG_Int(31);
- fra.me.REG[7] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[7])(fra.me.REG[7], REGB0);
- once_value_5 = fra.me.REG[7];
- register_static_object(&once_value_5);
- } else fra.me.REG[7] = once_value_5;
- fra.me.REG[7] = fra.me.REG[7];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[7]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[6])(fra.me.REG[6]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], fra.me.REG[6]);
- /* syntax/syntax_base.nit:650 */
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:652 */
- fra.me.REG[6] = CALL_metamodel___static_type___MMLocalClass___get_type(fra.me.REG[4])(fra.me.REG[4]);
- fra.me.REG[6] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[6])(fra.me.REG[6]);
- fra.me.REG[6] = CALL_metamodel___virtualtype___MMLocalClass___select_virtual_type(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[3]);
- fra.me.REG[4] = CALL_metamodel___static_type___MMLocalClass___get_type(fra.me.REG[4])(fra.me.REG[4]);
- fra.me.REG[4] = CALL_metamodel___virtualtype___MMTypeProperty___stype_for(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[4]);
- fra.me.REG[5] = fra.me.REG[4];
- /* syntax/syntax_base.nit:653 */
- REGB0 = TAG_Bool(fra.me.REG[5]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[5]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[5])(fra.me.REG[5], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- /* syntax/syntax_base.nit:654 */
- REGB0 = TAG_Int(3);
- fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
- if (!once_value_6) {
- fra.me.REG[6] = BOX_NativeString("Type error: circular definition in formal type ");
- REGB0 = TAG_Int(47);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB0);
- once_value_6 = fra.me.REG[6];
- register_static_object(&once_value_6);
- } else fra.me.REG[6] = once_value_6;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[6]);
- 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_7) {
- fra.me.REG[3] = BOX_NativeString(".");
- REGB0 = TAG_Int(1);
- fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0);
- once_value_7 = fra.me.REG[3];
- register_static_object(&once_value_7);
- } else fra.me.REG[3] = once_value_7;
- 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]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], fra.me.REG[4]);
- /* syntax/syntax_base.nit:655 */
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:657 */
- fra.me.REG[4] = CALL_parser___parser_nodes___AType___n_kwnullable(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[4])(fra.me.REG[4], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(fra.me.REG[5]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 657);
- }
- fra.me.REG[4] = CALL_metamodel___static_type___MMType___as_nullable(fra.me.REG[5])(fra.me.REG[5]);
- fra.me.REG[5] = fra.me.REG[4];
- }
- /* syntax/syntax_base.nit:658 */
- ATTR_syntax___syntax_base___AType____stype_cache(fra.me.REG[0]) = fra.me.REG[5];
- /* syntax/syntax_base.nit:659 */
- fra.me.REG[2] = fra.me.REG[5];
- goto label1;
- }
- /* syntax/syntax_base.nit:662 */
- fra.me.REG[4] = CALL_syntax___syntax_base___AType___get_local_class(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* syntax/syntax_base.nit:663 */
- REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[4])(fra.me.REG[4], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:665 */
- fra.me.REG[3] = CALL_parser___parser_nodes___AType___n_types(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = CALL_standard___collection___abstract_collection___Collection___length(fra.me.REG[3])(fra.me.REG[3]);
- /* syntax/syntax_base.nit:666 */
- REGB1 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 666);
- }
- REGB1 = CALL_metamodel___abstractmetamodel___MMLocalClass___arity(fra.me.REG[4])(fra.me.REG[4]);
- REGB2 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB0));
- if (UNTAG_Bool(REGB2)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB1 = TAG_Bool((REGB1)==(REGB0));
- /* syntax/syntax_base.nit:666 */
- REGB2 = REGB1;
- }
- REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:667 */
- REGB2 = TAG_Int(0);
- REGB1 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB2));
- if (UNTAG_Bool(REGB1)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB2 = TAG_Bool((REGB0)==(REGB2));
- /* syntax/syntax_base.nit:667 */
- REGB1 = REGB2;
- }
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:668 */
- REGB1 = TAG_Int(3);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
- if (!once_value_8) {
- fra.me.REG[6] = BOX_NativeString("Type error: '");
- REGB1 = TAG_Int(13);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB1);
- once_value_8 = fra.me.REG[6];
- register_static_object(&once_value_8);
- } else fra.me.REG[6] = once_value_8;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- if (!once_value_9) {
- fra.me.REG[6] = BOX_NativeString("' is a generic class.");
- REGB1 = TAG_Int(21);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB1);
- once_value_9 = fra.me.REG[6];
- register_static_object(&once_value_9);
- } else fra.me.REG[6] = once_value_9;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], fra.me.REG[3]);
- } else {
- /* syntax/syntax_base.nit:669 */
- REGB1 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 669);
- }
- REGB1 = CALL_metamodel___abstractmetamodel___MMLocalClass___arity(fra.me.REG[4])(fra.me.REG[4]);
- REGB2 = TAG_Int(0);
- REGB3 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB2));
- if (UNTAG_Bool(REGB3)) {
- } else {
- /* ../lib/standard/kernel.nit:237 */
- REGB2 = TAG_Bool((REGB1)==(REGB2));
- /* syntax/syntax_base.nit:669 */
- REGB3 = REGB2;
- }
- if (UNTAG_Bool(REGB3)) {
- /* syntax/syntax_base.nit:670 */
- REGB3 = TAG_Int(3);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB3);
- if (!once_value_10) {
- fra.me.REG[6] = BOX_NativeString("Type error: '");
- REGB3 = TAG_Int(13);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB3);
- once_value_10 = fra.me.REG[6];
- register_static_object(&once_value_10);
- } else fra.me.REG[6] = once_value_10;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- if (!once_value_11) {
- fra.me.REG[6] = BOX_NativeString("' is not a generic class.");
- REGB3 = TAG_Int(25);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB3);
- once_value_11 = fra.me.REG[6];
- register_static_object(&once_value_11);
- } else fra.me.REG[6] = once_value_11;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], fra.me.REG[3]);
- } else {
- /* syntax/syntax_base.nit:672 */
- REGB3 = TAG_Int(7);
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB3);
- if (!once_value_12) {
- fra.me.REG[6] = BOX_NativeString("Type error: '");
- REGB3 = TAG_Int(13);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB3);
- once_value_12 = fra.me.REG[6];
- register_static_object(&once_value_12);
- } else fra.me.REG[6] = once_value_12;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- if (!once_value_13) {
- fra.me.REG[6] = BOX_NativeString("' has ");
- REGB3 = TAG_Int(6);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB3);
- once_value_13 = fra.me.REG[6];
- register_static_object(&once_value_13);
- } else fra.me.REG[6] = once_value_13;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- REGB3 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 672);
- }
- REGB3 = CALL_metamodel___abstractmetamodel___MMLocalClass___arity(fra.me.REG[4])(fra.me.REG[4]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(REGB3)(REGB3);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- if (!once_value_14) {
- fra.me.REG[6] = BOX_NativeString(" parameters (");
- REGB3 = TAG_Int(13);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB3);
- once_value_14 = fra.me.REG[6];
- register_static_object(&once_value_14);
- } else fra.me.REG[6] = once_value_14;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[6] = CALL_standard___string___Object___to_s(REGB0)(REGB0);
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- if (!once_value_15) {
- fra.me.REG[6] = BOX_NativeString(" are provided).");
- REGB3 = TAG_Int(15);
- fra.me.REG[6] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[6])(fra.me.REG[6], REGB3);
- once_value_15 = fra.me.REG[6];
- register_static_object(&once_value_15);
- } else fra.me.REG[6] = once_value_15;
- fra.me.REG[6] = fra.me.REG[6];
- CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[6]);
- fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
- CALL_syntax___syntax_base___AbsSyntaxVisitor___error(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0], fra.me.REG[3]);
- }
- }
- /* syntax/syntax_base.nit:674 */
- fra.me.REG[2] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:677 */
- REGB3 = TAG_Int(0);
- REGB2 = TAG_Bool(VAL_ISA(REGB3, 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:244 */
- REGB3 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB3));
- /* syntax/syntax_base.nit:677 */
- if (UNTAG_Bool(REGB3)) {
- /* syntax/syntax_base.nit:678 */
- fra.me.REG[3] = NEW_Array_standard___collection___array___Array___init();
- /* syntax/syntax_base.nit:679 */
- fra.me.REG[6] = CALL_parser___parser_nodes___AType___n_types(fra.me.REG[0])(fra.me.REG[0]);
- CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[6])(fra.me.REG[6], (&(fra.me)), ((fun_t)OC_syntax___syntax_base___AType___get_unchecked_stype_16));
- switch ((&(fra.me))->has_broke) {
- case 0: break;
- case 1: (&(fra.me))->has_broke = 0; goto label1;
- }
- /* syntax/syntax_base.nit:684 */
- REGB3 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 684);
- }
- fra.me.REG[3] = CALL_metamodel___genericity___MMLocalClass___get_instantiate_type(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
- fra.me.REG[5] = fra.me.REG[3];
- } else {
- /* syntax/syntax_base.nit:686 */
- REGB3 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 686);
- }
- fra.me.REG[4] = CALL_metamodel___static_type___MMLocalClass___get_type(fra.me.REG[4])(fra.me.REG[4]);
- fra.me.REG[5] = fra.me.REG[4];
- }
- /* syntax/syntax_base.nit:688 */
- fra.me.REG[4] = CALL_parser___parser_nodes___AType___n_kwnullable(fra.me.REG[0])(fra.me.REG[0]);
- REGB3 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- } else {
- REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(0);
- REGB3 = REGB0;
- } else {
- REGB0 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[4])(fra.me.REG[4], NIT_NULL);
- REGB3 = REGB0;
- }
- }
- REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
- if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Bool(fra.me.REG[5]==NIT_NULL);
- if (UNTAG_Bool(REGB3)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 688);
- }
- fra.me.REG[4] = CALL_metamodel___static_type___MMType___as_nullable(fra.me.REG[5])(fra.me.REG[5]);
- fra.me.REG[5] = fra.me.REG[4];
- }
- /* syntax/syntax_base.nit:689 */
- ATTR_syntax___syntax_base___AType____stype_cache(fra.me.REG[0]) = fra.me.REG[5];
- /* syntax/syntax_base.nit:690 */
- fra.me.REG[2] = fra.me.REG[5];
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[2];
-}
- void OC_syntax___syntax_base___AType___get_unchecked_stype_16(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){
- struct {struct stack_frame_t me;} fra;
- val_t REGB0;
- val_t REGB1;
- fun_t CREG[1];
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 0;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___get_unchecked_stype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.closure_ctx = closctx_param;
- fra.me.closure_funs = CREG;
- fra.me.REG[0] = p0;
- CREG[0] = clos_fun0;
- /* syntax/syntax_base.nit:680 */
- fra.me.REG[0] = CALL_syntax___syntax_base___AType___get_unchecked_stype(fra.me.REG[0])(fra.me.REG[0], closctx->REG[1]);
- /* syntax/syntax_base.nit:681 */
- REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- closctx->REG[2] = NIT_NULL;
- closctx->has_broke = 1;
- goto label17;
- }
- /* syntax/syntax_base.nit:682 */
- CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[3])(closctx->REG[3], fra.me.REG[0]);
- label17: while(0);
- stack_frame_head = fra.me.prev;
- return;
- }
-static const char LOCATE_syntax___syntax_base___AType___get_stype[] = "syntax_base::AType::get_stype";
-val_t syntax___syntax_base___AType___get_stype(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 693;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___get_stype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 4;
- 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[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:697 */
- fra.me.REG[2] = CALL_syntax___syntax_base___AType___get_unchecked_stype(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* syntax/syntax_base.nit:698 */
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[3] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:699 */
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 699);
- }
- REGB0 = CALL_metamodel___static_type___MMType___is_valid(fra.me.REG[2])(fra.me.REG[2]);
- REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
- if (UNTAG_Bool(REGB0)) {
- fra.me.REG[3] = NIT_NULL;
- goto label1;
- }
- /* syntax/syntax_base.nit:700 */
- CALL_syntax___syntax_base___AType___check_conform(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* syntax/syntax_base.nit:701 */
- fra.me.REG[3] = fra.me.REG[2];
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[3];
-}
-static const char LOCATE_syntax___syntax_base___AType___check_conform[] = "syntax_base::AType::check_conform";
-void syntax___syntax_base___AType___check_conform(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[7];} fra;
- val_t REGB0;
- val_t REGB1;
- val_t REGB2;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 704;
- fra.me.meth = LOCATE_syntax___syntax_base___AType___check_conform;
- fra.me.has_broke = 0;
- fra.me.REG_size = 8;
- 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[6] = NIT_NULL;
- fra.me.REG[7] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:709 */
- fra.me.REG[2] = CALL_syntax___syntax_base___AType___get_unchecked_stype(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
- /* syntax/syntax_base.nit:710 */
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- } else {
- REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(0);
- REGB0 = REGB1;
- } else {
- REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
- REGB0 = REGB1;
- }
- }
- if (UNTAG_Bool(REGB0)) {
- goto label1;
- }
- /* syntax/syntax_base.nit:711 */
- REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
- if (UNTAG_Bool(REGB0)) {
- nit_abort("Reciever is null", NULL, LOCATE_syntax___syntax_base, 711);
- }
- fra.me.REG[3] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[2])(fra.me.REG[2]);
- /* syntax/syntax_base.nit:712 */
- fra.me.REG[4] = CALL_parser___parser_nodes___AType___n_types(fra.me.REG[0])(fra.me.REG[0]);
- REGB0 = CALL_standard___collection___abstract_collection___Collection___length(fra.me.REG[4])(fra.me.REG[4]);
- /* syntax/syntax_base.nit:713 */
- REGB1 = TAG_Int(0);
- 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:244 */
- REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
- /* syntax/syntax_base.nit:713 */
- if (UNTAG_Bool(REGB1)) {
- /* syntax/syntax_base.nit:714 */
- REGB1 = TAG_Int(0);
- /* ../lib/standard/kernel.nit:404 */
- while(1) {
- REGB2 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
- if (UNTAG_Bool(REGB2)) {
- } else {
- nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
- }
- /* ../lib/standard/kernel.nit:242 */
- REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
- /* ../lib/standard/kernel.nit:404 */
- if (UNTAG_Bool(REGB2)) {
- /* syntax/syntax_base.nit:714 */
- REGB2 = REGB1;
- /* syntax/syntax_base.nit:715 */
- fra.me.REG[4] = CALL_parser___parser_nodes___AType___n_types(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[4] = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[4])(fra.me.REG[4], REGB2);
- /* syntax/syntax_base.nit:716 */
- fra.me.REG[5] = CALL_syntax___syntax_base___AType___get_stype(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[1]);
- /* syntax/syntax_base.nit:717 */
- fra.me.REG[6] = CALL_metamodel___genericity___MMLocalClass___get_formal(fra.me.REG[3])(fra.me.REG[3], REGB2);
- /* syntax/syntax_base.nit:718 */
- REGB2 = CALL_metamodel___static_type___MMType___is_valid(fra.me.REG[6])(fra.me.REG[6]);
- REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
- if (UNTAG_Bool(REGB2)) {
- goto label1;
- }
- /* syntax/syntax_base.nit:719 */
- fra.me.REG[6] = CALL_metamodel___type_formal___MMTypeFormal___bound(fra.me.REG[6])(fra.me.REG[6]);
- /* syntax/syntax_base.nit:720 */
- fra.me.REG[7] = CALL_metamodel___static_type___MMType___adapt_to(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[2]);
- fra.me.REG[6] = fra.me.REG[7];
- /* syntax/syntax_base.nit:721 */
- CALL_syntax___syntax_base___AbsSyntaxVisitor___check_conform(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[4], fra.me.REG[5], fra.me.REG[6]);
- /* ../lib/standard/kernel.nit:406 */
- REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:245 */
- REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
- /* ../lib/standard/kernel.nit:406 */
- REGB1 = REGB2;
- } else {
- /* ../lib/standard/kernel.nit:404 */
- goto label2;
- }
- }
- label2: while(0);
- }
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AExpr___is_typed[] = "syntax_base::AExpr::is_typed";
-val_t syntax___syntax_base___AExpr___is_typed(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 728;
- fra.me.meth = LOCATE_syntax___syntax_base___AExpr___is_typed;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:728 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 728);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AExpr___is_statement[] = "syntax_base::AExpr::is_statement";
-val_t syntax___syntax_base___AExpr___is_statement(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 733;
- fra.me.meth = LOCATE_syntax___syntax_base___AExpr___is_statement;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:733 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 733);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AExpr___stype[] = "syntax_base::AExpr::stype";
-val_t syntax___syntax_base___AExpr___stype(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 737;
- fra.me.meth = LOCATE_syntax___syntax_base___AExpr___stype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:737 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 737);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAbsAbsSendExpr___prop_signature[] = "syntax_base::AAbsAbsSendExpr::prop_signature";
-val_t syntax___syntax_base___AAbsAbsSendExpr___prop_signature(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 744;
- fra.me.meth = LOCATE_syntax___syntax_base___AAbsAbsSendExpr___prop_signature;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:744 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 744);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAbsAbsSendExpr___raw_arguments[] = "syntax_base::AAbsAbsSendExpr::raw_arguments";
-val_t syntax___syntax_base___AAbsAbsSendExpr___raw_arguments(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 747;
- fra.me.meth = LOCATE_syntax___syntax_base___AAbsAbsSendExpr___raw_arguments;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:747 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 747);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAbsSendExpr___prop[] = "syntax_base::AAbsSendExpr::prop";
-val_t syntax___syntax_base___AAbsSendExpr___prop(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 753;
- fra.me.meth = LOCATE_syntax___syntax_base___AAbsSendExpr___prop;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:753 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 753);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAbsSendExpr___return_type[] = "syntax_base::AAbsSendExpr::return_type";
-val_t syntax___syntax_base___AAbsSendExpr___return_type(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 756;
- fra.me.meth = LOCATE_syntax___syntax_base___AAbsSendExpr___return_type;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:756 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 756);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___ASuperExpr___init_in_superclass[] = "syntax_base::ASuperExpr::init_in_superclass";
-val_t syntax___syntax_base___ASuperExpr___init_in_superclass(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 766;
- fra.me.meth = LOCATE_syntax___syntax_base___ASuperExpr___init_in_superclass;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:766 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 766);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___ASendExpr___closure_defs[] = "syntax_base::ASendExpr::closure_defs";
-val_t syntax___syntax_base___ASendExpr___closure_defs(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 775;
- fra.me.meth = LOCATE_syntax___syntax_base___ASendExpr___closure_defs;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:775 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 775);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AReassignFormExpr___assign_method[] = "syntax_base::AReassignFormExpr::assign_method";
-val_t syntax___syntax_base___AReassignFormExpr___assign_method(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 780;
- fra.me.meth = LOCATE_syntax___syntax_base___AReassignFormExpr___assign_method;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:780 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 780);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___ASendReassignExpr___read_prop[] = "syntax_base::ASendReassignExpr::read_prop";
-val_t syntax___syntax_base___ASendReassignExpr___read_prop(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 787;
- fra.me.meth = LOCATE_syntax___syntax_base___ASendReassignExpr___read_prop;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:787 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 787);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAttrFormExpr___prop[] = "syntax_base::AAttrFormExpr::prop";
-val_t syntax___syntax_base___AAttrFormExpr___prop(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 801;
- fra.me.meth = LOCATE_syntax___syntax_base___AAttrFormExpr___prop;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:801 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 801);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AAttrFormExpr___attr_type[] = "syntax_base::AAttrFormExpr::attr_type";
-val_t syntax___syntax_base___AAttrFormExpr___attr_type(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 804;
- fra.me.meth = LOCATE_syntax___syntax_base___AAttrFormExpr___attr_type;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:804 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 804);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___ASuperstringExpr___atype[] = "syntax_base::ASuperstringExpr::atype";
-val_t syntax___syntax_base___ASuperstringExpr___atype(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 809;
- fra.me.meth = LOCATE_syntax___syntax_base___ASuperstringExpr___atype;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:809 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 809);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AVardeclExpr___variable[] = "syntax_base::AVardeclExpr::variable";
-val_t syntax___syntax_base___AVardeclExpr___variable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 813;
- fra.me.meth = LOCATE_syntax___syntax_base___AVardeclExpr___variable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:813 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 813);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AForExpr___variables[] = "syntax_base::AForExpr::variables";
-val_t syntax___syntax_base___AForExpr___variables(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 819;
- fra.me.meth = LOCATE_syntax___syntax_base___AForExpr___variables;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:819 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 819);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___ASelfExpr___variable[] = "syntax_base::ASelfExpr::variable";
-val_t syntax___syntax_base___ASelfExpr___variable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 824;
- fra.me.meth = LOCATE_syntax___syntax_base___ASelfExpr___variable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:824 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 824);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AVarFormExpr___variable[] = "syntax_base::AVarFormExpr::variable";
-val_t syntax___syntax_base___AVarFormExpr___variable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 829;
- fra.me.meth = LOCATE_syntax___syntax_base___AVarFormExpr___variable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:829 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 829);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AClosureCallExpr___variable[] = "syntax_base::AClosureCallExpr::variable";
-val_t syntax___syntax_base___AClosureCallExpr___variable(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 835;
- fra.me.meth = LOCATE_syntax___syntax_base___AClosureCallExpr___variable;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:835 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 835);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AClosureDef___closure[] = "syntax_base::AClosureDef::closure";
-val_t syntax___syntax_base___AClosureDef___closure(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 840;
- fra.me.meth = LOCATE_syntax___syntax_base___AClosureDef___closure;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:840 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 840);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AClosureDef___variables[] = "syntax_base::AClosureDef::variables";
-val_t syntax___syntax_base___AClosureDef___variables(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 843;
- fra.me.meth = LOCATE_syntax___syntax_base___AClosureDef___variables;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:843 */
- fra.me.REG[0] = ATTR_syntax___syntax_base___AClosureDef____variables(fra.me.REG[0]);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
-static const char LOCATE_syntax___syntax_base___AClosureDef___variables__eq[] = "syntax_base::AClosureDef::variables=";
-void syntax___syntax_base___AClosureDef___variables__eq(val_t p0, val_t p1){
- struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 843;
- fra.me.meth = LOCATE_syntax___syntax_base___AClosureDef___variables__eq;
- fra.me.has_broke = 0;
- fra.me.REG_size = 2;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[1] = NIT_NULL;
- fra.me.REG[0] = p0;
- fra.me.REG[1] = p1;
- /* syntax/syntax_base.nit:843 */
- ATTR_syntax___syntax_base___AClosureDef____variables(fra.me.REG[0]) = fra.me.REG[1];
- stack_frame_head = fra.me.prev;
- return;
-}
-static const char LOCATE_syntax___syntax_base___AMethid___name[] = "syntax_base::AMethid::name";
-val_t syntax___syntax_base___AMethid___name(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 848;
- fra.me.meth = LOCATE_syntax___syntax_base___AMethid___name;
- fra.me.has_broke = 0;
- fra.me.REG_size = 0;
- fra.me.nitni_local_ref_head = NULL;
- /* syntax/syntax_base.nit:848 */
- nit_abort("Deferred method called", NULL, LOCATE_syntax___syntax_base, 848);
- stack_frame_head = fra.me.prev;
- return NIT_NULL;
-}
-static const char LOCATE_syntax___syntax_base___AExprs___to_a[] = "syntax_base::AExprs::to_a";
-val_t syntax___syntax_base___AExprs___to_a(val_t p0){
- struct {struct stack_frame_t me;} fra;
- val_t tmp;
- fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
- fra.me.file = LOCATE_syntax___syntax_base;
- fra.me.line = 853;
- fra.me.meth = LOCATE_syntax___syntax_base___AExprs___to_a;
- fra.me.has_broke = 0;
- fra.me.REG_size = 1;
- fra.me.nitni_local_ref_head = NULL;
- fra.me.REG[0] = NIT_NULL;
- fra.me.REG[0] = p0;
- /* syntax/syntax_base.nit:854 */
- fra.me.REG[0] = CALL_parser___parser_nodes___AExprs___n_exprs(fra.me.REG[0])(fra.me.REG[0]);
- fra.me.REG[0] = CALL_standard___collection___array___Collection___to_a(fra.me.REG[0])(fra.me.REG[0]);
- goto label1;
- label1: while(0);
- stack_frame_head = fra.me.prev;
- return fra.me.REG[0];
-}
nitlanguage / nit.git / blobdiff