/* This C file is generated by NIT to compile module syntax___flow. */
#include "syntax___flow._sep.h"
+static const char LOCATE_syntax___flow___FlowContext___check_is_set[] = "flow::FlowContext::check_is_set";
void syntax___flow___FlowContext___check_is_set(val_t p0, val_t p1, val_t p2){
struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
val_t REGB0;
REGB0 = CALL_syntax___flow___FlowContext___is_set(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
} else {
- REGB1 = TAG_Bool(false);
+ REGB1 = TAG_Bool(0);
REGB0 = REGB1;
}
if (UNTAG_Bool(REGB0)) {
stack_frame_head = fra.me.prev;
return;
}
+static const char LOCATE_syntax___flow___FlowContext___stype[] = "flow::FlowContext::stype";
val_t syntax___flow___FlowContext___stype(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
val_t tmp;
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
+static const char LOCATE_syntax___flow___FlowContext___sub_setvariable[] = "flow::FlowContext::sub_setvariable";
val_t syntax___flow___FlowContext___sub_setvariable(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return fra.me.REG[2];
}
+static const char LOCATE_syntax___flow___FlowContext___sub_unreash[] = "flow::FlowContext::sub_unreash";
val_t syntax___flow___FlowContext___sub_unreash(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
val_t REGB0;
/* syntax/flow.nit:60 */
fra.me.REG[1] = NEW_SubFlowContext_syntax___flow___SubFlowContext___with_prev(fra.me.REG[0], fra.me.REG[1]);
/* syntax/flow.nit:61 */
- REGB0 = TAG_Bool(true);
+ REGB0 = TAG_Bool(1);
ATTR_syntax___flow___FlowContext____unreash(fra.me.REG[1]) = REGB0;
/* syntax/flow.nit:62 */
goto label1;
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
+static const char LOCATE_syntax___flow___FlowContext___sub_with[] = "flow::FlowContext::sub_with";
val_t syntax___flow___FlowContext___sub_with(val_t p0, val_t p1, val_t p2, val_t p3){
struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
val_t tmp;
stack_frame_head = fra.me.prev;
return fra.me.REG[3];
}
+static const char LOCATE_syntax___flow___FlowContext___merge[] = "flow::FlowContext::merge";
val_t syntax___flow___FlowContext___merge(val_t p0, val_t p1, val_t p2){
struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
val_t REGB0;
} else {
nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
}
- /* ../lib/standard/kernel.nit:232 */
+ /* ../lib/standard/kernel.nit:235 */
REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
/* ../lib/standard/collection/array.nit:272 */
if (UNTAG_Bool(REGB1)) {
if (UNTAG_Bool(REGB1)) {
nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
}
- /* ../lib/standard/collection/array.nit:718 */
+ /* ../lib/standard/collection/array.nit:724 */
fra.me.REG[5] = ((Nit_NativeArray)fra.me.REG[4])->val[UNTAG_Int(REGB0)];
/* syntax/flow.nit:76 */
REGB1 = CALL_syntax___flow___FlowContext___unreash(fra.me.REG[5])(fra.me.REG[5]);
}
/* ../lib/standard/collection/array.nit:274 */
REGB1 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:235 */
+ /* ../lib/standard/kernel.nit:238 */
REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
/* ../lib/standard/collection/array.nit:274 */
REGB0 = REGB1;
REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
if (UNTAG_Bool(REGB2)) {
} else {
- /* ../lib/standard/kernel.nit:227 */
+ /* ../lib/standard/kernel.nit:230 */
REGB1 = TAG_Bool((REGB0)==(REGB1));
/* syntax/flow.nit:77 */
REGB2 = REGB1;
stack_frame_head = fra.me.prev;
return fra.me.REG[4];
}
+static const char LOCATE_syntax___flow___FlowContext___merge_reash[] = "flow::FlowContext::merge_reash";
val_t syntax___flow___FlowContext___merge_reash(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;
/* syntax/flow.nit:96 */
REGB0 = CALL_syntax___flow___FlowContext___unreash(fra.me.REG[3])(fra.me.REG[3]);
if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(true);
+ REGB0 = TAG_Bool(1);
} else {
REGB1 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[2],fra.me.REG[3]));
if (UNTAG_Bool(REGB1)) {
stack_frame_head = fra.me.prev;
return fra.me.REG[4];
}
+static const char LOCATE_syntax___flow___FlowContext___node[] = "flow::FlowContext::node";
val_t syntax___flow___FlowContext___node(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return fra.me.REG[0];
}
+static const char LOCATE_syntax___flow___FlowContext___init[] = "flow::FlowContext::init";
void syntax___flow___FlowContext___init(val_t p0, val_t p1, val_t p2, int* init_table){
int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___flow___FlowContext].i;
struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
init_table[itpos0] = 1;
return;
}
+static const char LOCATE_syntax___flow___FlowContext___unreash[] = "flow::FlowContext::unreash";
val_t syntax___flow___FlowContext___unreash(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return REGB0;
}
+static const char LOCATE_syntax___flow___FlowContext___already_unreash[] = "flow::FlowContext::already_unreash";
val_t syntax___flow___FlowContext___already_unreash(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return REGB0;
}
+static const char LOCATE_syntax___flow___FlowContext___already_unreash__eq[] = "flow::FlowContext::already_unreash=";
void syntax___flow___FlowContext___already_unreash__eq(val_t p0, val_t p1){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return;
}
+static const char LOCATE_syntax___flow___FlowContext___set_variables[] = "flow::FlowContext::set_variables";
val_t syntax___flow___FlowContext___set_variables(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return fra.me.REG[0];
}
+static const char LOCATE_syntax___flow___FlowContext___is_set[] = "flow::FlowContext::is_set";
val_t syntax___flow___FlowContext___is_set(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return REGB0;
}
+static const char LOCATE_syntax___flow___RootFlowContext___init[] = "flow::RootFlowContext::init";
void syntax___flow___RootFlowContext___init(val_t p0, val_t p1, val_t p2, int* init_table){
int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___flow___RootFlowContext].i;
struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
init_table[itpos1] = 1;
return;
}
+static const char LOCATE_syntax___flow___SubFlowContext___prev[] = "flow::SubFlowContext::prev";
val_t syntax___flow___SubFlowContext___prev(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return fra.me.REG[0];
}
+static const char LOCATE_syntax___flow___SubFlowContext___is_set[] = "flow::SubFlowContext::(flow::FlowContext::is_set)";
val_t syntax___flow___SubFlowContext___is_set(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
val_t REGB0;
fra.me.REG[2] = ATTR_syntax___flow___FlowContext____set_variables(fra.me.REG[0]);
REGB0 = CALL_standard___collection___abstract_collection___Collection___has(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
if (UNTAG_Bool(REGB0)) {
- REGB0 = TAG_Bool(true);
+ REGB0 = TAG_Bool(1);
} else {
REGB1 = TAG_Bool(ATTR_syntax___flow___SubFlowContext____prev(fra.me.REG[0])!=NIT_NULL);
if (UNTAG_Bool(REGB1)) {
stack_frame_head = fra.me.prev;
return REGB0;
}
+static const char LOCATE_syntax___flow___SubFlowContext___stype[] = "flow::SubFlowContext::(flow::FlowContext::stype)";
val_t syntax___flow___SubFlowContext___stype(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
val_t tmp;
stack_frame_head = fra.me.prev;
return fra.me.REG[1];
}
+static const char LOCATE_syntax___flow___SubFlowContext___with_prev[] = "flow::SubFlowContext::with_prev";
void syntax___flow___SubFlowContext___with_prev(val_t p0, val_t p1, val_t p2, int* init_table){
int itpos2 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___flow___SubFlowContext].i;
struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
init_table[itpos2] = 1;
return;
}
+static const char LOCATE_syntax___flow___CastFlowContext___stype[] = "flow::CastFlowContext::(flow::FlowContext::stype)";
val_t syntax___flow___CastFlowContext___stype(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return fra.me.REG[2];
}
+static const char LOCATE_syntax___flow___CastFlowContext___init[] = "flow::CastFlowContext::init";
void syntax___flow___CastFlowContext___init(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4, int* init_table){
int itpos3 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_syntax___flow___CastFlowContext].i;
struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
init_table[itpos3] = 1;
return;
}
+static const char LOCATE_syntax___flow___MergeFlowContext___init[] = "flow::MergeFlowContext::init";
void syntax___flow___MergeFlowContext___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___flow___MergeFlowContext].i;
struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
init_table[itpos4] = 1;
return;
}
+static const char LOCATE_syntax___flow___MergeFlowContext___stype[] = "flow::MergeFlowContext::(flow::FlowContext::stype)";
val_t syntax___flow___MergeFlowContext___stype(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
val_t REGB0;
stack_frame_head = fra.me.prev;
return fra.me.REG[2];
}
+static const char LOCATE_syntax___flow___MergeFlowContext___merge_stype[] = "flow::MergeFlowContext::merge_stype";
val_t syntax___flow___MergeFlowContext___merge_stype(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[8];} fra;
val_t REGB0;
/* syntax/flow.nit:224 */
fra.me.REG[2] = NIT_NULL;
/* syntax/flow.nit:225 */
- REGB0 = TAG_Bool(false);
+ REGB0 = TAG_Bool(0);
/* syntax/flow.nit:226 */
REGB1 = TAG_Bool(ATTR_syntax___flow___MergeFlowContext____alts(fra.me.REG[0])!=NIT_NULL);
if (UNTAG_Bool(REGB1)) {
} else {
nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
}
- /* ../lib/standard/kernel.nit:232 */
+ /* ../lib/standard/kernel.nit:235 */
REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
/* ../lib/standard/collection/array.nit:272 */
if (UNTAG_Bool(REGB2)) {
if (UNTAG_Bool(REGB2)) {
nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
}
- /* ../lib/standard/collection/array.nit:718 */
+ /* ../lib/standard/collection/array.nit:724 */
fra.me.REG[6] = ((Nit_NativeArray)fra.me.REG[5])->val[UNTAG_Int(REGB1)];
/* syntax/flow.nit:228 */
fra.me.REG[6] = CALL_syntax___flow___FlowContext___stype(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[1]);
} else {
REGB3 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Bool(false);
+ REGB3 = TAG_Bool(0);
REGB2 = REGB3;
} else {
REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[6])(fra.me.REG[6], NIT_NULL);
} else {
REGB3 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Bool(false);
+ REGB3 = TAG_Bool(0);
REGB2 = REGB3;
} else {
REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[6])(fra.me.REG[6], fra.me.REG[3]);
REGB2 = TAG_Bool((fra.me.REG[6]!=NIT_NULL) && VAL_ISA(fra.me.REG[6], COLOR_metamodel___static_type___MMTypeNone, ID_metamodel___static_type___MMTypeNone)) /*cast MMTypeNone*/;
if (UNTAG_Bool(REGB2)) {
/* syntax/flow.nit:236 */
- REGB2 = TAG_Bool(true);
+ REGB2 = TAG_Bool(1);
REGB0 = REGB2;
/* syntax/flow.nit:237 */
goto label2;
REGB2 = TAG_Bool((fra.me.REG[6]!=NIT_NULL) && VAL_ISA(fra.me.REG[6], COLOR_metamodel___static_type___MMNullableType, ID_metamodel___static_type___MMNullableType)) /*cast MMNullableType*/;
if (UNTAG_Bool(REGB2)) {
/* syntax/flow.nit:240 */
- REGB2 = TAG_Bool(true);
+ REGB2 = TAG_Bool(1);
REGB0 = REGB2;
/* syntax/flow.nit:241 */
REGB2 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
} else {
REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
if (UNTAG_Bool(REGB3)) {
- REGB3 = TAG_Bool(false);
+ REGB3 = TAG_Bool(0);
REGB2 = REGB3;
} else {
REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
}
}
if (UNTAG_Bool(REGB2)) {
- REGB2 = TAG_Bool(true);
+ REGB2 = TAG_Bool(1);
} else {
REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
if (UNTAG_Bool(REGB3)) {
label2: while(0);
/* ../lib/standard/collection/array.nit:274 */
REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:235 */
+ /* ../lib/standard/kernel.nit:238 */
REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
/* ../lib/standard/collection/array.nit:274 */
REGB1 = REGB2;
} else {
REGB2 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
if (UNTAG_Bool(REGB2)) {
- REGB2 = TAG_Bool(false);
+ REGB2 = TAG_Bool(0);
REGB1 = REGB2;
} else {
REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], NIT_NULL);
} else {
REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(false);
+ REGB1 = TAG_Bool(0);
REGB0 = REGB1;
} else {
REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
} else {
REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
if (UNTAG_Bool(REGB1)) {
- REGB1 = TAG_Bool(false);
+ REGB1 = TAG_Bool(0);
REGB0 = REGB1;
} else {
REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
} else {
nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
}
- /* ../lib/standard/kernel.nit:232 */
+ /* ../lib/standard/kernel.nit:235 */
REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
/* ../lib/standard/collection/array.nit:272 */
if (UNTAG_Bool(REGB1)) {
if (UNTAG_Bool(REGB1)) {
nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
}
- /* ../lib/standard/collection/array.nit:718 */
+ /* ../lib/standard/collection/array.nit:724 */
fra.me.REG[4] = ((Nit_NativeArray)fra.me.REG[5])->val[UNTAG_Int(REGB0)];
/* syntax/flow.nit:261 */
fra.me.REG[4] = CALL_syntax___flow___FlowContext___stype(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[1]);
}
/* ../lib/standard/collection/array.nit:274 */
REGB1 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:235 */
+ /* ../lib/standard/kernel.nit:238 */
REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
/* ../lib/standard/collection/array.nit:274 */
REGB0 = REGB1;
stack_frame_head = fra.me.prev;
return fra.me.REG[7];
}
+static const char LOCATE_syntax___flow___MergeFlowContext___is_set[] = "flow::MergeFlowContext::(flow::FlowContext::is_set)";
val_t syntax___flow___MergeFlowContext___is_set(val_t p0, val_t p1){
struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
val_t REGB0;
REGB0 = CALL_standard___collection___abstract_collection___Collection___has(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
if (UNTAG_Bool(REGB0)) {
/* syntax/flow.nit:273 */
- REGB0 = TAG_Bool(true);
+ REGB0 = TAG_Bool(1);
goto label1;
} else {
/* syntax/flow.nit:275 */
} else {
nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
}
- /* ../lib/standard/kernel.nit:232 */
+ /* ../lib/standard/kernel.nit:235 */
REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
/* ../lib/standard/collection/array.nit:272 */
if (UNTAG_Bool(REGB2)) {
if (UNTAG_Bool(REGB2)) {
nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
}
- /* ../lib/standard/collection/array.nit:718 */
+ /* ../lib/standard/collection/array.nit:724 */
fra.me.REG[4] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB1)];
/* syntax/flow.nit:276 */
REGB2 = CALL_syntax___flow___FlowContext___is_set(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[1]);
REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
if (UNTAG_Bool(REGB2)) {
/* syntax/flow.nit:277 */
- REGB2 = TAG_Bool(false);
+ REGB2 = TAG_Bool(0);
REGB0 = REGB2;
goto label1;
}
/* ../lib/standard/collection/array.nit:274 */
REGB2 = TAG_Int(1);
- /* ../lib/standard/kernel.nit:235 */
+ /* ../lib/standard/kernel.nit:238 */
REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
/* ../lib/standard/collection/array.nit:274 */
REGB1 = REGB2;
fra.me.REG[0] = ATTR_syntax___flow___FlowContext____set_variables(fra.me.REG[0]);
CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
/* syntax/flow.nit:281 */
- REGB1 = TAG_Bool(true);
+ REGB1 = TAG_Bool(1);
REGB0 = REGB1;
goto label1;
}
stack_frame_head = fra.me.prev;
return REGB0;
}
+static const char LOCATE_syntax___flow___Variable___must_be_set[] = "flow::Variable::must_be_set";
val_t syntax___flow___Variable___must_be_set(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
/* syntax/flow.nit:289 */
- REGB0 = TAG_Bool(false);
+ REGB0 = TAG_Bool(0);
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;
return REGB0;
}
+static const char LOCATE_syntax___flow___VarVariable___must_be_set[] = "flow::VarVariable::(flow::Variable::must_be_set)";
val_t syntax___flow___VarVariable___must_be_set(val_t p0){
struct {struct stack_frame_t me;} fra;
val_t REGB0;
fra.me.REG[0] = NIT_NULL;
fra.me.REG[0] = p0;
/* syntax/flow.nit:293 */
- REGB0 = TAG_Bool(true);
+ REGB0 = TAG_Bool(1);
goto label1;
label1: while(0);
stack_frame_head = fra.me.prev;