array FoldClosure_nextFree180 integer FoldClosure_firstFree147 integer FoldClosure_maxIndex253 array FoldClosure_typeId193 array Cell_nextFree101 integer Cell_firstFree417 integer Cell_maxIndex181 array Cell_typeId967 array Cell_elem177 integer FoldClosure_firstFree147 = 0 integer FoldClosure_maxIndex253 = 0 integer Cell_firstFree417 = 0 integer Cell_maxIndex181 = 0 function initGlobals131() { } function main746() { initGlobals131(); init_test210(); } function config165() { } function init_test210() { local integer c804 local integer x972 local integer clVar173 local integer temp200 local integer this203 local any t511 local integer this170 local any t178 local integer b_z200 local integer this154 local integer this732 local any start564 local integer f691 local any test_Cell_fold_result843 local integer this197 local any start338 local integer f937 local integer tuple_temp174 c_804 = new_Cell913(); this_203 = c_804; tuple_temp_174 = 5; b_z_200 = tuple_temp_174; t_511 = b_z_200; if (Cell_typeId_967[this_203] == 0) { if (this_203 == 0) { error564("Nullpointer exception when calling Cell.set"); } else { error564("Called Cell.set on invalid object."); }; } else { }; this_170 = this_203; t_178 = t_511; Cell_elem_177[this_170] = t_178; temp_200 = c_804; if (FoldClosure_firstFree_147 == 0) { if (FoldClosure_maxIndex_253 < 32768) { FoldClosure_maxIndex_253 = (FoldClosure_maxIndex_253 + 1); this_154 = FoldClosure_maxIndex_253; FoldClosure_typeId_193[this_154] = 3; } else { error564("Out of memory: Could not create FoldClosure_fold_test."); this_154 = 0; }; } else { FoldClosure_firstFree_147 = (FoldClosure_firstFree_147 - 1); this_154 = FoldClosure_nextFree_180[FoldClosure_firstFree_147]; FoldClosure_typeId_193[this_154] = 3; }; clVar_173 = this_154; this_732 = temp_200; start_564 = 2; f_691 = clVar_173; if (Cell_typeId_967[this_732] == 0) { if (this_732 == 0) { error564("Nullpointer exception when calling Cell.fold"); } else { error564("Called Cell.fold on invalid object."); }; } else { }; this_197 = this_732; start_338 = start_564; f_937 = f_691; test_Cell_fold_result_843 = dispatch_FoldClosure_test_FoldClosure_apply129(f_937, Cell_elem_177[this_197], start_338); x_972 = test_Cell_fold_result_843; if (x_972 == 7) { testSuccess115(); } else { }; } IS_NATIVE function testSuccess115() { } function new_Cell913() returns integer { local integer this180 local integer this190 if (Cell_firstFree_417 == 0) { if (Cell_maxIndex_181 < 32768) { Cell_maxIndex_181 = (Cell_maxIndex_181 + 1); this_190 = Cell_maxIndex_181; Cell_typeId_967[this_190] = 1; } else { error564("Out of memory: Could not create Cell."); this_190 = 0; }; } else { Cell_firstFree_417 = (Cell_firstFree_417 - 1); this_190 = Cell_nextFree_101[Cell_firstFree_417]; Cell_typeId_967[this_190] = 1; }; this_180 = this_190; return this_180; } function error564(string msg953) { $debugPrint153((msg_953 + (" " + #getStackTrace()))); } function dispatch_FoldClosure_test_FoldClosure_apply129(integer this159, any t527, any q179) returns any { local any test_FoldClosure_apply_result773 local any t963 local any q507 local integer e_z163 local integer a101 local integer i137 local integer tuple_temp749 if (FoldClosure_typeId_193[this_159] == 0) { if (this_159 == 0) { error564("Nullpointer exception when calling FoldClosure.apply"); } else { error564("Called FoldClosure.apply on invalid object."); }; } else { }; t_963 = t_527; q_507 = q_179; i_137 = t_963; tuple_temp_749 = i_137; e_z_163 = tuple_temp_749; a_101 = q_507; test_FoldClosure_apply_result_773 = (e_z_163 + a_101); return test_FoldClosure_apply_result_773; }