array A_nextFree303 integer A_firstFree145 integer A_maxIndex834 array A_s_0242 array A_s_1169 array A_s_2127 array A_s_3197 integer A_firstFree145 = 0 integer A_maxIndex834 = 0 function initGlobals592() { A_firstFree_145 = 0; A_maxIndex_834 = 0; } function main210() { initGlobals592(); init_test738(); } function config117() { } function init_test738() { local integer a164 a_164 = new_A195(); A_s_set190(a_164, 0, "a"); A_s_set190(a_164, 1, "b"); A_s_set190(a_164, 2, "c"); A_s_set190(a_164, 3, "d"); if ((((A_s_get166(a_164, 0) == "a") and (A_s_get166(a_164, 1) == "b")) and (A_s_get166(a_164, 2) == "c")) and (A_s_get166(a_164, 3) == "d")) { testSuccess896(); } else { testFail115("wrong value"); }; } IS_NATIVE function testSuccess896() { } IS_NATIVE function testFail115(string msg255) { } function A_init104(integer this119) { } function new_A195() returns integer { local integer this876 this_876 = alloc_A128(); construct_A752(this_876); return this_876; } function construct_A752(integer this203) { A_init104(this_203); } function alloc_A128() returns integer { local integer this100 if (A_firstFree_145 == 0) { if (A_maxIndex_834 < 32768) { A_maxIndex_834 = (A_maxIndex_834 + 1); this_100 = A_maxIndex_834; } else { error645("Out of memory: Could not create A."); this_100 = 0; }; } else { A_firstFree_145 = (A_firstFree_145 - 1); this_100 = A_nextFree_303[A_firstFree_145]; }; return this_100; } function error645(string msg109) { $debugPrint161((msg_109 + (" " + #getStackTrace()))); } function A_s_set190(integer instanceId213, integer arrayIndex125, string value124) { if ((arrayIndex_125 < 0) or (arrayIndex_125 >= 4)) { error645("Index out of Bounds"); } else { if (arrayIndex_125 <= 1) { if (arrayIndex_125 <= 0) { A_s_0_242[instanceId_213] = value_124; } else { A_s_1_169[instanceId_213] = value_124; }; } else { if (arrayIndex_125 <= 2) { A_s_2_127[instanceId_213] = value_124; } else { A_s_3_197[instanceId_213] = value_124; }; }; }; } function A_s_get166(integer index1191, integer index2171) returns string { local string returnVal189 if ((index2_171 < 0) or (index2_171 >= 4)) { error645("Index out of Bounds"); } else { if (index2_171 <= 1) { if (index2_171 <= 0) { returnVal_189 = A_s_0_242[index1_191]; } else { returnVal_189 = A_s_1_169[index1_191]; }; } else { if (index2_171 <= 2) { returnVal_189 = A_s_2_127[index1_191]; } else { returnVal_189 = A_s_3_197[index1_191]; }; }; }; return returnVal_189; }