Зависает скрипт QLua из примера

--Обработка событий РМ QUIK в функции main() посредством очереди FIFO
function OnInit(script)
   is_run = true
   MAIN_QUEUE = {}
end

function OnStop()
   is_run = false
   return 2000
end

function main()
   while is_run do
       if #MAIN_QUEUE > 0 then
           ProcessingCallbakc(MAIN_QUEUE[1])
           table.sremove(MAIN_QUEUE, 1)
           message("Queue size " .. tostring(#MAIN_QUEUE))
       end
   end
end

function ProcessingCallbakc(value)
end