array C_nextFree152 integer C_firstFree187 integer C_maxIndex588 array C_ang_rad_0181 array C_ang_rad_1117 integer C_firstFree187 = 0 integer C_maxIndex588 = 0 function initGlobals211() { C_firstFree_187 = 0; C_maxIndex_588 = 0; } function main937() { initGlobals211(); init_test131(); } function config719() { } function init_test131() { local integer c158 local real tuple_temp597 local real tuple_temp165 c_158 = new_C185(); tuple_temp_597 = 4.; C_ang_rad_set188(c_158, 0, tuple_temp_597); tuple_temp_165 = 2.; C_ang_rad_set188(c_158, 1, tuple_temp_165); if ((C_ang_rad_get132(c_158, 0) == 4.) and (C_ang_rad_get132(c_158, 1) == 2.)) { testSuccess184(); } else { }; } IS_NATIVE function testSuccess184() { } function C_init140(integer this107) { } function new_C185() returns integer { local integer this103 this_103 = alloc_C188(); construct_C201(this_103); return this_103; } function construct_C201(integer this130) { C_init140(this_130); } function alloc_C188() returns integer { local integer this499 if (C_firstFree_187 == 0) { if (C_maxIndex_588 < 32768) { C_maxIndex_588 = (C_maxIndex_588 + 1); this_499 = C_maxIndex_588; } else { error196("Out of memory: Could not create C."); this_499 = 0; }; } else { C_firstFree_187 = (C_firstFree_187 - 1); this_499 = C_nextFree_152[C_firstFree_187]; }; return this_499; } function error196(string msg133) { $debugPrint619((msg_133 + (" " + #getStackTrace()))); } function C_ang_rad_set188(integer instanceId166, integer arrayIndex122, real value102) { if ((arrayIndex_122 < 0) or (arrayIndex_122 >= 2)) { error196("Index out of Bounds"); } else { if (arrayIndex_122 <= 0) { C_ang_rad_0_181[instanceId_166] = value_102; } else { C_ang_rad_1_117[instanceId_166] = value_102; }; }; } function C_ang_rad_get132(integer index1115, integer index2699) returns real { local real returnVal884 if ((index2_699 < 0) or (index2_699 >= 2)) { error196("Index out of Bounds"); } else { if (index2_699 <= 0) { returnVal_884 = C_ang_rad_0_181[index1_115]; } else { returnVal_884 = C_ang_rad_1_117[index1_115]; }; }; return returnVal_884; }