Bruce/lua-debug-tui
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added upvalue support.

Browse Source
This commit is contained in:
Bruce Hill 2018-04-12 15:35:53 -07:00
parent 1c98e82c97
commit 9e5d0cf36f
2 changed files with 41 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
ldt.lua
View File

@ -1165,12 +1165,37 @@ ldb = {
table.insert(values, value)
stack_env[name] = value
end
local num_locals = #var_names
local info = debug.getinfo(callstack_min + stack_index - 1, "uf")
for upval = 1, info.nups do
local _continue_0 = false
repeat
local name, value = debug.getupvalue(info.func, upval)
if name == "_ENV" then
_continue_0 = true
break
end
table.insert(var_names, tostring(name))
table.insert(values, value)
stack_env[name] = value
_continue_0 = true
until true
if not _continue_0 then
break
end
end
local var_y = pads.stack.y + pads.stack.height
local var_x = 0
local height = SCREEN_H - (pads.err.height + pads.stack.height)
pads.vars = Pad("(V)ars", var_y, var_x, height, AUTO, var_names, (function(self, i)
return i == self.selected and Color('reverse') or Color()
end))
pads.vars = Pad("(V)ars", var_y, var_x, height, AUTO, var_names, function(self, i)
if i == self.selected then
return Color('reverse')
elseif i <= num_locals then
return Color()
else
return Color("black bold")
end
end)
log:write("Created var pad.\n")
pads.vars.on_select = function(self, var_index)
if var_index == nil then

15
ldt.moon
View File

@ -6,7 +6,7 @@ AUTO = {} -- Singleton
PARENT = {} -- Singleton
log = io.open('output.log','w')
-- TODO: add support for upvalues
-- TODO: add support for stepping debugger
_error = error
_assert = assert
@ -756,12 +756,23 @@ ldb = {
table.insert(var_names, tostring(name))
table.insert(values, value)
stack_env[name] = value
num_locals = #var_names
info = debug.getinfo(callstack_min+stack_index-1,"uf")
for upval=1,info.nups
name,value = debug.getupvalue(info.func, upval)
if name == "_ENV" then continue
table.insert(var_names, tostring(name))
table.insert(values, value)
stack_env[name] = value
var_y = pads.stack.y + pads.stack.height
var_x = 0
--height = math.min(2+#var_names, SCREEN_H-pads.err.height-pads.stack.height)
height = SCREEN_H-(pads.err.height+pads.stack.height)
pads.vars = Pad "(V)ars", var_y,var_x,height,AUTO,var_names, ((i)=> i == @selected and Color('reverse') or Color())
pads.vars = Pad "(V)ars", var_y,var_x,height,AUTO,var_names, (i)=>
if i == @selected then Color('reverse')
elseif i <= num_locals then Color()
else Color("black bold")
log\write("Created var pad.\n")
pads.vars.on_select = (var_index)=>