// this script was compiled with wurst 1.8.1.0-jenkins-Wurst-1366 globals integer array ToStringClosure_nextFree integer ToStringClosure_firstFree=0 integer ToStringClosure_maxIndex=0 integer array LinkedList_nextFree integer LinkedList_firstFree=0 integer LinkedList_maxIndex=0 endglobals function error takes string msg returns nothing call BJDebugMsg(msg + "\n" + "") endfunction function LinkedList_foo takes integer this, string separator returns string if ToStringClosure_firstFree == 0 then if ToStringClosure_maxIndex < 32768 then set ToStringClosure_maxIndex = ToStringClosure_maxIndex + 1 else call error("Out of memory: Could not create ToStringClosure_foo_test.") endif else set ToStringClosure_firstFree = ToStringClosure_firstFree - 1 endif if ToStringClosure_firstFree == 0 then if ToStringClosure_maxIndex < 32768 then set ToStringClosure_maxIndex = ToStringClosure_maxIndex + 1 else call error("Out of memory: Could not create ToStringClosure_foo2_test.") endif else set ToStringClosure_firstFree = ToStringClosure_firstFree - 1 endif return separator endfunction function initGlobals takes nothing returns nothing endfunction function new_LinkedList takes nothing returns integer local integer this local integer this_1 if LinkedList_firstFree == 0 then if LinkedList_maxIndex < 32768 then set LinkedList_maxIndex = LinkedList_maxIndex + 1 set this_1 = LinkedList_maxIndex else call error("Out of memory: Could not create LinkedList.") set this_1 = 0 endif else set LinkedList_firstFree = LinkedList_firstFree - 1 set this_1 = LinkedList_nextFree[LinkedList_firstFree] endif set this = this_1 return this endfunction function main takes nothing returns nothing local integer x call initGlobals() set x = new_LinkedList() call LinkedList_foo(x, "a") endfunction function config takes nothing returns nothing endfunction