array A_nextFree136 integer A_firstFree133 integer A_maxIndex104 array A_b_i_0696 array A_b_i_1609 integer A_firstFree133 = 0 integer A_maxIndex104 = 0 function initGlobals897() { } function main228() { local integer a161 initGlobals897(); a_161 = new_A144(); A_b_i_set300(a_161, 0, 4); A_b_i_set300(a_161, 1, 5); if ((A_b_i_get139(a_161, 0) == 4) and (A_b_i_get139(a_161, 1) == 5)) { testSuccess128(); } else { }; } function config177() { } IS_NATIVE function testSuccess128() { } function new_A144() returns integer { local integer this959 if (A_firstFree_133 == 0) { if (A_maxIndex_104 < 32768) { A_maxIndex_104 = (A_maxIndex_104 + 1); this_959 = A_maxIndex_104; } else { error483("Out of memory: Could not create A."); this_959 = 0; }; } else { A_firstFree_133 = (A_firstFree_133 - 1); this_959 = A_nextFree_136[A_firstFree_133]; }; return this_959; } function error483(string msg697) { $debugPrint152((msg_697 + (" " + #getStackTrace()))); } function A_b_i_set300(integer instanceId597, integer arrayIndex139, integer value396) { if ((arrayIndex_139 < 0) or (arrayIndex_139 >= 2)) { error483("Index out of Bounds"); } else { if (arrayIndex_139 <= 0) { A_b_i_0_696[instanceId_597] = value_396; } else { A_b_i_1_609[instanceId_597] = value_396; }; }; } function A_b_i_get139(integer index1114, integer index2360) returns integer { local integer returnVal894 if ((index2_360 < 0) or (index2_360 >= 2)) { error483("Index out of Bounds"); } else { if (index2_360 <= 0) { returnVal_894 = A_b_i_0_696[index1_114]; } else { returnVal_894 = A_b_i_1_609[index1_114]; }; }; return returnVal_894; }