function OnStart takes nothing returns nothing
local integer i = Allocate(udg_alloc)
set udg_Data[i] = GetRandomInt(0, 2147483647)
endfunction
function Delete takes integer i returns nothing
set udg_Data[i] = 0
call Deallocate(udg_alloc)
endfunction
function Init takes nothing returns nothing
set udg_alloc = CreateAlloc()
endfunction