array C_nextFree204 integer C_firstFree835 integer C_maxIndex106 array C_ang_rad_0148 array C_ang_rad_1196 integer C_firstFree835 = 0 integer C_maxIndex106 = 0 function initGlobals103() { C_firstFree_835 = 0; C_maxIndex_106 = 0; } function main555() { initGlobals103(); init_test158(); } function config142() { } function init_test158() { local integer c211 local real tuple_temp132 local real tuple_temp742 c_211 = new_C494(); tuple_temp_132 = 4.; C_ang_rad_set136(c_211, 0, tuple_temp_132); tuple_temp_742 = 2.; C_ang_rad_set136(c_211, 1, tuple_temp_742); if ((C_ang_rad_get450(c_211, 0) == 4.) and (C_ang_rad_get450(c_211, 1) == 2.)) { testSuccess263(); } else { }; } IS_NATIVE function testSuccess263() { } function C_init468(integer this973) { } function new_C494() returns integer { local integer this209 this_209 = alloc_C681(); construct_C606(this_209); return this_209; } function construct_C606(integer this130) { C_init468(this_130); } function alloc_C681() returns integer { local integer this203 if (C_firstFree_835 == 0) { if (C_maxIndex_106 < 32768) { C_maxIndex_106 = (C_maxIndex_106 + 1); this_203 = C_maxIndex_106; } else { error758("Out of memory: Could not create C."); this_203 = 0; }; } else { C_firstFree_835 = (C_firstFree_835 - 1); this_203 = C_nextFree_204[C_firstFree_835]; }; return this_203; } function error758(string msg159) { $debugPrint161((msg_159 + (" " + #getStackTrace()))); } function C_ang_rad_set136(integer instanceId106, integer arrayIndex446, real value747) { if ((arrayIndex_446 < 0) or (arrayIndex_446 >= 2)) { error758("Index out of Bounds"); } else { if (arrayIndex_446 <= 0) { C_ang_rad_0_148[instanceId_106] = value_747; } else { C_ang_rad_1_196[instanceId_106] = value_747; }; }; } function C_ang_rad_get450(integer index1181, integer index2176) returns real { local real returnVal160 if ((index2_176 < 0) or (index2_176 >= 2)) { error758("Index out of Bounds"); } else { if (index2_176 <= 0) { returnVal_160 = C_ang_rad_0_148[index1_181]; } else { returnVal_160 = C_ang_rad_1_196[index1_181]; }; }; return returnVal_160; }