array A_nextFree102 integer A_firstFree151 integer A_maxIndex722 array A_ints_0127 array A_ints_1134 array A_ints_2171 array A_ints_3196 integer A_firstFree151 = 0 integer A_maxIndex722 = 0 function initGlobals990() { } function main512() { initGlobals990(); init_test692(); } function config703() { } function init_test692() { local integer a123 a_123 = new_A756(); A_ints_set154(a_123, 0, 1234); if (A_ints_get169(a_123, 0) == 1234) { testSuccess663(); } else { testFail209("wrong value"); }; } IS_NATIVE function testSuccess663() { } IS_NATIVE function testFail209(string msg271) { } function A_init316(integer this145) { } function new_A756() returns integer { local integer this102 this_102 = alloc_A291(); construct_A158(this_102); return this_102; } function construct_A158(integer this956) { A_init316(this_956); } function alloc_A291() returns integer { local integer this898 if (A_firstFree_151 == 0) { if (A_maxIndex_722 < 32768) { A_maxIndex_722 = (A_maxIndex_722 + 1); this_898 = A_maxIndex_722; } else { error117("Out of memory: Could not create A."); this_898 = 0; }; } else { A_firstFree_151 = (A_firstFree_151 - 1); this_898 = A_nextFree_102[A_firstFree_151]; }; return this_898; } function error117(string msg121) { $debugPrint760((msg_121 + (" " + #getStackTrace()))); } function A_ints_set154(integer instanceId201, integer arrayIndex212, integer value151) { if ((arrayIndex_212 < 0) or (arrayIndex_212 >= 4)) { error117("Index out of Bounds"); } else { if (arrayIndex_212 <= 1) { if (arrayIndex_212 <= 0) { A_ints_0_127[instanceId_201] = value_151; } else { A_ints_1_134[instanceId_201] = value_151; }; } else { if (arrayIndex_212 <= 2) { A_ints_2_171[instanceId_201] = value_151; } else { A_ints_3_196[instanceId_201] = value_151; }; }; }; } function A_ints_get169(integer index1174, integer index2322) returns integer { local integer returnVal103 if ((index2_322 < 0) or (index2_322 >= 4)) { error117("Index out of Bounds"); } else { if (index2_322 <= 1) { if (index2_322 <= 0) { returnVal_103 = A_ints_0_127[index1_174]; } else { returnVal_103 = A_ints_1_134[index1_174]; }; } else { if (index2_322 <= 2) { returnVal_103 = A_ints_2_171[index1_174]; } else { returnVal_103 = A_ints_3_196[index1_174]; }; }; }; return returnVal_103; }