--- /dev/null
+#include "nit__light_ffi_base.sep.0.h"
+/* method light_ffi_base#ToolContext#ffi_language_assignation_phase for (self: ToolContext): Phase */
+val* nit__light_ffi_base___ToolContext___ffi_language_assignation_phase(val* self) {
+val* var /* : Phase */;
+val* var1 /* : Phase */;
+var1 = self->attrs[COLOR_nit__light_ffi_base__ToolContext___ffi_language_assignation_phase].val; /* _ffi_language_assignation_phase on <self:ToolContext> */
+if (unlikely(var1 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _ffi_language_assignation_phase");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 26);
+fatal_exit(1);
+}
+var = var1;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#FFILanguageAssignationPhase#languages for (self: FFILanguageAssignationPhase): Array[FFILanguage] */
+val* nit___nit__FFILanguageAssignationPhase___languages(val* self) {
+val* var /* : Array[FFILanguage] */;
+val* var1 /* : Array[FFILanguage] */;
+var1 = self->attrs[COLOR_nit__light_ffi_base__FFILanguageAssignationPhase___languages].val; /* _languages on <self:FFILanguageAssignationPhase> */
+if (unlikely(var1 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _languages");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 36);
+fatal_exit(1);
+}
+var = var1;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#FFILanguageAssignationPhase#process_nmodule for (self: FFILanguageAssignationPhase, AModule) */
+void nit___nit__FFILanguageAssignationPhase___nit__phase__Phase__process_nmodule(val* self, val* p0) {
+val* var_nmodule /* var nmodule: AModule */;
+val* var /* : ANodes[AExternCodeBlock] */;
+val* var2 /* : ANodes[AExternCodeBlock] */;
+val* var_ /* var : ANodes[AExternCodeBlock] */;
+val* var3 /* : Iterator[ANode] */;
+val* var_4 /* var : Iterator[AExternCodeBlock] */;
+short int var5 /* : Bool */;
+val* var6 /* : nullable Object */;
+val* var_block /* var block: AExternCodeBlock */;
+var_nmodule = p0;
+{
+{ /* Inline parser_nodes#AModule#n_extern_code_blocks (var_nmodule) on <var_nmodule:AModule> */
+var2 = var_nmodule->attrs[COLOR_nit__parser_nodes__AModule___n_extern_code_blocks].val; /* _n_extern_code_blocks on <var_nmodule:AModule> */
+if (unlikely(var2 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _n_extern_code_blocks");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__parser_nodes, 1093);
+fatal_exit(1);
+}
+var = var2;
+RET_LABEL1:(void)0;
+}
+}
+var_ = var;
+{
+var3 = nit___nit__ANodes___standard__abstract_collection__Collection__iterator(var_);
+}
+var_4 = var3;
+for(;;) {
+{
+var5 = ((short int(*)(val* self))((((long)var_4&3)?class_info[((long)var_4&3)]:var_4->class)->vft[COLOR_standard__abstract_collection__Iterator__is_ok]))(var_4); /* is_ok on <var_4:Iterator[AExternCodeBlock]>*/
+}
+if (var5){
+{
+var6 = ((val*(*)(val* self))((((long)var_4&3)?class_info[((long)var_4&3)]:var_4->class)->vft[COLOR_standard__abstract_collection__Iterator__item]))(var_4); /* item on <var_4:Iterator[AExternCodeBlock]>*/
+}
+var_block = var6;
+{
+nit___nit__FFILanguageAssignationPhase___verify_foreign_code_on_node(self, var_block); /* Direct call light_ffi_base#FFILanguageAssignationPhase#verify_foreign_code_on_node on <self:FFILanguageAssignationPhase>*/
+}
+{
+((void(*)(val* self))((((long)var_4&3)?class_info[((long)var_4&3)]:var_4->class)->vft[COLOR_standard__abstract_collection__Iterator__next]))(var_4); /* next on <var_4:Iterator[AExternCodeBlock]>*/
+}
+} else {
+goto BREAK_label;
+}
+}
+BREAK_label: (void)0;
+{
+((void(*)(val* self))((((long)var_4&3)?class_info[((long)var_4&3)]:var_4->class)->vft[COLOR_standard__abstract_collection__Iterator__finish]))(var_4); /* finish on <var_4:Iterator[AExternCodeBlock]>*/
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#FFILanguageAssignationPhase#process_npropdef for (self: FFILanguageAssignationPhase, APropdef) */
+void nit___nit__FFILanguageAssignationPhase___nit__phase__Phase__process_npropdef(val* self, val* p0) {
+val* var_npropdef /* var npropdef: APropdef */;
+short int var /* : Bool */;
+int cltype;
+int idtype;
+val* var1 /* : nullable AExternCodeBlock */;
+val* var3 /* : nullable AExternCodeBlock */;
+val* var_code_block /* var code_block: nullable AExternCodeBlock */;
+short int var4 /* : Bool */;
+short int var5 /* : Bool */;
+val* var_other /* var other: nullable Object */;
+short int var7 /* : Bool */;
+short int var8 /* : Bool */;
+var_npropdef = p0;
+/* <var_npropdef:APropdef> isa AMethPropdef */
+cltype = type_nit__AMethPropdef.color;
+idtype = type_nit__AMethPropdef.id;
+if(cltype >= var_npropdef->type->table_size) {
+var = 0;
+} else {
+var = var_npropdef->type->type_table[cltype] == idtype;
+}
+if (var){
+{
+{ /* Inline parser_nodes#AMethPropdef#n_extern_code_block (var_npropdef) on <var_npropdef:APropdef(AMethPropdef)> */
+var3 = var_npropdef->attrs[COLOR_nit__parser_nodes__AMethPropdef___n_extern_code_block].val; /* _n_extern_code_block on <var_npropdef:APropdef(AMethPropdef)> */
+var1 = var3;
+RET_LABEL2:(void)0;
+}
+}
+var_code_block = var1;
+if (var_code_block == NULL) {
+var4 = 0; /* is null */
+} else {
+var4 = 1; /* arg is null and recv is not */
+}
+if (0) {
+{ /* Inline kernel#Object#!= (var_code_block,((val*)NULL)) on <var_code_block:nullable AExternCodeBlock> */
+var_other = ((val*)NULL);
+{
+var7 = ((short int(*)(val* self, val* p0))(var_code_block->class->vft[COLOR_standard__kernel__Object___61d_61d]))(var_code_block, var_other); /* == on <var_code_block:nullable AExternCodeBlock(AExternCodeBlock)>*/
+}
+var8 = !var7;
+var5 = var8;
+goto RET_LABEL6;
+RET_LABEL6:(void)0;
+}
+var4 = var5;
+}
+if (var4){
+{
+nit___nit__FFILanguageAssignationPhase___verify_foreign_code_on_node(self, var_code_block); /* Direct call light_ffi_base#FFILanguageAssignationPhase#verify_foreign_code_on_node on <self:FFILanguageAssignationPhase>*/
+}
+} else {
+}
+} else {
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#FFILanguageAssignationPhase#process_nclassdef for (self: FFILanguageAssignationPhase, AClassdef) */
+void nit___nit__FFILanguageAssignationPhase___nit__phase__Phase__process_nclassdef(val* self, val* p0) {
+val* var_nclassdef /* var nclassdef: AClassdef */;
+short int var /* : Bool */;
+short int var1 /* : Bool */;
+int cltype;
+int idtype;
+short int var_ /* var : Bool */;
+val* var2 /* : nullable AExternCodeBlock */;
+val* var4 /* : nullable AExternCodeBlock */;
+short int var5 /* : Bool */;
+short int var6 /* : Bool */;
+val* var_other /* var other: nullable Object */;
+short int var8 /* : Bool */;
+short int var9 /* : Bool */;
+val* var10 /* : nullable AExternCodeBlock */;
+val* var12 /* : nullable AExternCodeBlock */;
+var_nclassdef = p0;
+/* <var_nclassdef:AClassdef> isa AStdClassdef */
+cltype = type_nit__AStdClassdef.color;
+idtype = type_nit__AStdClassdef.id;
+if(cltype >= var_nclassdef->type->table_size) {
+var1 = 0;
+} else {
+var1 = var_nclassdef->type->type_table[cltype] == idtype;
+}
+var_ = var1;
+if (var1){
+{
+{ /* Inline parser_nodes#AStdClassdef#n_extern_code_block (var_nclassdef) on <var_nclassdef:AClassdef(AStdClassdef)> */
+var4 = var_nclassdef->attrs[COLOR_nit__parser_nodes__AStdClassdef___n_extern_code_block].val; /* _n_extern_code_block on <var_nclassdef:AClassdef(AStdClassdef)> */
+var2 = var4;
+RET_LABEL3:(void)0;
+}
+}
+if (var2 == NULL) {
+var5 = 0; /* is null */
+} else {
+var5 = 1; /* arg is null and recv is not */
+}
+if (0) {
+{ /* Inline kernel#Object#!= (var2,((val*)NULL)) on <var2:nullable AExternCodeBlock> */
+var_other = ((val*)NULL);
+{
+var8 = ((short int(*)(val* self, val* p0))(var2->class->vft[COLOR_standard__kernel__Object___61d_61d]))(var2, var_other); /* == on <var2:nullable AExternCodeBlock(AExternCodeBlock)>*/
+}
+var9 = !var8;
+var6 = var9;
+goto RET_LABEL7;
+RET_LABEL7:(void)0;
+}
+var5 = var6;
+}
+var = var5;
+} else {
+var = var_;
+}
+if (var){
+{
+{ /* Inline parser_nodes#AStdClassdef#n_extern_code_block (var_nclassdef) on <var_nclassdef:AClassdef(AStdClassdef)> */
+var12 = var_nclassdef->attrs[COLOR_nit__parser_nodes__AStdClassdef___n_extern_code_block].val; /* _n_extern_code_block on <var_nclassdef:AClassdef(AStdClassdef)> */
+var10 = var12;
+RET_LABEL11:(void)0;
+}
+}
+if (unlikely(var10 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Cast failed");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 59);
+fatal_exit(1);
+}
+{
+nit___nit__FFILanguageAssignationPhase___verify_foreign_code_on_node(self, var10); /* Direct call light_ffi_base#FFILanguageAssignationPhase#verify_foreign_code_on_node on <self:FFILanguageAssignationPhase>*/
+}
+} else {
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#FFILanguageAssignationPhase#verify_foreign_code_on_node for (self: FFILanguageAssignationPhase, AExternCodeBlock) */
+void nit___nit__FFILanguageAssignationPhase___verify_foreign_code_on_node(val* self, val* p0) {
+val* var_n /* var n: AExternCodeBlock */;
+short int var_found /* var found: Bool */;
+val* var /* : Array[FFILanguage] */;
+val* var2 /* : Array[FFILanguage] */;
+val* var_ /* var : Array[FFILanguage] */;
+val* var3 /* : ArrayIterator[nullable Object] */;
+val* var_4 /* var : ArrayIterator[FFILanguage] */;
+short int var5 /* : Bool */;
+val* var6 /* : nullable Object */;
+val* var_v /* var v: FFILanguage */;
+short int var7 /* : Bool */;
+short int var_identified /* var identified: Bool */;
+short int var8 /* : Bool */;
+short int var_9 /* var : Bool */;
+val* var10 /* : ToolContext */;
+val* var12 /* : ToolContext */;
+val* var13 /* : Location */;
+val* var15 /* : Location */;
+static val* varonce;
+val* var16 /* : String */;
+char* var17 /* : NativeString */;
+val* var18 /* : FlatString */;
+val* var19 /* : Message */;
+short int var21 /* : Bool */;
+val* var22 /* : ToolContext */;
+val* var24 /* : ToolContext */;
+val* var25 /* : Location */;
+val* var27 /* : Location */;
+static val* varonce28;
+val* var29 /* : String */;
+char* var30 /* : NativeString */;
+val* var31 /* : FlatString */;
+val* var32 /* : Message */;
+var_n = p0;
+var_found = 0;
+{
+{ /* Inline light_ffi_base#FFILanguageAssignationPhase#languages (self) on <self:FFILanguageAssignationPhase> */
+var2 = self->attrs[COLOR_nit__light_ffi_base__FFILanguageAssignationPhase___languages].val; /* _languages on <self:FFILanguageAssignationPhase> */
+if (unlikely(var2 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _languages");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 36);
+fatal_exit(1);
+}
+var = var2;
+RET_LABEL1:(void)0;
+}
+}
+var_ = var;
+{
+var3 = standard___standard__AbstractArrayRead___standard__abstract_collection__Collection__iterator(var_);
+}
+var_4 = var3;
+for(;;) {
+{
+var5 = standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__is_ok(var_4);
+}
+if (var5){
+{
+var6 = standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__item(var_4);
+}
+var_v = var6;
+{
+var7 = nit___nit__CLanguage___nit__light_ffi_base__FFILanguage__identify_language(var_v, var_n);
+}
+var_identified = var7;
+if (var_identified){
+var_9 = var_found;
+if (var_found){
+var8 = var_identified;
+} else {
+var8 = var_9;
+}
+if (var8){
+{
+{ /* Inline phase#Phase#toolcontext (self) on <self:FFILanguageAssignationPhase> */
+var12 = self->attrs[COLOR_nit__phase__Phase___toolcontext].val; /* _toolcontext on <self:FFILanguageAssignationPhase> */
+if (unlikely(var12 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _toolcontext");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__phase, 200);
+fatal_exit(1);
+}
+var10 = var12;
+RET_LABEL11:(void)0;
+}
+}
+{
+{ /* Inline parser_nodes#ANode#location (var_n) on <var_n:AExternCodeBlock> */
+var15 = var_n->attrs[COLOR_nit__parser_nodes__ANode___location].val; /* _location on <var_n:AExternCodeBlock> */
+if (unlikely(var15 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _location");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__parser_nodes, 24);
+fatal_exit(1);
+}
+var13 = var15;
+RET_LABEL14:(void)0;
+}
+}
+if (likely(varonce!=NULL)) {
+var16 = varonce;
+} else {
+var17 = "FFI Error: two languages identified as possible handlers.";
+var18 = standard___standard__NativeString___to_s_with_length(var17, 57l);
+var16 = var18;
+varonce = var16;
+}
+{
+var19 = nit___nit__ToolContext___error(var10, var13, var16);
+}
+} else {
+}
+{
+{ /* Inline light_ffi_base#AExternCodeBlock#language= (var_n,var_v) on <var_n:AExternCodeBlock> */
+var_n->attrs[COLOR_nit__light_ffi_base__AExternCodeBlock___language].val = var_v; /* _language on <var_n:AExternCodeBlock> */
+RET_LABEL20:(void)0;
+}
+}
+var_found = 1;
+} else {
+}
+{
+standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__next(var_4); /* Direct call array#ArrayIterator#next on <var_4:ArrayIterator[FFILanguage]>*/
+}
+} else {
+goto BREAK_label;
+}
+}
+BREAK_label: (void)0;
+{
+standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__finish(var_4); /* Direct call array#ArrayIterator#finish on <var_4:ArrayIterator[FFILanguage]>*/
+}
+var21 = !var_found;
+if (var21){
+{
+{ /* Inline phase#Phase#toolcontext (self) on <self:FFILanguageAssignationPhase> */
+var24 = self->attrs[COLOR_nit__phase__Phase___toolcontext].val; /* _toolcontext on <self:FFILanguageAssignationPhase> */
+if (unlikely(var24 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _toolcontext");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__phase, 200);
+fatal_exit(1);
+}
+var22 = var24;
+RET_LABEL23:(void)0;
+}
+}
+{
+{ /* Inline parser_nodes#ANode#location (var_n) on <var_n:AExternCodeBlock> */
+var27 = var_n->attrs[COLOR_nit__parser_nodes__ANode___location].val; /* _location on <var_n:AExternCodeBlock> */
+if (unlikely(var27 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _location");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__parser_nodes, 24);
+fatal_exit(1);
+}
+var25 = var27;
+RET_LABEL26:(void)0;
+}
+}
+if (likely(varonce28!=NULL)) {
+var29 = varonce28;
+} else {
+var30 = "FFI Error: unsupported language.";
+var31 = standard___standard__NativeString___to_s_with_length(var30, 32l);
+var29 = var31;
+varonce28 = var29;
+}
+{
+var32 = nit___nit__ToolContext___error(var22, var25, var29);
+}
+} else {
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#MModule#ffi_files for (self: MModule): Array[ExternFile] */
+val* nit__light_ffi_base___MModule___ffi_files(val* self) {
+val* var /* : Array[ExternFile] */;
+val* var1 /* : Array[ExternFile] */;
+var1 = self->attrs[COLOR_nit__light_ffi_base__MModule___ffi_files].val; /* _ffi_files on <self:MModule> */
+if (unlikely(var1 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _ffi_files");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 82);
+fatal_exit(1);
+}
+var = var1;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#AExternCodeBlock#language_name for (self: AExternCodeBlock): nullable String */
+val* nit__light_ffi_base___AExternCodeBlock___language_name(val* self) {
+val* var /* : nullable String */;
+val* var1 /* : nullable AInLanguage */;
+val* var3 /* : nullable AInLanguage */;
+short int var4 /* : Bool */;
+short int var5 /* : Bool */;
+val* var_other /* var other: nullable Object */;
+short int var7 /* : Bool */;
+short int var9 /* : Bool */;
+val* var10 /* : nullable AInLanguage */;
+val* var12 /* : nullable AInLanguage */;
+val* var13 /* : TString */;
+val* var15 /* : TString */;
+val* var16 /* : String */;
+{
+{ /* Inline parser_nodes#AExternCodeBlock#n_in_language (self) on <self:AExternCodeBlock> */
+var3 = self->attrs[COLOR_nit__parser_nodes__AExternCodeBlock___n_in_language].val; /* _n_in_language on <self:AExternCodeBlock> */
+var1 = var3;
+RET_LABEL2:(void)0;
+}
+}
+if (var1 == NULL) {
+var4 = 1; /* is null */
+} else {
+var4 = 0; /* arg is null but recv is not */
+}
+if (0) {
+{ /* Inline kernel#Object#== (var1,((val*)NULL)) on <var1:nullable AInLanguage> */
+var_other = ((val*)NULL);
+{
+{ /* Inline kernel#Object#is_same_instance (var1,var_other) on <var1:nullable AInLanguage(AInLanguage)> */
+var9 = var1 == var_other;
+var7 = var9;
+goto RET_LABEL8;
+RET_LABEL8:(void)0;
+}
+}
+var5 = var7;
+goto RET_LABEL6;
+RET_LABEL6:(void)0;
+}
+var4 = var5;
+}
+if (var4){
+var = ((val*)NULL);
+goto RET_LABEL;
+} else {
+}
+{
+{ /* Inline parser_nodes#AExternCodeBlock#n_in_language (self) on <self:AExternCodeBlock> */
+var12 = self->attrs[COLOR_nit__parser_nodes__AExternCodeBlock___n_in_language].val; /* _n_in_language on <self:AExternCodeBlock> */
+var10 = var12;
+RET_LABEL11:(void)0;
+}
+}
+if (var10 == NULL) {
+PRINT_ERROR("Runtime error: %s", "Receiver is null");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 90);
+fatal_exit(1);
+} else {
+{ /* Inline parser_nodes#AInLanguage#n_string (var10) on <var10:nullable AInLanguage> */
+if (unlikely(var10 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Receiver is null");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__parser_nodes, 2911);
+fatal_exit(1);
+}
+var15 = var10->attrs[COLOR_nit__parser_nodes__AInLanguage___n_string].val; /* _n_string on <var10:nullable AInLanguage> */
+if (unlikely(var15 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _n_string");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__parser_nodes, 2911);
+fatal_exit(1);
+}
+var13 = var15;
+RET_LABEL14:(void)0;
+}
+}
+{
+var16 = nit__light_ffi_base___TString___without_quotes(var13);
+}
+var = var16;
+goto RET_LABEL;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#AExternCodeBlock#language_name_lowered for (self: AExternCodeBlock): nullable String */
+val* nit__light_ffi_base___AExternCodeBlock___language_name_lowered(val* self) {
+val* var /* : nullable String */;
+val* var1 /* : nullable String */;
+short int var2 /* : Bool */;
+short int var3 /* : Bool */;
+val* var4 /* : nullable String */;
+val* var5 /* : String */;
+{
+var1 = nit__light_ffi_base___AExternCodeBlock___language_name(self);
+}
+if (var1 == NULL) {
+var2 = 1; /* is null */
+} else {
+var2 = 0; /* arg is null but recv is not */
+}
+if (0) {
+var3 = ((short int(*)(val* self, val* p0))(var1->class->vft[COLOR_standard__kernel__Object___61d_61d]))(var1, ((val*)NULL)); /* == on <var1:nullable String>*/
+var2 = var3;
+}
+if (var2){
+var = ((val*)NULL);
+goto RET_LABEL;
+} else {
+}
+{
+var4 = nit__light_ffi_base___AExternCodeBlock___language_name(self);
+}
+if (var4 == NULL) {
+PRINT_ERROR("Runtime error: %s", "Receiver is null");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 96);
+fatal_exit(1);
+} else {
+var5 = ((val*(*)(val* self))(var4->class->vft[COLOR_standard__string__String__to_lower]))(var4); /* to_lower on <var4:nullable String>*/
+}
+var = var5;
+goto RET_LABEL;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#AExternCodeBlock#code for (self: AExternCodeBlock): String */
+val* nit__light_ffi_base___AExternCodeBlock___code(val* self) {
+val* var /* : String */;
+val* var1 /* : TExternCodeSegment */;
+val* var3 /* : TExternCodeSegment */;
+val* var4 /* : String */;
+{
+{ /* Inline parser_nodes#AExternCodeBlock#n_extern_code_segment (self) on <self:AExternCodeBlock> */
+var3 = self->attrs[COLOR_nit__parser_nodes__AExternCodeBlock___n_extern_code_segment].val; /* _n_extern_code_segment on <self:AExternCodeBlock> */
+if (unlikely(var3 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _n_extern_code_segment");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__parser_nodes, 2922);
+fatal_exit(1);
+}
+var1 = var3;
+RET_LABEL2:(void)0;
+}
+}
+{
+var4 = nit__light_ffi_base___TExternCodeSegment___without_guard(var1);
+}
+var = var4;
+goto RET_LABEL;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#AExternCodeBlock#language for (self: AExternCodeBlock): nullable FFILanguage */
+val* nit__light_ffi_base___AExternCodeBlock___language(val* self) {
+val* var /* : nullable FFILanguage */;
+val* var1 /* : nullable FFILanguage */;
+var1 = self->attrs[COLOR_nit__light_ffi_base__AExternCodeBlock___language].val; /* _language on <self:AExternCodeBlock> */
+var = var1;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#AExternCodeBlock#language= for (self: AExternCodeBlock, nullable FFILanguage) */
+void nit__light_ffi_base___AExternCodeBlock___language_61d(val* self, val* p0) {
+self->attrs[COLOR_nit__light_ffi_base__AExternCodeBlock___language].val = p0; /* _language on <self:AExternCodeBlock> */
+RET_LABEL:;
+}
+/* method light_ffi_base#FFILanguage#ffi_language_assignation_phase for (self: FFILanguage): FFILanguageAssignationPhase */
+val* nit___nit__FFILanguage___ffi_language_assignation_phase(val* self) {
+val* var /* : FFILanguageAssignationPhase */;
+val* var1 /* : FFILanguageAssignationPhase */;
+var1 = self->attrs[COLOR_nit__light_ffi_base__FFILanguage___ffi_language_assignation_phase].val; /* _ffi_language_assignation_phase on <self:FFILanguage> */
+if (unlikely(var1 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _ffi_language_assignation_phase");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 109);
+fatal_exit(1);
+}
+var = var1;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#FFILanguage#ffi_language_assignation_phase= for (self: FFILanguage, FFILanguageAssignationPhase) */
+void nit___nit__FFILanguage___ffi_language_assignation_phase_61d(val* self, val* p0) {
+self->attrs[COLOR_nit__light_ffi_base__FFILanguage___ffi_language_assignation_phase].val = p0; /* _ffi_language_assignation_phase on <self:FFILanguage> */
+RET_LABEL:;
+}
+/* method light_ffi_base#FFILanguage#init for (self: FFILanguage) */
+void nit___nit__FFILanguage___standard__kernel__Object__init(val* self) {
+val* var /* : FFILanguageAssignationPhase */;
+val* var2 /* : FFILanguageAssignationPhase */;
+val* var3 /* : Array[FFILanguage] */;
+val* var5 /* : Array[FFILanguage] */;
+{
+{ /* Inline light_ffi_base#FFILanguage#ffi_language_assignation_phase (self) on <self:FFILanguage> */
+var2 = self->attrs[COLOR_nit__light_ffi_base__FFILanguage___ffi_language_assignation_phase].val; /* _ffi_language_assignation_phase on <self:FFILanguage> */
+if (unlikely(var2 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _ffi_language_assignation_phase");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 109);
+fatal_exit(1);
+}
+var = var2;
+RET_LABEL1:(void)0;
+}
+}
+{
+{ /* Inline light_ffi_base#FFILanguageAssignationPhase#languages (var) on <var:FFILanguageAssignationPhase> */
+var5 = var->attrs[COLOR_nit__light_ffi_base__FFILanguageAssignationPhase___languages].val; /* _languages on <var:FFILanguageAssignationPhase> */
+if (unlikely(var5 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _languages");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 36);
+fatal_exit(1);
+}
+var3 = var5;
+RET_LABEL4:(void)0;
+}
+}
+{
+standard___standard__Array___standard__abstract_collection__SimpleCollection__add(var3, self); /* Direct call array#Array#add on <var3:Array[FFILanguage]>*/
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#TString#without_quotes for (self: TString): String */
+val* nit__light_ffi_base___TString___without_quotes(val* self) {
+val* var /* : String */;
+val* var1 /* : String */;
+long var2 /* : Int */;
+short int var3 /* : Bool */;
+short int var5 /* : Bool */;
+int cltype;
+int idtype;
+const char* var_class_name;
+short int var6 /* : Bool */;
+val* var7 /* : String */;
+val* var8 /* : String */;
+long var9 /* : Int */;
+long var10 /* : Int */;
+short int var12 /* : Bool */;
+int cltype13;
+int idtype14;
+const char* var_class_name15;
+long var16 /* : Int */;
+val* var17 /* : Text */;
+{
+var1 = nit__lexer_work___Token___text(self);
+}
+{
+var2 = ((long(*)(val* self))(var1->class->vft[COLOR_standard__string__Text__length]))(var1); /* length on <var1:String>*/
+}
+{
+{ /* Inline kernel#Int#>= (var2,2l) on <var2:Int> */
+/* Covariant cast for argument 0 (i) <2l:Int> isa OTHER */
+/* <2l:Int> isa OTHER */
+var5 = 1; /* easy <2l:Int> isa OTHER*/
+if (unlikely(!var5)) {
+var_class_name = type_standard__Int.name;
+PRINT_ERROR("Runtime error: Cast failed. Expected `%s`, got `%s`", "OTHER", var_class_name);
+PRINT_ERROR(" (%s:%d)\n", FILE_standard__kernel, 535);
+fatal_exit(1);
+}
+var6 = var2 >= 2l;
+var3 = var6;
+goto RET_LABEL4;
+RET_LABEL4:(void)0;
+}
+}
+if (unlikely(!var3)) {
+PRINT_ERROR("Runtime error: %s", "Assert failed");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 142);
+fatal_exit(1);
+}
+{
+var7 = nit__lexer_work___Token___text(self);
+}
+{
+var8 = nit__lexer_work___Token___text(self);
+}
+{
+var9 = ((long(*)(val* self))(var8->class->vft[COLOR_standard__string__Text__length]))(var8); /* length on <var8:String>*/
+}
+{
+{ /* Inline kernel#Int#- (var9,2l) on <var9:Int> */
+/* Covariant cast for argument 0 (i) <2l:Int> isa OTHER */
+/* <2l:Int> isa OTHER */
+var12 = 1; /* easy <2l:Int> isa OTHER*/
+if (unlikely(!var12)) {
+var_class_name15 = type_standard__Int.name;
+PRINT_ERROR("Runtime error: Cast failed. Expected `%s`, got `%s`", "OTHER", var_class_name15);
+PRINT_ERROR(" (%s:%d)\n", FILE_standard__kernel, 540);
+fatal_exit(1);
+}
+var16 = var9 - 2l;
+var10 = var16;
+goto RET_LABEL11;
+RET_LABEL11:(void)0;
+}
+}
+{
+var17 = ((val*(*)(val* self, long p0, long p1))(var7->class->vft[COLOR_standard__string__Text__substring]))(var7, 1l, var10); /* substring on <var7:String>*/
+}
+var = var17;
+goto RET_LABEL;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#TExternCodeSegment#without_guard for (self: TExternCodeSegment): String */
+val* nit__light_ffi_base___TExternCodeSegment___without_guard(val* self) {
+val* var /* : String */;
+val* var1 /* : String */;
+long var2 /* : Int */;
+short int var3 /* : Bool */;
+short int var5 /* : Bool */;
+int cltype;
+int idtype;
+const char* var_class_name;
+short int var6 /* : Bool */;
+val* var7 /* : String */;
+val* var8 /* : String */;
+long var9 /* : Int */;
+long var10 /* : Int */;
+short int var12 /* : Bool */;
+int cltype13;
+int idtype14;
+const char* var_class_name15;
+long var16 /* : Int */;
+val* var17 /* : Text */;
+{
+var1 = nit__lexer_work___Token___text(self);
+}
+{
+var2 = ((long(*)(val* self))(var1->class->vft[COLOR_standard__string__Text__length]))(var1); /* length on <var1:String>*/
+}
+{
+{ /* Inline kernel#Int#>= (var2,4l) on <var2:Int> */
+/* Covariant cast for argument 0 (i) <4l:Int> isa OTHER */
+/* <4l:Int> isa OTHER */
+var5 = 1; /* easy <4l:Int> isa OTHER*/
+if (unlikely(!var5)) {
+var_class_name = type_standard__Int.name;
+PRINT_ERROR("Runtime error: Cast failed. Expected `%s`, got `%s`", "OTHER", var_class_name);
+PRINT_ERROR(" (%s:%d)\n", FILE_standard__kernel, 535);
+fatal_exit(1);
+}
+var6 = var2 >= 4l;
+var3 = var6;
+goto RET_LABEL4;
+RET_LABEL4:(void)0;
+}
+}
+if (unlikely(!var3)) {
+PRINT_ERROR("Runtime error: %s", "Assert failed");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__light_ffi_base, 151);
+fatal_exit(1);
+}
+{
+var7 = nit__lexer_work___Token___text(self);
+}
+{
+var8 = nit__lexer_work___Token___text(self);
+}
+{
+var9 = ((long(*)(val* self))(var8->class->vft[COLOR_standard__string__Text__length]))(var8); /* length on <var8:String>*/
+}
+{
+{ /* Inline kernel#Int#- (var9,4l) on <var9:Int> */
+/* Covariant cast for argument 0 (i) <4l:Int> isa OTHER */
+/* <4l:Int> isa OTHER */
+var12 = 1; /* easy <4l:Int> isa OTHER*/
+if (unlikely(!var12)) {
+var_class_name15 = type_standard__Int.name;
+PRINT_ERROR("Runtime error: Cast failed. Expected `%s`, got `%s`", "OTHER", var_class_name15);
+PRINT_ERROR(" (%s:%d)\n", FILE_standard__kernel, 540);
+fatal_exit(1);
+}
+var16 = var9 - 4l;
+var10 = var16;
+goto RET_LABEL11;
+RET_LABEL11:(void)0;
+}
+}
+{
+var17 = ((val*(*)(val* self, long p0, long p1))(var7->class->vft[COLOR_standard__string__Text__substring]))(var7, 2l, var10); /* substring on <var7:String>*/
+}
+var = var17;
+goto RET_LABEL;
+RET_LABEL:;
+return var;
+}
+/* method light_ffi_base#CCompilationUnit#write_as_impl for (self: CCompilationUnit, MModule, String) */
+void nit__light_ffi_base___CCompilationUnit___write_as_impl(val* self, val* p0, val* p1) {
+val* var_mmodule /* var mmodule: MModule */;
+val* var_compdir /* var compdir: String */;
+val* var /* : NativeArray[String] */;
+static val* varonce;
+static val* varonce1;
+val* var2 /* : String */;
+char* var3 /* : NativeString */;
+val* var4 /* : FlatString */;
+val* var5 /* : String */;
+val* var6 /* : String */;
+val* var_base_name /* var base_name: String */;
+val* var8 /* : NativeArray[String] */;
+static val* varonce7;
+static val* varonce9;
+val* var10 /* : String */;
+char* var11 /* : NativeString */;
+val* var12 /* : FlatString */;
+val* var13 /* : String */;
+val* var_h_file /* var h_file: String */;
+val* var15 /* : NativeArray[String] */;
+static val* varonce14;
+static val* varonce16;
+val* var17 /* : String */;
+char* var18 /* : NativeString */;
+val* var19 /* : FlatString */;
+val* var20 /* : String */;
+val* var21 /* : String */;
+val* var22 /* : String */;
+val* var_guard /* var guard: String */;
+val* var24 /* : NativeArray[String] */;
+static val* varonce23;
+static val* varonce25;
+val* var26 /* : String */;
+char* var27 /* : NativeString */;
+val* var28 /* : FlatString */;
+val* var29 /* : String */;
+val* var30 /* : Array[String] */;
+val* var_ /* var : Array[String] */;
+static val* varonce31;
+val* var32 /* : String */;
+char* var33 /* : NativeString */;
+val* var34 /* : FlatString */;
+val* var36 /* : NativeArray[String] */;
+static val* varonce35;
+static val* varonce37;
+val* var38 /* : String */;
+char* var39 /* : NativeString */;
+val* var40 /* : FlatString */;
+val* var41 /* : String */;
+val* var_c_file /* var c_file: String */;
+val* var43 /* : NativeArray[String] */;
+static val* varonce42;
+static val* varonce44;
+val* var45 /* : String */;
+char* var46 /* : NativeString */;
+val* var47 /* : FlatString */;
+val* var48 /* : String */;
+val* var49 /* : Array[String] */;
+val* var_50 /* var : Array[String] */;
+static val* varonce51;
+val* var52 /* : String */;
+char* var53 /* : NativeString */;
+val* var54 /* : FlatString */;
+static val* varonce55;
+val* var56 /* : String */;
+char* var57 /* : NativeString */;
+val* var58 /* : FlatString */;
+static val* varonce59;
+val* var60 /* : String */;
+char* var61 /* : NativeString */;
+val* var62 /* : FlatString */;
+val* var64 /* : NativeArray[String] */;
+static val* varonce63;
+static val* varonce65;
+val* var66 /* : String */;
+char* var67 /* : NativeString */;
+val* var68 /* : FlatString */;
+static val* varonce69;
+val* var70 /* : String */;
+char* var71 /* : NativeString */;
+val* var72 /* : FlatString */;
+val* var73 /* : String */;
+val* var74 /* : Array[String] */;
+val* var76 /* : Array[String] */;
+val* var78 /* : NativeArray[String] */;
+static val* varonce77;
+static val* varonce79;
+val* var80 /* : String */;
+char* var81 /* : NativeString */;
+val* var82 /* : FlatString */;
+val* var83 /* : String */;
+var_mmodule = p0;
+var_compdir = p1;
+if (unlikely(varonce==NULL)) {
+var = NEW_standard__NativeArray(2l, &type_standard__NativeArray__standard__String);
+if (likely(varonce1!=NULL)) {
+var2 = varonce1;
+} else {
+var3 = "._ffi";
+var4 = standard___standard__NativeString___to_s_with_length(var3, 5l);
+var2 = var4;
+varonce1 = var2;
+}
+((struct instance_standard__NativeArray*)var)->values[1]=var2;
+} else {
+var = varonce;
+varonce = NULL;
+}
+{
+var5 = nit___nit__MModule___nit__model_base__MEntity__c_name(var_mmodule);
+}
+((struct instance_standard__NativeArray*)var)->values[0]=var5;
+{
+var6 = ((val*(*)(val* self))(var->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var); /* native_to_s on <var:NativeArray[String]>*/
+}
+varonce = var;
+var_base_name = var6;
+if (unlikely(varonce7==NULL)) {
+var8 = NEW_standard__NativeArray(2l, &type_standard__NativeArray__standard__String);
+if (likely(varonce9!=NULL)) {
+var10 = varonce9;
+} else {
+var11 = ".h";
+var12 = standard___standard__NativeString___to_s_with_length(var11, 2l);
+var10 = var12;
+varonce9 = var10;
+}
+((struct instance_standard__NativeArray*)var8)->values[1]=var10;
+} else {
+var8 = varonce7;
+varonce7 = NULL;
+}
+((struct instance_standard__NativeArray*)var8)->values[0]=var_base_name;
+{
+var13 = ((val*(*)(val* self))(var8->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var8); /* native_to_s on <var8:NativeArray[String]>*/
+}
+varonce7 = var8;
+var_h_file = var13;
+if (unlikely(varonce14==NULL)) {
+var15 = NEW_standard__NativeArray(2l, &type_standard__NativeArray__standard__String);
+if (likely(varonce16!=NULL)) {
+var17 = varonce16;
+} else {
+var18 = "_NIT_H";
+var19 = standard___standard__NativeString___to_s_with_length(var18, 6l);
+var17 = var19;
+varonce16 = var17;
+}
+((struct instance_standard__NativeArray*)var15)->values[1]=var17;
+} else {
+var15 = varonce14;
+varonce14 = NULL;
+}
+{
+var20 = nit___nit__MModule___nit__model_base__MEntity__c_name(var_mmodule);
+}
+{
+var21 = ((val*(*)(val* self))(var20->class->vft[COLOR_standard__string__String__to_upper]))(var20); /* to_upper on <var20:String>*/
+}
+((struct instance_standard__NativeArray*)var15)->values[0]=var21;
+{
+var22 = ((val*(*)(val* self))(var15->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var15); /* native_to_s on <var15:NativeArray[String]>*/
+}
+varonce14 = var15;
+var_guard = var22;
+if (unlikely(varonce23==NULL)) {
+var24 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce25!=NULL)) {
+var26 = varonce25;
+} else {
+var27 = "/";
+var28 = standard___standard__NativeString___to_s_with_length(var27, 1l);
+var26 = var28;
+varonce25 = var26;
+}
+((struct instance_standard__NativeArray*)var24)->values[1]=var26;
+} else {
+var24 = varonce23;
+varonce23 = NULL;
+}
+((struct instance_standard__NativeArray*)var24)->values[0]=var_compdir;
+((struct instance_standard__NativeArray*)var24)->values[2]=var_h_file;
+{
+var29 = ((val*(*)(val* self))(var24->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var24); /* native_to_s on <var24:NativeArray[String]>*/
+}
+varonce23 = var24;
+var30 = NEW_standard__Array(&type_standard__Array__standard__String);
+{
+standard___standard__Array___with_capacity(var30, 1l); /* Direct call array#Array#with_capacity on <var30:Array[String]>*/
+}
+var_ = var30;
+if (likely(varonce31!=NULL)) {
+var32 = varonce31;
+} else {
+var33 = "<stdint.h>";
+var34 = standard___standard__NativeString___to_s_with_length(var33, 10l);
+var32 = var34;
+varonce31 = var32;
+}
+{
+standard___standard__AbstractArray___standard__abstract_collection__Sequence__push(var_, var32); /* Direct call array#AbstractArray#push on <var_:Array[String]>*/
+}
+{
+nit__light_ffi_base___CCompilationUnit___write_header_to_file(self, var_mmodule, var29, var_, var_guard); /* Direct call light_ffi_base#CCompilationUnit#write_header_to_file on <self:CCompilationUnit>*/
+}
+if (unlikely(varonce35==NULL)) {
+var36 = NEW_standard__NativeArray(2l, &type_standard__NativeArray__standard__String);
+if (likely(varonce37!=NULL)) {
+var38 = varonce37;
+} else {
+var39 = ".c";
+var40 = standard___standard__NativeString___to_s_with_length(var39, 2l);
+var38 = var40;
+varonce37 = var38;
+}
+((struct instance_standard__NativeArray*)var36)->values[1]=var38;
+} else {
+var36 = varonce35;
+varonce35 = NULL;
+}
+((struct instance_standard__NativeArray*)var36)->values[0]=var_base_name;
+{
+var41 = ((val*(*)(val* self))(var36->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var36); /* native_to_s on <var36:NativeArray[String]>*/
+}
+varonce35 = var36;
+var_c_file = var41;
+if (unlikely(varonce42==NULL)) {
+var43 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce44!=NULL)) {
+var45 = varonce44;
+} else {
+var46 = "/";
+var47 = standard___standard__NativeString___to_s_with_length(var46, 1l);
+var45 = var47;
+varonce44 = var45;
+}
+((struct instance_standard__NativeArray*)var43)->values[1]=var45;
+} else {
+var43 = varonce42;
+varonce42 = NULL;
+}
+((struct instance_standard__NativeArray*)var43)->values[0]=var_compdir;
+((struct instance_standard__NativeArray*)var43)->values[2]=var_c_file;
+{
+var48 = ((val*(*)(val* self))(var43->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var43); /* native_to_s on <var43:NativeArray[String]>*/
+}
+varonce42 = var43;
+var49 = NEW_standard__Array(&type_standard__Array__standard__String);
+{
+standard___standard__Array___with_capacity(var49, 4l); /* Direct call array#Array#with_capacity on <var49:Array[String]>*/
+}
+var_50 = var49;
+if (likely(varonce51!=NULL)) {
+var52 = varonce51;
+} else {
+var53 = "<stdlib.h>";
+var54 = standard___standard__NativeString___to_s_with_length(var53, 10l);
+var52 = var54;
+varonce51 = var52;
+}
+{
+standard___standard__AbstractArray___standard__abstract_collection__Sequence__push(var_50, var52); /* Direct call array#AbstractArray#push on <var_50:Array[String]>*/
+}
+if (likely(varonce55!=NULL)) {
+var56 = varonce55;
+} else {
+var57 = "<stdio.h>";
+var58 = standard___standard__NativeString___to_s_with_length(var57, 9l);
+var56 = var58;
+varonce55 = var56;
+}
+{
+standard___standard__AbstractArray___standard__abstract_collection__Sequence__push(var_50, var56); /* Direct call array#AbstractArray#push on <var_50:Array[String]>*/
+}
+if (likely(varonce59!=NULL)) {
+var60 = varonce59;
+} else {
+var61 = "<stdint.h>";
+var62 = standard___standard__NativeString___to_s_with_length(var61, 10l);
+var60 = var62;
+varonce59 = var60;
+}
+{
+standard___standard__AbstractArray___standard__abstract_collection__Sequence__push(var_50, var60); /* Direct call array#AbstractArray#push on <var_50:Array[String]>*/
+}
+if (unlikely(varonce63==NULL)) {
+var64 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce65!=NULL)) {
+var66 = varonce65;
+} else {
+var67 = "\"";
+var68 = standard___standard__NativeString___to_s_with_length(var67, 1l);
+var66 = var68;
+varonce65 = var66;
+}
+((struct instance_standard__NativeArray*)var64)->values[0]=var66;
+if (likely(varonce69!=NULL)) {
+var70 = varonce69;
+} else {
+var71 = "\"";
+var72 = standard___standard__NativeString___to_s_with_length(var71, 1l);
+var70 = var72;
+varonce69 = var70;
+}
+((struct instance_standard__NativeArray*)var64)->values[2]=var70;
+} else {
+var64 = varonce63;
+varonce63 = NULL;
+}
+((struct instance_standard__NativeArray*)var64)->values[1]=var_h_file;
+{
+var73 = ((val*(*)(val* self))(var64->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var64); /* native_to_s on <var64:NativeArray[String]>*/
+}
+varonce63 = var64;
+{
+standard___standard__AbstractArray___standard__abstract_collection__Sequence__push(var_50, var73); /* Direct call array#AbstractArray#push on <var_50:Array[String]>*/
+}
+{
+nit__light_ffi_base___CCompilationUnit___write_body_to_file(self, var_mmodule, var48, var_50); /* Direct call light_ffi_base#CCompilationUnit#write_body_to_file on <self:CCompilationUnit>*/
+}
+{
+{ /* Inline c_tools#CCompilationUnit#files (self) on <self:CCompilationUnit> */
+var76 = self->attrs[COLOR_nit__c_tools__CCompilationUnit___files].val; /* _files on <self:CCompilationUnit> */
+if (unlikely(var76 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _files");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__c_tools, 47);
+fatal_exit(1);
+}
+var74 = var76;
+RET_LABEL75:(void)0;
+}
+}
+if (unlikely(varonce77==NULL)) {
+var78 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce79!=NULL)) {
+var80 = varonce79;
+} else {
+var81 = "/";
+var82 = standard___standard__NativeString___to_s_with_length(var81, 1l);
+var80 = var82;
+varonce79 = var80;
+}
+((struct instance_standard__NativeArray*)var78)->values[1]=var80;
+} else {
+var78 = varonce77;
+varonce77 = NULL;
+}
+((struct instance_standard__NativeArray*)var78)->values[0]=var_compdir;
+((struct instance_standard__NativeArray*)var78)->values[2]=var_c_file;
+{
+var83 = ((val*(*)(val* self))(var78->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var78); /* native_to_s on <var78:NativeArray[String]>*/
+}
+varonce77 = var78;
+{
+standard___standard__Array___standard__abstract_collection__SimpleCollection__add(var74, var83); /* Direct call array#Array#add on <var74:Array[String]>*/
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#CCompilationUnit#write_header_to_file for (self: CCompilationUnit, MModule, String, Array[String], String) */
+void nit__light_ffi_base___CCompilationUnit___write_header_to_file(val* self, val* p0, val* p1, val* p2, val* p3) {
+val* var_mmodule /* var mmodule: MModule */;
+val* var_file /* var file: String */;
+val* var_includes /* var includes: Array[String] */;
+val* var_guard /* var guard: String */;
+val* var /* : FileWriter */;
+val* var_stream /* var stream: FileWriter */;
+val* var1 /* : NativeArray[String] */;
+static val* varonce;
+static val* varonce2;
+val* var3 /* : String */;
+char* var4 /* : NativeString */;
+val* var5 /* : FlatString */;
+static val* varonce6;
+val* var7 /* : String */;
+char* var8 /* : NativeString */;
+val* var9 /* : FlatString */;
+val* var10 /* : String */;
+val* var12 /* : String */;
+val* var13 /* : String */;
+val* var_module_info /* var module_info: String */;
+val* var15 /* : NativeArray[String] */;
+static val* varonce14;
+static val* varonce16;
+val* var17 /* : String */;
+char* var18 /* : NativeString */;
+val* var19 /* : FlatString */;
+static val* varonce20;
+val* var21 /* : String */;
+char* var22 /* : NativeString */;
+val* var23 /* : FlatString */;
+val* var24 /* : String */;
+val* var26 /* : NativeArray[String] */;
+static val* varonce25;
+static val* varonce27;
+val* var28 /* : String */;
+char* var29 /* : NativeString */;
+val* var30 /* : FlatString */;
+static val* varonce31;
+val* var32 /* : String */;
+char* var33 /* : NativeString */;
+val* var34 /* : FlatString */;
+val* var35 /* : String */;
+val* var_ /* var : Array[String] */;
+val* var36 /* : ArrayIterator[nullable Object] */;
+val* var_37 /* var : ArrayIterator[String] */;
+short int var38 /* : Bool */;
+val* var39 /* : nullable Object */;
+val* var_incl /* var incl: String */;
+val* var41 /* : NativeArray[String] */;
+static val* varonce40;
+static val* varonce42;
+val* var43 /* : String */;
+char* var44 /* : NativeString */;
+val* var45 /* : FlatString */;
+static val* varonce46;
+val* var47 /* : String */;
+char* var48 /* : NativeString */;
+val* var49 /* : FlatString */;
+val* var50 /* : String */;
+static val* varonce51;
+val* var52 /* : String */;
+char* var53 /* : NativeString */;
+val* var54 /* : FlatString */;
+var_mmodule = p0;
+var_file = p1;
+var_includes = p2;
+var_guard = p3;
+var = NEW_standard__FileWriter(&type_standard__FileWriter);
+{
+standard___standard__FileWriter___open(var, var_file); /* Direct call file#FileWriter#open on <var:FileWriter>*/
+}
+var_stream = var;
+if (unlikely(varonce==NULL)) {
+var1 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce2!=NULL)) {
+var3 = varonce2;
+} else {
+var4 = "/*\n\tExtern implementation of Nit module ";
+var5 = standard___standard__NativeString___to_s_with_length(var4, 40l);
+var3 = var5;
+varonce2 = var3;
+}
+((struct instance_standard__NativeArray*)var1)->values[0]=var3;
+if (likely(varonce6!=NULL)) {
+var7 = varonce6;
+} else {
+var8 = "\n*/\n";
+var9 = standard___standard__NativeString___to_s_with_length(var8, 4l);
+var7 = var9;
+varonce6 = var7;
+}
+((struct instance_standard__NativeArray*)var1)->values[2]=var7;
+} else {
+var1 = varonce;
+varonce = NULL;
+}
+{
+{ /* Inline mmodule#MModule#name (var_mmodule) on <var_mmodule:MModule> */
+var12 = var_mmodule->attrs[COLOR_nit__mmodule__MModule___name].val; /* _name on <var_mmodule:MModule> */
+if (unlikely(var12 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _name");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__mmodule, 87);
+fatal_exit(1);
+}
+var10 = var12;
+RET_LABEL11:(void)0;
+}
+}
+((struct instance_standard__NativeArray*)var1)->values[1]=var10;
+{
+var13 = ((val*(*)(val* self))(var1->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var1); /* native_to_s on <var1:NativeArray[String]>*/
+}
+varonce = var1;
+var_module_info = var13;
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var_module_info); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+if (unlikely(varonce14==NULL)) {
+var15 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce16!=NULL)) {
+var17 = varonce16;
+} else {
+var18 = "#ifndef ";
+var19 = standard___standard__NativeString___to_s_with_length(var18, 8l);
+var17 = var19;
+varonce16 = var17;
+}
+((struct instance_standard__NativeArray*)var15)->values[0]=var17;
+if (likely(varonce20!=NULL)) {
+var21 = varonce20;
+} else {
+var22 = "\n";
+var23 = standard___standard__NativeString___to_s_with_length(var22, 1l);
+var21 = var23;
+varonce20 = var21;
+}
+((struct instance_standard__NativeArray*)var15)->values[2]=var21;
+} else {
+var15 = varonce14;
+varonce14 = NULL;
+}
+((struct instance_standard__NativeArray*)var15)->values[1]=var_guard;
+{
+var24 = ((val*(*)(val* self))(var15->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var15); /* native_to_s on <var15:NativeArray[String]>*/
+}
+varonce14 = var15;
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var24); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+if (unlikely(varonce25==NULL)) {
+var26 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce27!=NULL)) {
+var28 = varonce27;
+} else {
+var29 = "#define ";
+var30 = standard___standard__NativeString___to_s_with_length(var29, 8l);
+var28 = var30;
+varonce27 = var28;
+}
+((struct instance_standard__NativeArray*)var26)->values[0]=var28;
+if (likely(varonce31!=NULL)) {
+var32 = varonce31;
+} else {
+var33 = "\n\n";
+var34 = standard___standard__NativeString___to_s_with_length(var33, 2l);
+var32 = var34;
+varonce31 = var32;
+}
+((struct instance_standard__NativeArray*)var26)->values[2]=var32;
+} else {
+var26 = varonce25;
+varonce25 = NULL;
+}
+((struct instance_standard__NativeArray*)var26)->values[1]=var_guard;
+{
+var35 = ((val*(*)(val* self))(var26->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var26); /* native_to_s on <var26:NativeArray[String]>*/
+}
+varonce25 = var26;
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var35); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+var_ = var_includes;
+{
+var36 = standard___standard__AbstractArrayRead___standard__abstract_collection__Collection__iterator(var_);
+}
+var_37 = var36;
+for(;;) {
+{
+var38 = standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__is_ok(var_37);
+}
+if (var38){
+{
+var39 = standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__item(var_37);
+}
+var_incl = var39;
+if (unlikely(varonce40==NULL)) {
+var41 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce42!=NULL)) {
+var43 = varonce42;
+} else {
+var44 = "#include ";
+var45 = standard___standard__NativeString___to_s_with_length(var44, 9l);
+var43 = var45;
+varonce42 = var43;
+}
+((struct instance_standard__NativeArray*)var41)->values[0]=var43;
+if (likely(varonce46!=NULL)) {
+var47 = varonce46;
+} else {
+var48 = "\n";
+var49 = standard___standard__NativeString___to_s_with_length(var48, 1l);
+var47 = var49;
+varonce46 = var47;
+}
+((struct instance_standard__NativeArray*)var41)->values[2]=var47;
+} else {
+var41 = varonce40;
+varonce40 = NULL;
+}
+((struct instance_standard__NativeArray*)var41)->values[1]=var_incl;
+{
+var50 = ((val*(*)(val* self))(var41->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var41); /* native_to_s on <var41:NativeArray[String]>*/
+}
+varonce40 = var41;
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var50); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+{
+standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__next(var_37); /* Direct call array#ArrayIterator#next on <var_37:ArrayIterator[String]>*/
+}
+} else {
+goto BREAK_label;
+}
+}
+BREAK_label: (void)0;
+{
+standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__finish(var_37); /* Direct call array#ArrayIterator#finish on <var_37:ArrayIterator[String]>*/
+}
+{
+nit___nit__CCompilationUnit___compile_header_core(self, var_stream); /* Direct call c_tools#CCompilationUnit#compile_header_core on <self:CCompilationUnit>*/
+}
+if (likely(varonce51!=NULL)) {
+var52 = varonce51;
+} else {
+var53 = "#endif\n";
+var54 = standard___standard__NativeString___to_s_with_length(var53, 7l);
+var52 = var54;
+varonce51 = var52;
+}
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var52); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+{
+standard___standard__FileWriter___standard__stream__Stream__close(var_stream); /* Direct call file#FileWriter#close on <var_stream:FileWriter>*/
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#CCompilationUnit#write_body_to_file for (self: CCompilationUnit, MModule, String, Array[String]) */
+void nit__light_ffi_base___CCompilationUnit___write_body_to_file(val* self, val* p0, val* p1, val* p2) {
+val* var_mmodule /* var mmodule: MModule */;
+val* var_file /* var file: String */;
+val* var_includes /* var includes: Array[String] */;
+val* var /* : FileWriter */;
+val* var_stream /* var stream: FileWriter */;
+val* var1 /* : NativeArray[String] */;
+static val* varonce;
+static val* varonce2;
+val* var3 /* : String */;
+char* var4 /* : NativeString */;
+val* var5 /* : FlatString */;
+static val* varonce6;
+val* var7 /* : String */;
+char* var8 /* : NativeString */;
+val* var9 /* : FlatString */;
+val* var10 /* : String */;
+val* var12 /* : String */;
+val* var13 /* : String */;
+val* var_module_info /* var module_info: String */;
+val* var_ /* var : Array[String] */;
+val* var14 /* : ArrayIterator[nullable Object] */;
+val* var_15 /* var : ArrayIterator[String] */;
+short int var16 /* : Bool */;
+val* var17 /* : nullable Object */;
+val* var_incl /* var incl: String */;
+val* var19 /* : NativeArray[String] */;
+static val* varonce18;
+static val* varonce20;
+val* var21 /* : String */;
+char* var22 /* : NativeString */;
+val* var23 /* : FlatString */;
+static val* varonce24;
+val* var25 /* : String */;
+char* var26 /* : NativeString */;
+val* var27 /* : FlatString */;
+val* var28 /* : String */;
+var_mmodule = p0;
+var_file = p1;
+var_includes = p2;
+var = NEW_standard__FileWriter(&type_standard__FileWriter);
+{
+standard___standard__FileWriter___open(var, var_file); /* Direct call file#FileWriter#open on <var:FileWriter>*/
+}
+var_stream = var;
+if (unlikely(varonce==NULL)) {
+var1 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce2!=NULL)) {
+var3 = varonce2;
+} else {
+var4 = "/*\n\tExtern implementation of Nit module ";
+var5 = standard___standard__NativeString___to_s_with_length(var4, 40l);
+var3 = var5;
+varonce2 = var3;
+}
+((struct instance_standard__NativeArray*)var1)->values[0]=var3;
+if (likely(varonce6!=NULL)) {
+var7 = varonce6;
+} else {
+var8 = "\n*/\n";
+var9 = standard___standard__NativeString___to_s_with_length(var8, 4l);
+var7 = var9;
+varonce6 = var7;
+}
+((struct instance_standard__NativeArray*)var1)->values[2]=var7;
+} else {
+var1 = varonce;
+varonce = NULL;
+}
+{
+{ /* Inline mmodule#MModule#name (var_mmodule) on <var_mmodule:MModule> */
+var12 = var_mmodule->attrs[COLOR_nit__mmodule__MModule___name].val; /* _name on <var_mmodule:MModule> */
+if (unlikely(var12 == NULL)) {
+PRINT_ERROR("Runtime error: %s", "Uninitialized attribute _name");
+PRINT_ERROR(" (%s:%d)\n", FILE_nit__mmodule, 87);
+fatal_exit(1);
+}
+var10 = var12;
+RET_LABEL11:(void)0;
+}
+}
+((struct instance_standard__NativeArray*)var1)->values[1]=var10;
+{
+var13 = ((val*(*)(val* self))(var1->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var1); /* native_to_s on <var1:NativeArray[String]>*/
+}
+varonce = var1;
+var_module_info = var13;
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var_module_info); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+var_ = var_includes;
+{
+var14 = standard___standard__AbstractArrayRead___standard__abstract_collection__Collection__iterator(var_);
+}
+var_15 = var14;
+for(;;) {
+{
+var16 = standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__is_ok(var_15);
+}
+if (var16){
+{
+var17 = standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__item(var_15);
+}
+var_incl = var17;
+if (unlikely(varonce18==NULL)) {
+var19 = NEW_standard__NativeArray(3l, &type_standard__NativeArray__standard__String);
+if (likely(varonce20!=NULL)) {
+var21 = varonce20;
+} else {
+var22 = "#include ";
+var23 = standard___standard__NativeString___to_s_with_length(var22, 9l);
+var21 = var23;
+varonce20 = var21;
+}
+((struct instance_standard__NativeArray*)var19)->values[0]=var21;
+if (likely(varonce24!=NULL)) {
+var25 = varonce24;
+} else {
+var26 = "\n";
+var27 = standard___standard__NativeString___to_s_with_length(var26, 1l);
+var25 = var27;
+varonce24 = var25;
+}
+((struct instance_standard__NativeArray*)var19)->values[2]=var25;
+} else {
+var19 = varonce18;
+varonce18 = NULL;
+}
+((struct instance_standard__NativeArray*)var19)->values[1]=var_incl;
+{
+var28 = ((val*(*)(val* self))(var19->class->vft[COLOR_standard__string__NativeArray__native_to_s]))(var19); /* native_to_s on <var19:NativeArray[String]>*/
+}
+varonce18 = var19;
+{
+standard___standard__FileWriter___standard__stream__Writer__write(var_stream, var28); /* Direct call file#FileWriter#write on <var_stream:FileWriter>*/
+}
+{
+standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__next(var_15); /* Direct call array#ArrayIterator#next on <var_15:ArrayIterator[String]>*/
+}
+} else {
+goto BREAK_label;
+}
+}
+BREAK_label: (void)0;
+{
+standard__array___standard__array__ArrayIterator___standard__abstract_collection__Iterator__finish(var_15); /* Direct call array#ArrayIterator#finish on <var_15:ArrayIterator[String]>*/
+}
+{
+nit___nit__CCompilationUnit___compile_body_core(self, var_stream); /* Direct call c_tools#CCompilationUnit#compile_body_core on <self:CCompilationUnit>*/
+}
+{
+standard___standard__FileWriter___standard__stream__Stream__close(var_stream); /* Direct call file#FileWriter#close on <var_stream:FileWriter>*/
+}
+RET_LABEL:;
+}
+/* method light_ffi_base#ForeignType#ctype for (self: ForeignType): String */
+val* nit___nit__ForeignType___ctype(val* self) {
+val* var /* : String */;
+static val* varonce;
+val* var1 /* : String */;
+char* var2 /* : NativeString */;
+val* var3 /* : FlatString */;
+if (likely(varonce!=NULL)) {
+var1 = varonce;
+} else {
+var2 = "void*";
+var3 = standard___standard__NativeString___to_s_with_length(var2, 5l);
+var1 = var3;
+varonce = var1;
+}
+var = var1;
+goto RET_LABEL;
+RET_LABEL:;
+return var;
+}
nitlanguage / nit.git / blobdiff