array FoldClosure_nextFree127 integer FoldClosure_firstFree312 integer FoldClosure_maxIndex116 array FoldClosure_typeId604 array Cell_nextFree113 integer Cell_firstFree132 integer Cell_maxIndex934 array Cell_typeId210 array Cell_elem714 integer FoldClosure_firstFree312 = 0 integer FoldClosure_maxIndex116 = 0 integer Cell_firstFree132 = 0 integer Cell_maxIndex934 = 0 function initGlobals689() { } function main206() { initGlobals689(); init_test747(); } function config153() { } function init_test747() { local integer c103 local integer this195 c_103 = new_Cell451(); if (Cell_typeId_210[c_103] == 0) { if (c_103 == 0) { error105("Nullpointer exception when calling Cell.set"); } else { error105("Called Cell.set on invalid object."); }; } else { }; Cell_elem_714[c_103] = 5; if (FoldClosure_firstFree_312 == 0) { if (FoldClosure_maxIndex_116 < 32768) { FoldClosure_maxIndex_116 = (FoldClosure_maxIndex_116 + 1); this_195 = FoldClosure_maxIndex_116; FoldClosure_typeId_604[this_195] = 3; } else { error105("Out of memory: Could not create FoldClosure_fold_test."); this_195 = 0; }; } else { FoldClosure_firstFree_312 = (FoldClosure_firstFree_312 - 1); this_195 = FoldClosure_nextFree_127[FoldClosure_firstFree_312]; FoldClosure_typeId_604[this_195] = 3; }; if (Cell_typeId_210[c_103] == 0) { if (c_103 == 0) { error105("Nullpointer exception when calling Cell.fold"); } else { error105("Called Cell.fold on invalid object."); }; } else { }; if (dispatch_FoldClosure_test_FoldClosure_apply182(this_195, Cell_elem_714[c_103], 2) == 7) { testSuccess175(); } else { }; } IS_NATIVE function testSuccess175() { } function new_Cell451() returns integer { local integer this587 if (Cell_firstFree_132 == 0) { if (Cell_maxIndex_934 < 32768) { Cell_maxIndex_934 = (Cell_maxIndex_934 + 1); this_587 = Cell_maxIndex_934; Cell_typeId_210[this_587] = 1; } else { error105("Out of memory: Could not create Cell."); this_587 = 0; }; } else { Cell_firstFree_132 = (Cell_firstFree_132 - 1); this_587 = Cell_nextFree_113[Cell_firstFree_132]; Cell_typeId_210[this_587] = 1; }; return this_587; } function error105(string msg966) { $debugPrint119((msg_966 + (" " + #getStackTrace()))); } function dispatch_FoldClosure_test_FoldClosure_apply182(integer this810, any t177, any q769) returns any { if (FoldClosure_typeId_604[this_810] == 0) { if (this_810 == 0) { error105("Nullpointer exception when calling FoldClosure.apply"); } else { error105("Called FoldClosure.apply on invalid object."); }; } else { }; return (t_177 + q_769); }