// this script was compiled with wurst 1.8.1.0-jenkins-Wurst-1366 globals integer array C_nextFree integer C_firstFree=0 integer C_maxIndex=0 integer array C_typeId endglobals native testSuccess takes nothing returns nothing function error takes string msg returns nothing call BJDebugMsg(msg + "\n" + "") endfunction function dispatch_C_Test_C_foo_4 takes integer this, integer ints_0, integer ints_1, integer ints_2, integer ints_3 returns nothing if C_typeId[this] == 0 then if this == 0 then call error("Nullpointer exception when calling C.foo") else call error("Called C.foo on invalid object.") endif endif set this = ints_1 set ints_1 = ints_2 set ints_2 = ints_3 set ints_3 = 3 + ints_0 set ints_0 = 1 loop exitwhen ints_0 > 4 set ints_3 = ints_3 + ints_0 exitwhen ints_0 > 2 set ints_0 = ints_0 + 1 endloop set ints_3 = ints_3 + this set ints_0 = 1 loop exitwhen ints_0 > 4 set ints_3 = ints_3 + ints_0 exitwhen ints_0 > 2 set ints_0 = ints_0 + 1 endloop set ints_3 = ints_3 + ints_1 set ints_0 = 1 loop exitwhen ints_0 > 4 set ints_3 = ints_3 + ints_0 exitwhen ints_0 > 2 set ints_0 = ints_0 + 1 endloop set ints_3 = ints_3 + ints_2 set ints_0 = 1 loop exitwhen ints_0 > 4 set ints_3 = ints_3 + ints_0 exitwhen ints_0 > 2 set ints_0 = ints_0 + 1 endloop if ints_3 == 37 then call testSuccess() endif endfunction function initGlobals takes nothing returns nothing endfunction function new_C takes nothing returns integer local integer this if C_firstFree == 0 then if C_maxIndex < 32768 then set C_maxIndex = C_maxIndex + 1 set this = C_maxIndex set C_typeId[this] = 1 else call error("Out of memory: Could not create C.") set this = 0 endif else set C_firstFree = C_firstFree - 1 set this = C_nextFree[C_firstFree] set C_typeId[this] = 1 endif return this endfunction function main takes nothing returns nothing call initGlobals() call dispatch_C_Test_C_foo_4(new_C(), 1, 2, 3, 4) endfunction function config takes nothing returns nothing endfunction