local run = true
function main()
  while run do end  
end
function OnAllTrade(alltrade) end

      lua_unlock(L);
      n = (*f)(L);  /* do the actual call */
      lua_lock(L);

local run = true
local nshow = 0

function OnAllTrade()
   if nshow < 10 then
      PrintDbgStr('OnAllTrade')
      nshow = nshow + 1
   end
end

function dummy(i)
   local a = 1
   for i = 1, 1000000 do a = a + i end
end

function main()
   PrintDbgStr('Before loop')
   for i = 0, 10000000 do
      dummy(i)
   end
   PrintDbgStr('After loop')
end