AstralTransRocketries/OpenComputers
1
0
Fork 0
mirror of https://github.com/MightyPirates/OpenComputers.git synced 2025-09-16 18:55:03 -04:00
Code Issues Packages Projects Releases Wiki Activity

running the debug hook that is used to check for timeouts more often, may help with #78

Browse Source
This commit is contained in:
Florian Nücke 2014-01-10 17:31:10 +01:00
parent 27102a8be1
commit 128b3ae03b
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
assets/opencomputers/lua/kernel.lua
View File

@ -1,3 +1,4 @@
local hookInterval = 100
local deadline = 0
local function checkDeadline()
if computer.realTime() > deadline then
@ -94,7 +95,7 @@ sandbox = {
checkArg(1, co, "thread")
local args = table.pack(...)
while true do -- for consecutive sysyields
debug.sethook(co, checkDeadline, "", 10000)
debug.sethook(co, checkDeadline, "", hookInterval)
local result = table.pack(
coroutine.resume(co, table.unpack(args, 1, args.n)))
debug.sethook(co) -- avoid gc issues
@ -396,7 +397,7 @@ local function main()
local co, args = bootstrap(), {n=0}
while true do
deadline = computer.realTime() + timeout -- timeout global is set by host
debug.sethook(co, checkDeadline, "", 10000)
debug.sethook(co, checkDeadline, "", hookInterval)
local result = table.pack(coroutine.resume(co, table.unpack(args, 1, args.n)))
if not result[1] then
error(tostring(result[2]), 0)