array Pair_nextFree173 integer Pair_firstFree296 integer Pair_maxIndex400 array Pair_a949 integer Pair_firstFree296 = 0 integer Pair_maxIndex400 = 0 function initGlobals157() { Pair_firstFree_296 = 0; Pair_maxIndex_400 = 0; } function main201() { initGlobals157(); init_test204(); } function config835() { } function init_test204() { local integer p124 p_124 = new_Pair162(); Pair_a_949[p_124] = 4; if (Pair_a_949[p_124] == 4) { testSuccess758(); } else { testFail172("Array Test 1 failed."); }; } IS_NATIVE function testSuccess758() { } IS_NATIVE function testFail172(string msg136) { } function Pair_init101(integer this180) { } function new_Pair162() returns integer { local integer this119 this_119 = alloc_Pair102(); construct_Pair462(this_119); return this_119; } function construct_Pair462(integer this691) { Pair_init101(this_691); } function alloc_Pair102() returns integer { local integer this150 if (Pair_firstFree_296 == 0) { if (Pair_maxIndex_400 < 32768) { Pair_maxIndex_400 = (Pair_maxIndex_400 + 1); this_150 = Pair_maxIndex_400; } else { error143("Out of memory: Could not create Pair."); this_150 = 0; }; } else { Pair_firstFree_296 = (Pair_firstFree_296 - 1); this_150 = Pair_nextFree_173[Pair_firstFree_296]; }; return this_150; } function error143(string msg331) { $debugPrint116((msg_331 + (" " + #getStackTrace()))); }