array Func_nextFree110 integer Func_firstFree977 integer Func_maxIndex163 array Func_typeId182 array C_nextFree662 integer C_firstFree956 integer C_maxIndex151 array C_typeId190 array C_x212 integer wurst_stack_depth138 array wurst_stack189 integer Func_firstFree977 = 0 integer Func_maxIndex163 = 0 integer C_firstFree956 = 0 integer C_maxIndex151 = 0 integer wurst_stack_depth138 = 0 function initGlobals196() { } function main247() { initGlobals196(); init_A871("when calling init_A in generic3, line 1"); } function config725() { } function init_A871(string __wurst_stackPos194) { local integer a169 local integer this211 wurst_stack_189[wurst_stack_depth_138] = __wurst_stackPos_194; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); a_169 = new_C372(5, "when calling new_C in generic3, line 12"); wurst_stack_189[wurst_stack_depth_138] = "when calling alloc_Func_map_A in generic3, line 13"; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); if (Func_firstFree_977 == 0) { if (Func_maxIndex_163 < 32768) { Func_maxIndex_163 = (Func_maxIndex_163 + 1); this_211 = Func_maxIndex_163; Func_typeId_182[this_211] = 3; } else { error160("Out of memory: Could not create Func_map_A.", "when calling error in generic3, line 13"); this_211 = 0; }; } else { Func_firstFree_977 = (Func_firstFree_977 - 1); this_211 = Func_nextFree_110[Func_firstFree_977]; Func_typeId_182[this_211] = 3; }; wurst_stack_depth_138 = (wurst_stack_depth_138 - 1); if (C_x_212[dispatch_C_A_C_map841(a_169, this_211, "when calling map in generic3, line 13")] == 10) { testSuccess163(); } else { }; wurst_stack_depth_138 = (wurst_stack_depth_138 - 1); } IS_NATIVE function testSuccess163() { } function new_C372(any x949, string __wurst_stackPos118) returns integer { local integer this106 wurst_stack_189[wurst_stack_depth_138] = __wurst_stackPos_118; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); wurst_stack_189[wurst_stack_depth_138] = "when calling alloc_C in generic3, line 7"; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); if (C_firstFree_956 == 0) { if (C_maxIndex_151 < 32768) { C_maxIndex_151 = (C_maxIndex_151 + 1); this_106 = C_maxIndex_151; C_typeId_190[this_106] = 1; } else { error160("Out of memory: Could not create C.", "when calling error in generic3, line 5"); this_106 = 0; }; } else { C_firstFree_956 = (C_firstFree_956 - 1); this_106 = C_nextFree_662[C_firstFree_956]; C_typeId_190[this_106] = 1; }; wurst_stack_depth_138 = (wurst_stack_depth_138 - 1); C_x_212[this_106] = x_949; wurst_stack_depth_138 = (wurst_stack_depth_138 - 1); return this_106; } function error160(string msg205, string __wurst_stackPos198) { local integer stacktraceIndex968 local integer stacktraceLimit247 wurst_stack_189[wurst_stack_depth_138] = __wurst_stackPos_198; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); __wurst_stackPos_198 = ""; stacktraceIndex_968 = wurst_stack_depth_138; stacktraceLimit_247 = 0; loop { stacktraceIndex_968 = (stacktraceIndex_968 - 1); stacktraceLimit_247 = (stacktraceLimit_247 + 1); exitwhen ((stacktraceLimit_247 > 20) or (stacktraceIndex_968 < 0)); __wurst_stackPos_198 = (__wurst_stackPos_198 + (" " + wurst_stack_189[stacktraceIndex_968])); }; $debugPrint652((msg_205 + (" " + __wurst_stackPos_198))); wurst_stack_depth_138 = (wurst_stack_depth_138 - 1); } function dispatch_C_A_C_map841(integer this142, integer f251, string __wurst_stackPos847) returns integer { local any x147 wurst_stack_189[wurst_stack_depth_138] = __wurst_stackPos_847; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); if (C_typeId_190[this_142] == 0) { if (this_142 == 0) { error160("Nullpointer exception when calling C.map", "when calling error in generic3, line 9"); } else { error160("Called C.map on invalid object.", "when calling error in generic3, line 9"); }; } else { }; wurst_stack_189[wurst_stack_depth_138] = "when calling map in generic3, line 9"; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); x_147 = C_x_212[this_142]; wurst_stack_189[wurst_stack_depth_138] = "when calling apply in generic3, line 10"; wurst_stack_depth_138 = (wurst_stack_depth_138 + 1); if (Func_typeId_182[f_251] == 0) { if (f_251 == 0) { error160("Nullpointer exception when calling Func.apply", "when calling error in generic3, line 4"); } else { error160("Called Func.apply on invalid object.", "when calling error in generic3, line 4"); }; } else { }; wurst_stack_depth_138 = (wurst_stack_depth_138 - 1); this_142 = new_C372((2 * x_147), "when calling new_C in generic3, line 10"); wurst_stack_depth_138 = ((wurst_stack_depth_138 - 1) - 1); return this_142; }