// this script was compiled with wurst 1.8.1.0-jenkins-Wurst-1367 globals integer Test_res=0 integer array A_nextFree integer A_firstFree=0 integer A_maxIndex=0 endglobals native testSuccess takes nothing returns nothing function initGlobals takes nothing returns nothing endfunction function error takes string msg returns nothing call BJDebugMsg(msg + "\n" + "") endfunction function new_A takes nothing returns integer local integer this local integer this_1 local integer x local integer y if A_firstFree == 0 then if A_maxIndex < 32768 then set A_maxIndex = A_maxIndex + 1 set this_1 = A_maxIndex else call error("Out of memory: Could not create A.") set this_1 = 0 endif else set A_firstFree = A_firstFree - 1 set this_1 = A_nextFree[A_firstFree] endif set this = this_1 set x = 2 set Test_res = Test_res + x set y = 1 set Test_res = Test_res - y set Test_res = Test_res * 2 return this endfunction function init_Test takes nothing returns nothing local integer i local integer this local integer this_1 local integer i_1 local integer x local integer y set Test_res = 1 call new_A() set i = 3 if A_firstFree == 0 then if A_maxIndex < 32768 then set A_maxIndex = A_maxIndex + 1 set this_1 = A_maxIndex else call error("Out of memory: Could not create A.") set this_1 = 0 endif else set A_firstFree = A_firstFree - 1 set this_1 = A_nextFree[A_firstFree] endif set this = this_1 set i_1 = i set x = 2 set Test_res = Test_res + x set y = 1 set Test_res = Test_res - y set Test_res = Test_res * i_1 if Test_res == 15 then call testSuccess() endif endfunction function main takes nothing returns nothing call initGlobals() call init_Test() endfunction function config takes nothing returns nothing endfunction