//Generated method caller for Base.doSomething
function sc__Base_doSomething takes integer this returns nothing
set f__arg_this=this
call TriggerEvaluate(st__Base_doSomething[si__Base_type[this]])
endfunction
//Generated allocator of Base
function s__Base__allocate takes nothing returns integer
local integer this=si__Base_F
if (this!=0) then
set si__Base_F=si__Base_V[this]
else
set si__Base_I=si__Base_I+1
set this=si__Base_I
endif
if (this>8190) then
call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,1000.,"Unable to allocate id for an object of type: Base")
return 0
endif
set si__Base_type[this]=1
set si__Base_V[this]=-1
return this
endfunction
//Generated destructor of Base
function sc__Base_deallocate takes integer this returns nothing
if this==null then
call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,1000.,"Attempt to destroy a null struct of type: Base")
return
elseif (si__Base_V[this]!=-1) then
call DisplayTimedTextToPlayer(GetLocalPlayer(),0,0,1000.,"Double free of type: Base")
return
endif
set f__arg_this=this
call TriggerEvaluate(st__Base_onDestroy[si__Base_type[this]])
set si__Base_V[this]=si__Base_F
set si__Base_F=this
endfunction
//Generated method caller for NotBase.doSomething
function sc__NotBase_doSomething takes integer this returns nothing
call BJDebugMsg("called within B")
endfunction
//Generated allocator of NotBase
function s__NotBase__allocate takes nothing returns integer
local integer this=s__Base__allocate()
local integer kthis
if(this==0) then
return 0
endif
set si__Base_type[this]=2
set kthis=this
return this
endfunction
//library A:
function s__Base_doSomething takes integer this returns nothing
call BJDebugMsg("called within A")
endfunction
//library A ends
//library Alloc:
//library Alloc ends
//library B:
function s__NotBase_doSomething takes integer this returns nothing
call BJDebugMsg("called within B")
endfunction
//library B ends
function s__test_me_someFunc takes integer b returns nothing
call sc__Base_doSomething(b)
endfunction
function s__test_me_onInit takes nothing returns nothing
local integer b= s__NotBase__allocate()
call s__test_me_someFunc(b)
endfunction