array Func_nextFree186 integer Func_firstFree985 integer Func_maxIndex368 array Func_typeId182 array C_nextFree842 integer C_firstFree792 integer C_maxIndex130 array C_typeId418 array C_x130 integer Func_firstFree985 = 0 integer Func_maxIndex368 = 0 integer C_firstFree792 = 0 integer C_maxIndex130 = 0 function initGlobals186() { } function main131() { initGlobals186(); init_A504(); } function config213() { } function init_A504() { if (C_x_130[dispatch_C_A_C_map188(new_C165(5), alloc_Func_map_A679())] == 10) { testSuccess195(); } else { }; } IS_NATIVE function testSuccess195() { } function apply_map_A187(integer this205, integer x731) returns integer { return (2 * x_731); } function C_map192(integer this127, integer f589) returns integer { return new_C165(dispatch_Func_A_Func_apply940(f_589, C_x_130[this_127])); } function new_C165(any x116) returns integer { local integer this158 this_158 = alloc_C171(); construct_C436(this_158, x_116); return this_158; } function C_init995(integer this205) { } function construct_C436(integer this658, any x130) { C_init995(this_658); C_x_130[this_658] = x_130; } function alloc_Func_map_A679() returns integer { local integer this840 if (Func_firstFree_985 == 0) { if (Func_maxIndex_368 < 32768) { Func_maxIndex_368 = (Func_maxIndex_368 + 1); this_840 = Func_maxIndex_368; Func_typeId_182[this_840] = 3; } else { error113("Out of memory: Could not create Func_map_A."); this_840 = 0; }; } else { Func_firstFree_985 = (Func_firstFree_985 - 1); this_840 = Func_nextFree_186[Func_firstFree_985]; Func_typeId_182[this_840] = 3; }; return this_840; } function error113(string msg112) { $debugPrint160((msg_112 + (" " + #getStackTrace()))); } function alloc_C171() returns integer { local integer this101 if (C_firstFree_792 == 0) { if (C_maxIndex_130 < 32768) { C_maxIndex_130 = (C_maxIndex_130 + 1); this_101 = C_maxIndex_130; C_typeId_418[this_101] = 1; } else { error113("Out of memory: Could not create C."); this_101 = 0; }; } else { C_firstFree_792 = (C_firstFree_792 - 1); this_101 = C_nextFree_842[C_firstFree_792]; C_typeId_418[this_101] = 1; }; return this_101; } function dispatch_C_A_C_map188(integer this160, integer f129) returns integer { if (C_typeId_418[this_160] == 0) { if (this_160 == 0) { error113("Nullpointer exception when calling C.map"); } else { error113("Called C.map on invalid object."); }; } else { }; return C_map192(this_160, f_129); } function dispatch_Func_A_Func_apply940(integer this565, any x268) returns any { if (Func_typeId_182[this_565] == 0) { if (this_565 == 0) { error113("Nullpointer exception when calling Func.apply"); } else { error113("Called Func.apply on invalid object."); }; } else { }; return apply_map_A187(this_565, x_268); }