array Pair_nextFree164 integer Pair_firstFree134 integer Pair_maxIndex957 array Pair_a127 integer Pair_firstFree134 = 0 integer Pair_maxIndex957 = 0 function initGlobals207() { } function main263() { initGlobals207(); init_test213(); } function config167() { } function init_test213() { local integer p160 p_160 = new_Pair227(); Pair_a_127[p_160] = 4; if (Pair_a_127[p_160] == 4) { testSuccess269(); } else { testFail266("Array Test 1 failed."); }; } IS_NATIVE function testSuccess269() { } IS_NATIVE function testFail266(string msg175) { } function new_Pair227() returns integer { local integer this151 if (Pair_firstFree_134 == 0) { if (Pair_maxIndex_957 < 32768) { Pair_maxIndex_957 = (Pair_maxIndex_957 + 1); this_151 = Pair_maxIndex_957; } else { error188("Out of memory: Could not create Pair."); this_151 = 0; }; } else { Pair_firstFree_134 = (Pair_firstFree_134 - 1); this_151 = Pair_nextFree_164[Pair_firstFree_134]; }; return this_151; } function error188(string msg150) { $debugPrint757((msg_150 + (" " + #getStackTrace()))); }