2024-01-03 12:38:33 +03:00
|
|
|
Value *Main_last
|
|
|
|
(
|
|
|
|
Value * var_0
|
|
|
|
, Value * var_1
|
|
|
|
);
|
|
|
|
Value *Main_last_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_last
|
|
|
|
(
|
|
|
|
Value * var_0
|
|
|
|
, Value * var_1
|
|
|
|
)
|
|
|
|
{
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * tmp_134 = NULL; // Main:5:8--5:14
|
|
|
|
if (NULL == var_0 /* Prelude.Basics.Nil [nil] */) {
|
|
|
|
tmp_134 = var_1;
|
|
|
|
} else if (NULL != var_0 /* Prelude.Basics.(::) [cons] */) {
|
2024-01-23 15:59:23 +03:00
|
|
|
Value *var_2 = ((Value_Constructor*)var_0)->args[0];
|
|
|
|
Value *var_3 = ((Value_Constructor*)var_0)->args[1];
|
2024-02-12 09:43:17 +03:00
|
|
|
newReference(var_2);
|
|
|
|
newReference(var_3);
|
|
|
|
removeReference(var_0);
|
|
|
|
removeReference(var_1);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Main_last(var_3, var_2) // Main:7:20--7:24
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_135 = newArglist(0,2);
|
|
|
|
arglist_135->args[0] = var_3;
|
|
|
|
arglist_135->args[1] = var_2;
|
|
|
|
Value *(*fPtr_136)(Value_Arglist*) = Main_last_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:7:20--7:24
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_136 = (Value*)makeClosureFromArglist(fPtr_136, arglist_135);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:7:20--7:24
|
|
|
|
// end Main_last(var_3, var_2) // Main:7:20--7:24
|
2024-02-20 17:01:06 +03:00
|
|
|
tmp_134 = closure_136;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
2024-02-20 17:01:06 +03:00
|
|
|
return tmp_134;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_last_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_last
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_0
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_0_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_1
|
|
|
|
(
|
|
|
|
Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_1_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_2
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_2_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_3
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_3_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_4
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_4_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_5
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_5_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_6
|
|
|
|
(
|
|
|
|
Value * var_6
|
|
|
|
, Value * var_5
|
|
|
|
, Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_6_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_7
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_7_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_8
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_8_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_9
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_9_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_10
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_10_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main_11
|
|
|
|
(
|
|
|
|
Value * var_0
|
|
|
|
);
|
|
|
|
Value *Main_main_11_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main(void);
|
|
|
|
Value *Main_main_arglist(Value_Arglist* arglist);
|
|
|
|
Value *Main_main(void)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
Value_Arglist *arglist_74 = newArglist(2,2);
|
|
|
|
Value *(*closure_75)(Value_Arglist*) = Main_main_9_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:13--10:17
|
2024-02-12 09:43:17 +03:00
|
|
|
Value * var_8 = (Value*)makeClosureFromArglist(closure_75, arglist_74);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:8--10:12
|
2024-02-12 09:43:17 +03:00
|
|
|
Value_Arglist *arglist_76 = newArglist(2,2);
|
|
|
|
Value *(*closure_77)(Value_Arglist*) = Main_main_10_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:27--10:28
|
2024-02-12 09:43:17 +03:00
|
|
|
Value * var_9 = (Value*)makeClosureFromArglist(closure_77, arglist_76);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:8--10:12
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_6 = (NULL /* Prelude.Basics.Nil */); // Main:11:11--11:13
|
|
|
|
Value * var_3 = (NULL /* Prelude.Basics.Lin */); // Prelude.Types:605:11--605:20
|
|
|
|
Value_Arglist *arglist_78 = newArglist(1,1);
|
|
|
|
Value *(*closure_79)(Value_Arglist*) = Main_main_11_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:11:21--11:22
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_4 = (Value*)makeClosureFromArglist(closure_79, arglist_78);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:605:11--605:20
|
|
|
|
// start csegen_44()
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_80 = newArglist(0,0);
|
|
|
|
Value *(*fPtr_81)(Value_Arglist*) = csegen_44_arglist;
|
|
|
|
Value *closure_81 = (Value*)makeClosureFromArglist(fPtr_81, arglist_80);
|
2024-01-03 12:38:33 +03:00
|
|
|
// end csegen_44()
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_0 = trampoline(closure_81); // Prelude.Types:1121:1--1138:48
|
2024-01-03 12:38:33 +03:00
|
|
|
Value * var_1 = (Value*)makeIntegerLiteral("1"); // Prelude.Types:1121:1--1138:48
|
|
|
|
Value * var_2 = (Value*)makeIntegerLiteral("5"); // Prelude.Types:1121:1--1138:48
|
|
|
|
// start Prelude_Types_rangeFromTo_Range__dollara(var_0, var_1, var_2)
|
|
|
|
// Prelude.Types:1121:1--1138:48
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_82 = newArglist(0,3);
|
|
|
|
arglist_82->args[0] = var_0;
|
|
|
|
arglist_82->args[1] = var_1;
|
|
|
|
arglist_82->args[2] = var_2;
|
|
|
|
Value *(*fPtr_83)(Value_Arglist*) = Prelude_Types_rangeFromTo_Range__dollara_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:1121:1--1138:48
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_83 = (Value*)makeClosureFromArglist(fPtr_83, arglist_82);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:1121:1--1138:48
|
|
|
|
// end Prelude_Types_rangeFromTo_Range__dollara(var_0, var_1, var_2)
|
|
|
|
// Prelude.Types:1121:1--1138:48
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_5 = trampoline(closure_83); // Prelude.Types:605:11--605:20
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Types_List_mapAppend(var_3, var_4, var_5)
|
|
|
|
// Prelude.Types:605:11--605:20
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_84 = newArglist(0,3);
|
|
|
|
arglist_84->args[0] = var_3;
|
|
|
|
arglist_84->args[1] = var_4;
|
|
|
|
arglist_84->args[2] = var_5;
|
|
|
|
Value *(*fPtr_85)(Value_Arglist*) = Prelude_Types_List_mapAppend_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:605:11--605:20
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_85 = (Value*)makeClosureFromArglist(fPtr_85, arglist_84);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:605:11--605:20
|
|
|
|
// end Prelude_Types_List_mapAppend(var_3, var_4, var_5)
|
|
|
|
// Prelude.Types:605:11--605:20
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_7 = trampoline(closure_85); // Main:11:11--11:13
|
|
|
|
// constructor Prelude.Basics.(::) // Main:11:11--11:13
|
|
|
|
Value_Constructor* constructor_86 = newConstructor(2, 1);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:11:11--11:13
|
2024-02-20 17:01:06 +03:00
|
|
|
constructor_86->args[0] = var_6;
|
|
|
|
constructor_86->args[1] = var_7;
|
|
|
|
Value * var_10 = (Value*)constructor_86; // Main:10:8--10:12
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Basics_flip(var_8, var_9, var_10) // Main:10:8--10:12
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_87 = newArglist(0,3);
|
|
|
|
arglist_87->args[0] = var_8;
|
|
|
|
arglist_87->args[1] = var_9;
|
|
|
|
arglist_87->args[2] = var_10;
|
|
|
|
Value *(*fPtr_88)(Value_Arglist*) = Prelude_Basics_flip_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:8--10:12
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_88 = (Value*)makeClosureFromArglist(fPtr_88, arglist_87);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:8--10:12
|
|
|
|
// end Prelude_Basics_flip(var_8, var_9, var_10) // Main:10:8--10:12
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_88;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main
|
|
|
|
(
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_11
|
|
|
|
(
|
|
|
|
Value * var_0
|
|
|
|
)
|
|
|
|
{
|
|
|
|
// start csegen_44()
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_89 = newArglist(0,0);
|
|
|
|
Value *(*fPtr_90)(Value_Arglist*) = csegen_44_arglist;
|
|
|
|
Value *closure_90 = (Value*)makeClosureFromArglist(fPtr_90, arglist_89);
|
2024-01-03 12:38:33 +03:00
|
|
|
// end csegen_44()
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_1 = trampoline(closure_90); // Prelude.Types:1121:1--1138:48
|
2024-01-03 12:38:33 +03:00
|
|
|
Value * var_2 = (Value*)makeIntegerLiteral("1"); // Prelude.Types:1121:1--1138:48
|
|
|
|
// start Prelude_Types_rangeFromTo_Range__dollara(var_1, var_2, var_0)
|
|
|
|
// Prelude.Types:1121:1--1138:48
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_91 = newArglist(0,3);
|
|
|
|
arglist_91->args[0] = var_1;
|
|
|
|
arglist_91->args[1] = var_2;
|
|
|
|
arglist_91->args[2] = var_0;
|
|
|
|
Value *(*fPtr_92)(Value_Arglist*) = Prelude_Types_rangeFromTo_Range__dollara_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:1121:1--1138:48
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_92 = (Value*)makeClosureFromArglist(fPtr_92, arglist_91);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:1121:1--1138:48
|
|
|
|
// end Prelude_Types_rangeFromTo_Range__dollara(var_1, var_2, var_0)
|
|
|
|
// Prelude.Types:1121:1--1138:48
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_92;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_11_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_11
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_10
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
|
|
|
Value * var_2 = (Value*)makeIntegerLiteral("0"); // Main:10:30--10:36
|
|
|
|
// start Main_last(var_1, var_2) // Main:10:30--10:36
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_93 = newArglist(0,2);
|
|
|
|
arglist_93->args[0] = var_1;
|
|
|
|
arglist_93->args[1] = var_2;
|
|
|
|
Value *(*fPtr_94)(Value_Arglist*) = Main_last_arglist; // Main:10:30--10:36
|
|
|
|
Value *closure_94 = (Value*)makeClosureFromArglist(fPtr_94, arglist_93);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:30--10:36
|
|
|
|
// end Main_last(var_1, var_2) // Main:10:30--10:36
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_3 = trampoline(closure_94); // Prelude.Show:110:1--112:50
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Show_show_Show_Integer(var_3) // Prelude.Show:110:1--112:50
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_95 = newArglist(0,1);
|
|
|
|
arglist_95->args[0] = var_3;
|
|
|
|
Value *(*fPtr_96)(Value_Arglist*) = Prelude_Show_show_Show_Integer_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Show:110:1--112:50
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_96 = (Value*)makeClosureFromArglist(fPtr_96, arglist_95);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Show:110:1--112:50
|
|
|
|
// end Prelude_Show_show_Show_Integer(var_3) // Prelude.Show:110:1--112:50
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_4 = trampoline(closure_96);
|
2024-01-03 12:38:33 +03:00
|
|
|
Value * var_5 = (Value*)makeString("\x0a""");
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *primVar_97 = strAppend(var_4, var_5);
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_5);
|
|
|
|
removeReference(var_4);
|
2024-02-20 17:01:06 +03:00
|
|
|
Value * var_6 = primVar_97; // Prelude.IO:98:22--98:34
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_IO_prim__putStr(var_6, var_0) // Prelude.IO:98:22--98:34
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_98 = newArglist(0,2);
|
|
|
|
arglist_98->args[0] = var_6;
|
|
|
|
arglist_98->args[1] = var_0;
|
|
|
|
Value *(*fPtr_99)(Value_Arglist*) = Prelude_IO_prim__putStr_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:98:22--98:34
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_99 = (Value*)makeClosureFromArglist(fPtr_99, arglist_98);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:98:22--98:34
|
|
|
|
// end Prelude_IO_prim__putStr(var_6, var_0) // Prelude.IO:98:22--98:34
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_99;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_10_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_10
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_9
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_100 = newArglist(5,5);
|
|
|
|
Value *(*closure_101)(Value_Arglist*) = Main_main_0_arglist;
|
|
|
|
Value * var_2 = (Value*)makeClosureFromArglist(closure_101, arglist_100);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:19:1--26:30
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_102 = newArglist(3,3);
|
|
|
|
Value *(*closure_103)(Value_Arglist*) = Main_main_1_arglist;
|
|
|
|
Value * var_3 = (Value*)makeClosureFromArglist(closure_103, arglist_102);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:19:1--26:30
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_104 = newArglist(5,5);
|
|
|
|
Value *(*closure_105)(Value_Arglist*) = Main_main_2_arglist;
|
|
|
|
Value * var_4 = (Value*)makeClosureFromArglist(closure_105, arglist_104);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:19:1--26:30
|
2024-02-20 17:01:06 +03:00
|
|
|
// constructor Prelude.Interfaces.MkApplicative // Prelude.IO:19:1--26:30
|
|
|
|
Value_Constructor* constructor_106 = newConstructor(3, 0);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:19:1--26:30
|
2024-02-20 17:01:06 +03:00
|
|
|
constructor_106->args[0] = var_2;
|
|
|
|
constructor_106->args[1] = var_3;
|
|
|
|
constructor_106->args[2] = var_4;
|
|
|
|
Value * var_11 = (Value*)constructor_106; // Main:10:13--10:17
|
|
|
|
Value_Arglist *arglist_107 = newArglist(5,5);
|
|
|
|
Value *(*closure_108)(Value_Arglist*) = Main_main_3_arglist;
|
|
|
|
Value * var_5 = (Value*)makeClosureFromArglist(closure_108, arglist_107);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_109 = newArglist(5,5);
|
|
|
|
Value *(*closure_110)(Value_Arglist*) = Main_main_4_arglist;
|
|
|
|
Value * var_6 = (Value*)makeClosureFromArglist(closure_110, arglist_109);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_111 = newArglist(2,2);
|
|
|
|
Value *(*closure_112)(Value_Arglist*) = Main_main_5_arglist;
|
|
|
|
Value * var_7 = (Value*)makeClosureFromArglist(closure_112, arglist_111);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_113 = newArglist(7,7);
|
|
|
|
Value *(*closure_114)(Value_Arglist*) = Main_main_6_arglist;
|
|
|
|
Value * var_8 = (Value*)makeClosureFromArglist(closure_114, arglist_113);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_115 = newArglist(2,2);
|
|
|
|
Value *(*closure_116)(Value_Arglist*) = Main_main_7_arglist;
|
|
|
|
Value * var_9 = (Value*)makeClosureFromArglist(closure_116, arglist_115);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_117 = newArglist(5,5);
|
|
|
|
Value *(*closure_118)(Value_Arglist*) = Main_main_8_arglist;
|
|
|
|
Value * var_10 = (Value*)makeClosureFromArglist(closure_118, arglist_117);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
// constructor Prelude.Interfaces.MkFoldable // Prelude.Types:656:1--669:59
|
|
|
|
Value_Constructor* constructor_119 = newConstructor(6, 0);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
constructor_119->args[0] = var_5;
|
|
|
|
constructor_119->args[1] = var_6;
|
|
|
|
constructor_119->args[2] = var_7;
|
|
|
|
constructor_119->args[3] = var_8;
|
|
|
|
constructor_119->args[4] = var_9;
|
|
|
|
constructor_119->args[5] = var_10;
|
|
|
|
Value * var_12 = (Value*)constructor_119; // Main:10:13--10:17
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Interfaces_for_(var_11, var_12, var_1, var_0)
|
|
|
|
// Main:10:13--10:17
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_120 = newArglist(0,4);
|
|
|
|
arglist_120->args[0] = var_11;
|
|
|
|
arglist_120->args[1] = var_12;
|
|
|
|
arglist_120->args[2] = var_1;
|
|
|
|
arglist_120->args[3] = var_0;
|
|
|
|
Value *(*fPtr_121)(Value_Arglist*) = Prelude_Interfaces_for__arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:13--10:17
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_121 = (Value*)makeClosureFromArglist(fPtr_121, arglist_120);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Main:10:13--10:17
|
|
|
|
// end Prelude_Interfaces_for_(var_11, var_12, var_1, var_0)
|
|
|
|
// Main:10:13--10:17
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_121;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_9_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_9
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_8
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_3);
|
|
|
|
removeReference(var_4);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Types_foldMap_Foldable_List(var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_122 = newArglist(0,3);
|
|
|
|
arglist_122->args[0] = var_2;
|
|
|
|
arglist_122->args[1] = var_1;
|
|
|
|
arglist_122->args[2] = var_0;
|
|
|
|
Value *(*fPtr_123)(Value_Arglist*) = Prelude_Types_foldMap_Foldable_List_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_123 = (Value*)makeClosureFromArglist(fPtr_123, arglist_122);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
|
|
|
// end Prelude_Types_foldMap_Foldable_List(var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_123;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_8_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_8
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
, arglist->args[3]
|
|
|
|
, arglist->args[4]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_7
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_1);
|
2024-02-15 17:16:46 +03:00
|
|
|
return var_0;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_7_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_7
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_6
|
|
|
|
(
|
|
|
|
Value * var_6
|
|
|
|
, Value * var_5
|
|
|
|
, Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_4);
|
|
|
|
removeReference(var_5);
|
|
|
|
removeReference(var_6);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Types_foldlM_Foldable_List(var_3, var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_124 = newArglist(0,4);
|
|
|
|
arglist_124->args[0] = var_3;
|
|
|
|
arglist_124->args[1] = var_2;
|
|
|
|
arglist_124->args[2] = var_1;
|
|
|
|
arglist_124->args[3] = var_0;
|
|
|
|
Value *(*fPtr_125)(Value_Arglist*) = Prelude_Types_foldlM_Foldable_List_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_125 = (Value*)makeClosureFromArglist(fPtr_125, arglist_124);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
|
|
|
// end Prelude_Types_foldlM_Foldable_List(var_3, var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_125;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_6_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_6
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
, arglist->args[3]
|
|
|
|
, arglist->args[4]
|
|
|
|
, arglist->args[5]
|
|
|
|
, arglist->args[6]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_5
|
|
|
|
(
|
|
|
|
Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_1);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Types_null_Foldable_List(var_0) // Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_126 = newArglist(0,1);
|
|
|
|
arglist_126->args[0] = var_0;
|
|
|
|
Value *(*fPtr_127)(Value_Arglist*) = Prelude_Types_null_Foldable_List_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_127 = (Value*)makeClosureFromArglist(fPtr_127, arglist_126);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
|
|
|
// end Prelude_Types_null_Foldable_List(var_0) // Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_127;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_5_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_5
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_4
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_3);
|
|
|
|
removeReference(var_4);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Types_foldl_Foldable_List(var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_128 = newArglist(0,3);
|
|
|
|
arglist_128->args[0] = var_2;
|
|
|
|
arglist_128->args[1] = var_1;
|
|
|
|
arglist_128->args[2] = var_0;
|
|
|
|
Value *(*fPtr_129)(Value_Arglist*) = Prelude_Types_foldl_Foldable_List_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_129 = (Value*)makeClosureFromArglist(fPtr_129, arglist_128);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
|
|
|
// end Prelude_Types_foldl_Foldable_List(var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_129;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_4_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_4
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
, arglist->args[3]
|
|
|
|
, arglist->args[4]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_3
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_3);
|
|
|
|
removeReference(var_4);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_Types_foldr_Foldable_List(var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_130 = newArglist(0,3);
|
|
|
|
arglist_130->args[0] = var_2;
|
|
|
|
arglist_130->args[1] = var_1;
|
|
|
|
arglist_130->args[2] = var_0;
|
|
|
|
Value *(*fPtr_131)(Value_Arglist*) = Prelude_Types_foldr_Foldable_List_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_131 = (Value*)makeClosureFromArglist(fPtr_131, arglist_130);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.Types:656:1--669:59
|
|
|
|
// end Prelude_Types_foldr_Foldable_List(var_2, var_1, var_0)
|
|
|
|
// Prelude.Types:656:1--669:59
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_131;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_3_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_3
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
, arglist->args[3]
|
|
|
|
, arglist->args[4]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_2
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_3);
|
|
|
|
removeReference(var_4);
|
|
|
|
Value * var_5 = apply_closure(var_2, newReference(var_0));
|
|
|
|
// Prelude.IO:24:9--24:16
|
2024-01-03 12:38:33 +03:00
|
|
|
Value * var_6 = apply_closure(var_1, var_0); // Prelude.IO:25:11--25:18
|
2024-02-15 17:16:46 +03:00
|
|
|
return tailcall_apply_closure(var_5, var_6);
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_2_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_2
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
, arglist->args[3]
|
|
|
|
, arglist->args[4]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_1
|
|
|
|
(
|
|
|
|
Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_0);
|
|
|
|
removeReference(var_2);
|
2024-02-15 17:16:46 +03:00
|
|
|
return var_1;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_1_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_1
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
);
|
|
|
|
}
|
|
|
|
Value *Main_main_0
|
|
|
|
(
|
|
|
|
Value * var_4
|
|
|
|
, Value * var_3
|
|
|
|
, Value * var_2
|
|
|
|
, Value * var_1
|
|
|
|
, Value * var_0
|
|
|
|
)
|
|
|
|
{
|
2024-02-12 09:43:17 +03:00
|
|
|
removeReference(var_3);
|
|
|
|
removeReference(var_4);
|
2024-01-03 12:38:33 +03:00
|
|
|
// start Prelude_IO_map_Functor_IO(var_2, var_1, var_0) // Prelude.IO:15:1--17:38
|
2024-02-20 17:01:06 +03:00
|
|
|
Value_Arglist *arglist_132 = newArglist(0,3);
|
|
|
|
arglist_132->args[0] = var_2;
|
|
|
|
arglist_132->args[1] = var_1;
|
|
|
|
arglist_132->args[2] = var_0;
|
|
|
|
Value *(*fPtr_133)(Value_Arglist*) = Prelude_IO_map_Functor_IO_arglist;
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:15:1--17:38
|
2024-02-20 17:01:06 +03:00
|
|
|
Value *closure_133 = (Value*)makeClosureFromArglist(fPtr_133, arglist_132);
|
2024-01-03 12:38:33 +03:00
|
|
|
// Prelude.IO:15:1--17:38
|
|
|
|
// end Prelude_IO_map_Functor_IO(var_2, var_1, var_0) // Prelude.IO:15:1--17:38
|
2024-02-20 17:01:06 +03:00
|
|
|
return closure_133;
|
2024-01-03 12:38:33 +03:00
|
|
|
}
|
|
|
|
Value *Main_main_0_arglist(Value_Arglist* arglist)
|
|
|
|
{
|
|
|
|
return Main_main_0
|
|
|
|
(
|
|
|
|
arglist->args[0]
|
|
|
|
, arglist->args[1]
|
|
|
|
, arglist->args[2]
|
|
|
|
, arglist->args[3]
|
|
|
|
, arglist->args[4]
|
|
|
|
);
|
|
|
|
}
|