// this script was compiled with wurst 1.8.1.0-jenkins-Wurst-1367 globals integer BugClass_mws=0 integer array MiddlewareUnary_nextFree integer MiddlewareUnary_firstFree=0 integer MiddlewareUnary_maxIndex=0 integer array MiddlewareUnary_typeId integer array CallbackUnary_nextFree integer CallbackUnary_firstFree=0 integer CallbackUnary_maxIndex=0 integer array CallbackUnary_typeId integer array BugClass_nextFree integer BugClass_firstFree=0 integer BugClass_maxIndex=0 integer array LinkedList_nextFree integer LinkedList_firstFree=0 integer LinkedList_maxIndex=0 integer array LinkedList_typeId integer array cb integer array LinkedList_elem integer wurst_stack_depth=0 string array wurst_stack endglobals native println takes string msg returns nothing native testSuccess takes nothing returns nothing function initGlobals takes nothing returns nothing endfunction function error takes string msg, string w__wurst_stackPos returns nothing local integer stacktraceIndex local integer stacktraceLimit set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 set w__wurst_stackPos = "" set stacktraceIndex = wurst_stack_depth set stacktraceLimit = 0 loop set stacktraceIndex = stacktraceIndex - 1 set stacktraceLimit = stacktraceLimit + 1 exitwhen stacktraceLimit > 20 or stacktraceIndex < 0 set w__wurst_stackPos = w__wurst_stackPos + "\n " + wurst_stack[stacktraceIndex] endloop call BJDebugMsg(msg + "\n" + w__wurst_stackPos) set wurst_stack_depth = wurst_stack_depth - 1 endfunction function LinkedList_add_1 takes integer this, integer cbs_0, string w__wurst_stackPos returns nothing local integer this_1 set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 set wurst_stack[wurst_stack_depth] = "when calling mwUnary in MiddlewareOverload.wurst, line 69" set wurst_stack_depth = wurst_stack_depth + 1 set wurst_stack[wurst_stack_depth] = "when calling alloc_MiddlewareUnary_Bug in MiddlewareOverload.wurst, line 46" set wurst_stack_depth = wurst_stack_depth + 1 if MiddlewareUnary_firstFree == 0 then if MiddlewareUnary_maxIndex < 32768 then set MiddlewareUnary_maxIndex = MiddlewareUnary_maxIndex + 1 set this_1 = MiddlewareUnary_maxIndex set MiddlewareUnary_typeId[this_1] = 9 else call error("Out of memory: Could not create MiddlewareUnary_Bug.", "when calling error in MiddlewareOverload.wurst, line 46") set this_1 = 0 endif else set MiddlewareUnary_firstFree = MiddlewareUnary_firstFree - 1 set this_1 = MiddlewareUnary_nextFree[MiddlewareUnary_firstFree] set MiddlewareUnary_typeId[this_1] = 9 endif set wurst_stack_depth = wurst_stack_depth - 1 set cb[this_1] = cbs_0 set wurst_stack_depth = wurst_stack_depth - 1 set wurst_stack[wurst_stack_depth] = "when calling add in MiddlewareOverload.wurst, line 69" set wurst_stack_depth = wurst_stack_depth + 1 if LinkedList_typeId[this] == 0 then if this == 0 then call error("Nullpointer exception when calling LinkedList.add", "when calling error in MiddlewareOverload.wurst, line 77") else call error("Called LinkedList.add on invalid object.", "when calling error in MiddlewareOverload.wurst, line 77") endif endif set LinkedList_elem[this] = this_1 set wurst_stack_depth = wurst_stack_depth - 1 - 1 endfunction function dispatch_CallbackUnary_Bug_CallbackUnary_call takes integer this, integer t, string w__wurst_stackPos returns nothing set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_typeId[this] == 0 then if this == 0 then call error("Nullpointer exception when calling CallbackUnary.call", "when calling error in MiddlewareOverload.wurst, line 16") else call error("Called CallbackUnary.call on invalid object.", "when calling error in MiddlewareOverload.wurst, line 16") endif endif if CallbackUnary_typeId[this] <= 4 then call testSuccess() else call println("called") endif set wurst_stack_depth = wurst_stack_depth - 1 endfunction function dispatch_CallbackUnary_destroyCallbackUnary takes integer this, string w__wurst_stackPos returns nothing set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_typeId[this] == 0 then if this == 0 then call error("Nullpointer exception when calling CallbackUnary.CallbackUnary", "when calling error in MiddlewareOverload.wurst, line 15") else call error("Called CallbackUnary.CallbackUnary on invalid object.", "when calling error in MiddlewareOverload.wurst, line 15") endif endif set wurst_stack[wurst_stack_depth] = "when calling destroyCallbackUnary in MiddlewareOverload.wurst, line 15" set wurst_stack_depth = wurst_stack_depth + 1 set wurst_stack[wurst_stack_depth] = "when calling dealloc_CallbackUnary in MiddlewareOverload.wurst, line 15" set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_typeId[this] == 0 then call error("Double free: object of type CallbackUnary", "when calling error in MiddlewareOverload.wurst, line 15") else set CallbackUnary_nextFree[CallbackUnary_firstFree] = this set CallbackUnary_firstFree = CallbackUnary_firstFree + 1 set CallbackUnary_typeId[this] = 0 endif set wurst_stack_depth = wurst_stack_depth - 1 - 1 - 1 endfunction function call_Bug takes integer this, integer t, integer mwCb, string w__wurst_stackPos returns nothing set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 set wurst_stack[wurst_stack_depth] = "when calling callAndDestroy in MiddlewareOverload.wurst, line 37" set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_typeId[mwCb] == 0 then if mwCb == 0 then call error("Nullpointer exception when calling CallbackUnary.callAndDestroy", "when calling error in MiddlewareOverload.wurst, line 17") else call error("Called CallbackUnary.callAndDestroy on invalid object.", "when calling error in MiddlewareOverload.wurst, line 17") endif endif set wurst_stack[wurst_stack_depth] = "when calling callAndDestroy in MiddlewareOverload.wurst, line 17" set wurst_stack_depth = wurst_stack_depth + 1 call dispatch_CallbackUnary_Bug_CallbackUnary_call(mwCb, t, "when calling call in MiddlewareOverload.wurst, line 18") call dispatch_CallbackUnary_destroyCallbackUnary(mwCb, "when calling dispatch_CallbackUnary_destroyCallbackUnary in MiddlewareOverload.wurst, line 19") set wurst_stack_depth = wurst_stack_depth - 1 - 1 - 1 endfunction function call_Bug_3 takes integer this, integer t, integer mwCb, string w__wurst_stackPos returns nothing set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 call dispatch_CallbackUnary_Bug_CallbackUnary_call(cb[this], t, "when calling call in MiddlewareOverload.wurst, line 47") set wurst_stack[wurst_stack_depth] = "when calling callAndDestroy in MiddlewareOverload.wurst, line 48" set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_typeId[mwCb] == 0 then if mwCb == 0 then call error("Nullpointer exception when calling CallbackUnary.callAndDestroy", "when calling error in MiddlewareOverload.wurst, line 17") else call error("Called CallbackUnary.callAndDestroy on invalid object.", "when calling error in MiddlewareOverload.wurst, line 17") endif endif set wurst_stack[wurst_stack_depth] = "when calling callAndDestroy in MiddlewareOverload.wurst, line 17" set wurst_stack_depth = wurst_stack_depth + 1 call dispatch_CallbackUnary_Bug_CallbackUnary_call(mwCb, t, "when calling call in MiddlewareOverload.wurst, line 18") call dispatch_CallbackUnary_destroyCallbackUnary(mwCb, "when calling dispatch_CallbackUnary_destroyCallbackUnary in MiddlewareOverload.wurst, line 19") set wurst_stack_depth = wurst_stack_depth - 1 - 1 - 1 endfunction function dispatch_MiddlewareUnary_Bug_MiddlewareUnary_call takes integer this, integer t, integer cb_1, string w__wurst_stackPos returns nothing set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 if MiddlewareUnary_typeId[this] == 0 then if this == 0 then call error("Nullpointer exception when calling MiddlewareUnary.call", "when calling error in MiddlewareOverload.wurst, line 25") else call error("Called MiddlewareUnary.call on invalid object.", "when calling error in MiddlewareOverload.wurst, line 25") endif endif if MiddlewareUnary_typeId[this] <= 8 then call call_Bug(this, t, cb_1, "when calling call_Bug in MiddlewareOverload.wurst, line 25") else call call_Bug_3(this, t, cb_1, "when calling call_Bug in MiddlewareOverload.wurst, line 25") endif set wurst_stack_depth = wurst_stack_depth - 1 endfunction function LinkedList_call takes integer this, integer t0, string w__wurst_stackPos returns nothing local integer temp set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 set temp = LinkedList_elem[this] set wurst_stack[wurst_stack_depth] = "when calling alloc_CallbackUnary_call_Bug in MiddlewareOverload.wurst, line 55" set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_firstFree == 0 then if CallbackUnary_maxIndex < 32768 then set CallbackUnary_maxIndex = CallbackUnary_maxIndex + 1 set this = CallbackUnary_maxIndex set CallbackUnary_typeId[this] = 5 else call error("Out of memory: Could not create CallbackUnary_call_Bug.", "when calling error in MiddlewareOverload.wurst, line 55") set this = 0 endif else set CallbackUnary_firstFree = CallbackUnary_firstFree - 1 set this = CallbackUnary_nextFree[CallbackUnary_firstFree] set CallbackUnary_typeId[this] = 5 endif set wurst_stack_depth = wurst_stack_depth - 1 call dispatch_MiddlewareUnary_Bug_MiddlewareUnary_call(temp, t0, this, "when calling call in MiddlewareOverload.wurst, line 55") set wurst_stack_depth = wurst_stack_depth - 1 endfunction function new_LinkedList takes string w__wurst_stackPos returns integer local integer this set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 set wurst_stack[wurst_stack_depth] = "when calling alloc_LinkedList in MiddlewareOverload.wurst, line 75" set wurst_stack_depth = wurst_stack_depth + 1 if LinkedList_firstFree == 0 then if LinkedList_maxIndex < 32768 then set LinkedList_maxIndex = LinkedList_maxIndex + 1 set this = LinkedList_maxIndex set LinkedList_typeId[this] = 6 else call error("Out of memory: Could not create LinkedList.", "when calling error in MiddlewareOverload.wurst, line 75") set this = 0 endif else set LinkedList_firstFree = LinkedList_firstFree - 1 set this = LinkedList_nextFree[LinkedList_firstFree] set LinkedList_typeId[this] = 6 endif set wurst_stack_depth = wurst_stack_depth - 1 - 1 return this endfunction function init_Bug takes string w__wurst_stackPos returns nothing local integer temp local integer temp_1 set wurst_stack[wurst_stack_depth] = w__wurst_stackPos set wurst_stack_depth = wurst_stack_depth + 1 set BugClass_mws = new_LinkedList("when calling new_LinkedList in MiddlewareOverload.wurst, line 82") set temp = BugClass_mws set wurst_stack[wurst_stack_depth] = "when calling alloc_CallbackUnary_add_Bug in MiddlewareOverload.wurst, line 87" set wurst_stack_depth = wurst_stack_depth + 1 if CallbackUnary_firstFree == 0 then if CallbackUnary_maxIndex < 32768 then set CallbackUnary_maxIndex = CallbackUnary_maxIndex + 1 set temp_1 = CallbackUnary_maxIndex set CallbackUnary_typeId[temp_1] = 4 else call error("Out of memory: Could not create CallbackUnary_add_Bug.", "when calling error in MiddlewareOverload.wurst, line 87") set temp_1 = 0 endif else set CallbackUnary_firstFree = CallbackUnary_firstFree - 1 set temp_1 = CallbackUnary_nextFree[CallbackUnary_firstFree] set CallbackUnary_typeId[temp_1] = 4 endif set wurst_stack_depth = wurst_stack_depth - 1 call LinkedList_add_1(temp, temp_1, "when calling add in MiddlewareOverload.wurst, line 87") set temp_1 = BugClass_mws set wurst_stack[wurst_stack_depth] = "when calling new_BugClass in MiddlewareOverload.wurst, line 88" set wurst_stack_depth = wurst_stack_depth + 1 set wurst_stack[wurst_stack_depth] = "when calling alloc_BugClass in MiddlewareOverload.wurst, line 81" set wurst_stack_depth = wurst_stack_depth + 1 if BugClass_firstFree == 0 then if BugClass_maxIndex < 32768 then set BugClass_maxIndex = BugClass_maxIndex + 1 set temp = BugClass_maxIndex else call error("Out of memory: Could not create BugClass.", "when calling error in MiddlewareOverload.wurst, line 81") set temp = 0 endif else set BugClass_firstFree = BugClass_firstFree - 1 set temp = BugClass_nextFree[BugClass_firstFree] endif set wurst_stack_depth = wurst_stack_depth - 1 - 1 call LinkedList_call(temp_1, temp, "when calling call in MiddlewareOverload.wurst, line 88") set wurst_stack_depth = wurst_stack_depth - 1 endfunction function main takes nothing returns nothing call initGlobals() call init_Bug("when calling init_Bug in MiddlewareOverload.wurst, line 1") endfunction function config takes nothing returns nothing endfunction