array A_nextFree919 integer A_firstFree122 integer A_maxIndex250 array A_s_0158 array A_s_1118 array A_s_2971 array A_s_3199 integer A_firstFree122 = 0 integer A_maxIndex250 = 0 function initGlobals421() { } function main237() { initGlobals421(); init_test672(); } function config131() { } function init_test672() { local integer a286 a_286 = new_A103(); A_s_set129(a_286, 0, "a"); A_s_set129(a_286, 1, "b"); A_s_set129(a_286, 2, "c"); A_s_set129(a_286, 3, "d"); if ((((A_s_get119(a_286, 0) == "a") and (A_s_get119(a_286, 1) == "b")) and (A_s_get119(a_286, 2) == "c")) and (A_s_get119(a_286, 3) == "d")) { testSuccess154(); } else { testFail166("wrong value"); }; } IS_NATIVE function testSuccess154() { } IS_NATIVE function testFail166(string msg202) { } function new_A103() returns integer { local integer this883 local integer this195 if (A_firstFree_122 == 0) { if (A_maxIndex_250 < 32768) { A_maxIndex_250 = (A_maxIndex_250 + 1); this_195 = A_maxIndex_250; } else { error380("Out of memory: Could not create A."); this_195 = 0; }; } else { A_firstFree_122 = (A_firstFree_122 - 1); this_195 = A_nextFree_919[A_firstFree_122]; }; this_883 = this_195; return this_883; } function error380(string msg179) { $debugPrint492((msg_179 + (" " + #getStackTrace()))); } function A_s_set129(integer instanceId129, integer arrayIndex214, string value180) { if ((arrayIndex_214 < 0) or (arrayIndex_214 >= 4)) { error380("Index out of Bounds"); } else { if (arrayIndex_214 <= 1) { if (arrayIndex_214 <= 0) { A_s_0_158[instanceId_129] = value_180; } else { A_s_1_118[instanceId_129] = value_180; }; } else { if (arrayIndex_214 <= 2) { A_s_2_971[instanceId_129] = value_180; } else { A_s_3_199[instanceId_129] = value_180; }; }; }; } function A_s_get119(integer index1747, integer index2613) returns string { local string returnVal132 if ((index2_613 < 0) or (index2_613 >= 4)) { error380("Index out of Bounds"); } else { if (index2_613 <= 1) { if (index2_613 <= 0) { returnVal_132 = A_s_0_158[index1_747]; } else { returnVal_132 = A_s_1_118[index1_747]; }; } else { if (index2_613 <= 2) { returnVal_132 = A_s_2_971[index1_747]; } else { returnVal_132 = A_s_3_199[index1_747]; }; }; }; return returnVal_132; }