Moving over to moonscript.
This commit is contained in:
Bruce Hill
parent
4e5e2a8ec7
commit
f466e0f471
271
cursed.moon
Normal file
271
cursed.moon
Normal file
@ -0,0 +1,271 @@
|
||||
C = require "curses"
|
||||
repr = require 'repr'
|
||||
local REGULAR, INVERTED, HIGHLIGHTED, RED
|
||||
local run_debugger, cursed
|
||||
AUTO = -1
|
||||
|
||||
-- Return the callstack index of the code that actually caused an error and the max index
|
||||
callstack_range = ->
|
||||
min, max = 0, -1
|
||||
for i=1,999 do
|
||||
if debug.getinfo(i,'f').func == run_debugger
|
||||
min = i+2
|
||||
break
|
||||
for i=min,999
|
||||
if debug.getinfo(i,'f').func == cursed then
|
||||
max = i-3
|
||||
break
|
||||
return min, max
|
||||
|
||||
class Pad
|
||||
new: (@y,@x,@height,@width)=>
|
||||
@offset = 0
|
||||
@selected = nil
|
||||
@chstrs = {}
|
||||
@lines = {}
|
||||
if @height == AUTO
|
||||
@resize_height = true
|
||||
@height = 2
|
||||
if @width == AUTO
|
||||
@resize_width = true
|
||||
@width = 2
|
||||
@_width, @_height = 2, 2
|
||||
@_pad = C.newpad(@_height, @_width)
|
||||
@_pad\scrollok(true)
|
||||
|
||||
move_to: (y, x)=>
|
||||
--@erase!
|
||||
@y = y
|
||||
@x = x
|
||||
@refresh!
|
||||
if @on_move then @on_move!
|
||||
|
||||
set_size: (h, w)=>
|
||||
@height = h
|
||||
@width = w
|
||||
@refresh!
|
||||
if @on_resize then @on_resize!
|
||||
|
||||
set_internal_size: (h, w)=>
|
||||
@_height = h
|
||||
@_width = w
|
||||
@refresh!
|
||||
if @on_resize then @on_resize!
|
||||
|
||||
select: (i)=>
|
||||
return if i == @selected
|
||||
if i != nil
|
||||
i = math.max(1, math.min(#@lines, i))
|
||||
if @selected
|
||||
j = @selected
|
||||
attr = j % 2 == 0 and INVERTED or REGULAR
|
||||
@chstrs[j]\set_str(0, @lines[j], attr)
|
||||
@chstrs[j]\set_str(#@lines[j], ' ', attr, @chstrs[j]\len!-#@lines[j])
|
||||
@_pad\mvaddchstr(j-1+1,0+1,@chstrs[j])
|
||||
|
||||
if i
|
||||
@chstrs[i]\set_str(0, @lines[i], HIGHLIGHTED)
|
||||
@chstrs[i]\set_str(#@lines[i], ' ', HIGHLIGHTED, @chstrs[i]\len!-#@lines[i])
|
||||
@_pad\mvaddchstr(i-1+1,0+1,@chstrs[i])
|
||||
|
||||
@selected = i
|
||||
|
||||
if @selected
|
||||
if @offset + @height-1 < @selected
|
||||
@offset = math.min(@selected - (@height-1), #@lines-@height)
|
||||
elseif @offset + 1 > @selected
|
||||
@offset = @selected - 1
|
||||
@refresh!
|
||||
if @on_select then @on_select(@selected)
|
||||
|
||||
refresh: =>
|
||||
@_pad\border(C.ACS_VLINE, C.ACS_VLINE,
|
||||
C.ACS_HLINE, C.ACS_HLINE,
|
||||
C.ACS_ULCORNER, C.ACS_URCORNER,
|
||||
C.ACS_LLCORNER, C.ACS_LRCORNER)
|
||||
@_pad\pnoutrefresh(@offset,0,@y,@x,@y+@height,@x+@width)
|
||||
|
||||
set_lines: (lines, attrs)=>
|
||||
attrs = attrs or setmetatable({}, {__index:(i)=> if i % 2 == 0 then INVERTED else REGULAR})
|
||||
@lines = {}
|
||||
@attrs = {}
|
||||
@chstrs = {}
|
||||
max_width = 0
|
||||
for i, line in ipairs(lines)
|
||||
max_width = math.max(max_width, #line)
|
||||
@_width = max_width + 2
|
||||
if @resize_width
|
||||
@width = @_width
|
||||
@_height = #lines + 2
|
||||
if @resize_height
|
||||
@height = @_height
|
||||
@_pad\resize(@_height, @_width)
|
||||
|
||||
for i, line in ipairs(lines)
|
||||
@lines[i] = line
|
||||
attr = attrs[i]
|
||||
@attrs[i] = attr
|
||||
chstr = C.new_chstr(@width-2)
|
||||
@chstrs[i] = chstr
|
||||
chstr\set_str(0, line, attr)
|
||||
chstr\set_str(#line+0, ' ', attr, chstr\len!-#line)
|
||||
@_pad\mvaddchstr(i-1+1,0+1,chstr)
|
||||
@refresh!
|
||||
|
||||
erase: =>
|
||||
@_pad\erase!
|
||||
@_pad\pnoutrefresh(@offset,0,@y,@x,@y+@height,@x+@width)
|
||||
|
||||
clear: =>
|
||||
@erase!
|
||||
@lines = {}
|
||||
@chstrs = {}
|
||||
@set_internal_size(2,2)
|
||||
if @resize_height
|
||||
@set_size(@_height, @width)
|
||||
if @resize_width
|
||||
@set_size(@height, @_width)
|
||||
@selected = nil
|
||||
@offset = 0
|
||||
@refresh!
|
||||
|
||||
scroll: (delta)=>
|
||||
@select(@selected and (@selected + delta) or 1)
|
||||
|
||||
|
||||
run_debugger = (err_msg)->
|
||||
initial_index = 1
|
||||
stdscr = C.initscr!
|
||||
SCREEN_H, SCREEN_W = stdscr\getmaxyx!
|
||||
|
||||
C.cbreak!
|
||||
C.echo(false)
|
||||
C.nl(false)
|
||||
C.curs_set(0)
|
||||
C.start_color!
|
||||
C.use_default_colors!
|
||||
|
||||
stdscr\clear!
|
||||
stdscr\refresh!
|
||||
stdscr\keypad(true)
|
||||
|
||||
export REGULAR, INVERTED, HIGHLIGHTED, RED
|
||||
_, REGULAR = C.init_pair(1, -1, -1), C.color_pair(1)
|
||||
_, INVERTED = C.init_pair(2, -1, C.COLOR_BLACK), C.color_pair(2)
|
||||
_, HIGHLIGHTED = C.init_pair(3, C.COLOR_BLACK, C.COLOR_YELLOW), C.color_pair(3)
|
||||
_, RED = C.init_pair(4, C.COLOR_RED, -1), C.color_pair(4) | C.A_BOLD
|
||||
|
||||
stack_names = {}
|
||||
stack_locations = {}
|
||||
max_filename = 0
|
||||
stack_min, stack_max = callstack_range!
|
||||
for i=stack_min,stack_max
|
||||
info = debug.getinfo(i)
|
||||
if not info then break
|
||||
table.insert(stack_names, info.name or "???")
|
||||
filename = info.short_src..":"..info.currentline
|
||||
table.insert(stack_locations, filename)
|
||||
max_filename = math.max(max_filename, #filename)
|
||||
callstack = {}
|
||||
for i=1,#stack_names do
|
||||
callstack[i] = stack_locations[i]..(" ")\rep(max_filename-#stack_locations[i]).." | "..stack_names[i].." "
|
||||
|
||||
err_pad = Pad(0,0,AUTO,SCREEN_W)
|
||||
err_pad._pad\attrset(RED)
|
||||
err_msg_lines = {}
|
||||
for line in err_msg\gmatch("[^\n]*")
|
||||
buff = ""
|
||||
for word in line\gmatch("%S%S*%s*")
|
||||
if #buff + #word > SCREEN_W - 4
|
||||
table.insert(err_msg_lines, " "..buff)
|
||||
buff = word
|
||||
else
|
||||
buff = buff .. word
|
||||
table.insert(err_msg_lines, " "..buff)
|
||||
err_pad\set_lines(err_msg_lines, setmetatable({}, __index:->RED))
|
||||
|
||||
stack_pad = Pad(err_pad.height,0,AUTO,50)
|
||||
stack_pad\set_lines(callstack)
|
||||
var_names = Pad(err_pad.height,stack_pad.x+stack_pad.width,10,AUTO)
|
||||
var_values = Pad(err_pad.height,var_names.x+var_names.width,10,AUTO)
|
||||
|
||||
stack_pad.on_resize = =>
|
||||
var_names\erase!
|
||||
var_names.x = self.x+self.width
|
||||
var_names\refresh!
|
||||
var_names\on_resize(var_names.height, var_names.width)
|
||||
|
||||
var_names.on_resize = =>
|
||||
var_values\erase!
|
||||
var_values.x = self.x+self.width
|
||||
var_values.width = SCREEN_W - (self.x+self.width)
|
||||
var_values\refresh!
|
||||
|
||||
stack_pad.on_select = (i)=>
|
||||
var_names\clear!
|
||||
var_values\clear!
|
||||
callstack_min, _ = callstack_range!
|
||||
_var_names, _var_values = {}, {}
|
||||
for loc=1,999
|
||||
name, value = debug.getlocal(callstack_min+i-1, loc)
|
||||
if value == nil then break
|
||||
table.insert(_var_names, tostring(name))
|
||||
if type(value) == 'function'
|
||||
info = debug.getinfo(value, 'nS')
|
||||
--var_values\add_line(("function: %s @ %s:%s")\format(info.name or '???', info.short_src, info.linedefined))
|
||||
table.insert(_var_values, repr(info))
|
||||
else
|
||||
table.insert(_var_values, repr(value))
|
||||
var_names\set_lines(_var_names)
|
||||
var_values\set_lines(_var_values)
|
||||
|
||||
stack_pad\select(initial_index)
|
||||
|
||||
while true
|
||||
C.doupdate!
|
||||
c = stdscr\getch!
|
||||
old_index = index
|
||||
if ({[C.KEY_DOWN]:1, [C.KEY_SF]:1, [("j")\byte!]:1})[c]
|
||||
stack_pad\scroll(1)
|
||||
elseif ({[C.KEY_UP]:1, [C.KEY_SR]:1, [("k")\byte!]:1})[c]
|
||||
stack_pad\scroll(-1)
|
||||
elseif c == ('n')\byte!
|
||||
var_names.offset = var_names.offset + 1
|
||||
var_names\refresh!
|
||||
--var_names\scroll(1)
|
||||
elseif c == ('m')\byte!
|
||||
var_names.offset = var_names.offset - 1
|
||||
var_names\refresh!
|
||||
--var_names\scroll(-1)
|
||||
elseif c == ('J')\byte!
|
||||
stack_pad\scroll(10)
|
||||
elseif c == ('K')\byte!
|
||||
stack_pad\scroll(-10)
|
||||
elseif c == ('o')\byte!
|
||||
file = stack_locations[stack_pad.selected]
|
||||
filename,line_no = file\match("([^:]*):(.*)")
|
||||
-- Launch system editor and then redraw everything
|
||||
C.endwin!
|
||||
os.execute((os.getenv("EDITOR") or "nano").." +"..line_no.." "..filename)
|
||||
initial_index = stack_pad.selected
|
||||
-- TODO: improve this
|
||||
return run_debugger(err_msg)
|
||||
|
||||
if c == ('q')\byte! or c == ("Q")\byte!
|
||||
break
|
||||
|
||||
C.endwin!
|
||||
return
|
||||
|
||||
cursed = (fn, ...)->
|
||||
-- To display Lua errors, we must close curses to return to
|
||||
-- normal terminal mode, and then write the error to stdout.
|
||||
err_hand = (err)->
|
||||
C.endwin!
|
||||
print "Caught an error:"
|
||||
print(debug.traceback(err, 2))
|
||||
os.exit(2)
|
||||
|
||||
return xpcall(fn, ((err_msg)-> xpcall(run_debugger, err_hand, err_msg)), ...)
|
||||
|
||||
return cursed
|
||||
179
cursey.lua
179
cursey.lua
@ -1,6 +1,8 @@
|
||||
local curses = require "curses"
|
||||
local C = require "curses"
|
||||
local repr = require 'repr'
|
||||
local REGULAR, INVERTED, HIGHLIGHTED, RED
|
||||
local run_debugger, cursey
|
||||
local AUTO = -1
|
||||
|
||||
-- Return the callstack index of the code that actually caused an error and the max index
|
||||
local function callstack_range()
|
||||
@ -43,104 +45,120 @@ local Pad = setmetatable({
|
||||
self.selected = i
|
||||
|
||||
if self.selected then
|
||||
if self.offset + self.height-5 < self.selected then
|
||||
self.offset = math.min(self.selected - (self.height-5), #self.lines-self.height)
|
||||
elseif self.offset + 5 > self.selected then
|
||||
self.offset = self.selected - 5
|
||||
if self.offset + self.height-1 < self.selected then
|
||||
self.offset = math.min(self.selected - (self.height-1), #self.lines-self.height)
|
||||
elseif self.offset + 1 > self.selected then
|
||||
self.offset = self.selected - 1
|
||||
end
|
||||
end
|
||||
self:refresh()
|
||||
if self.on_select then self:on_select(self.selected) end
|
||||
end,
|
||||
refresh = function(self)
|
||||
self._pad:border(curses.ACS_VLINE, curses.ACS_VLINE,
|
||||
curses.ACS_HLINE, curses.ACS_HLINE,
|
||||
curses.ACS_ULCORNER, curses.ACS_URCORNER,
|
||||
curses.ACS_LLCORNER, curses.ACS_LRCORNER)
|
||||
self._pad:pnoutrefresh(self.offset,0,self.y,self.x,self.height+self.y,self.width+self.x)
|
||||
self._pad:border(C.ACS_VLINE, C.ACS_VLINE,
|
||||
C.ACS_HLINE, C.ACS_HLINE,
|
||||
C.ACS_ULCORNER, C.ACS_URCORNER,
|
||||
C.ACS_LLCORNER, C.ACS_LRCORNER)
|
||||
self._pad:pnoutrefresh(self.offset,0,self.y,self.x,self.y+self.height,self.x+self.width)
|
||||
end,
|
||||
add_line = function(self, line, attr)
|
||||
self.height = self.height + 1
|
||||
self._pad:resize(self.height, self.width)
|
||||
self:erase()
|
||||
self._height = 2 + #self.lines + 1
|
||||
if self.resize_height then
|
||||
self.height = self._height
|
||||
end
|
||||
self._width = math.max(self._width, #line+2)
|
||||
if self.resize_width then
|
||||
self.width = self._width
|
||||
end
|
||||
table.insert(self.lines, line)
|
||||
local i = #self.lines
|
||||
local chstr = curses.new_chstr(self.width-2)
|
||||
local chstr = C.new_chstr(self.width-2)
|
||||
attr = attr or (i % 2 == 0 and INVERTED or REGULAR)
|
||||
self.chstrs[i] = chstr
|
||||
chstr:set_str(0, line, attr)
|
||||
chstr:set_str(#line+0, ' ', attr, chstr:len()-#line)
|
||||
self._pad:mvaddchstr(i-1+1,0+1,chstr)
|
||||
self._pad:resize(self._height, self._width)
|
||||
if self.on_resize then self:on_resize() end
|
||||
end,
|
||||
add_lines = function(self, lines)
|
||||
for i,line in ipairs(lines) do
|
||||
self:add_line(line)
|
||||
end
|
||||
end,
|
||||
clear = function(self)
|
||||
erase = function(self)
|
||||
self._pad:erase()
|
||||
self._pad:pnoutrefresh(self.offset,0,self.y,self.x,self.height+self.y,self.width+self.x)
|
||||
self._pad:pnoutrefresh(self.offset,0,self.y,self.x,self.y+self.height,self.x+self.width)
|
||||
end,
|
||||
clear = function(self)
|
||||
self:erase()
|
||||
self.lines = {}
|
||||
self.chstrs = {}
|
||||
self.height = 2
|
||||
self._height = 2
|
||||
if self.resize_height then
|
||||
self.height = self._height
|
||||
end
|
||||
self._width = 2
|
||||
if self.resize_width then
|
||||
self.width = self._width
|
||||
end
|
||||
self._pad:resize(self._height, self._width)
|
||||
self.selected = nil
|
||||
self.offset = 0
|
||||
self._pad:resize(self.height, self.width)
|
||||
self:refresh()
|
||||
end,
|
||||
scroll = function(self, delta)
|
||||
self:select(self.selected + delta)
|
||||
self:select(self.selected and (self.selected + delta) or 1)
|
||||
end,
|
||||
}, {
|
||||
__call = function(Pad, y, x, height, width)
|
||||
local pad = setmetatable({
|
||||
x = x, y = y, width = width, height = height, offset = 0, selected = nil,
|
||||
x = x, y = y, width = width, height = height,
|
||||
offset = 0, selected = nil,
|
||||
chstrs = {}, lines = {},
|
||||
}, Pad)
|
||||
if height == AUTO then
|
||||
pad.resize_height = true
|
||||
pad.height = 2
|
||||
end
|
||||
if width == AUTO then
|
||||
pad.resize_width = true
|
||||
pad.width = 2
|
||||
end
|
||||
pad._height = pad.height
|
||||
pad._width = pad.width
|
||||
|
||||
pad._pad = curses.newpad(pad.height, pad.width)
|
||||
pad._pad = C.newpad(pad.height, pad.width)
|
||||
pad._pad:scrollok(true)
|
||||
return pad
|
||||
end,
|
||||
})
|
||||
Pad.__index = Pad
|
||||
|
||||
local function make_pad(y,x,lines)
|
||||
local width = 0
|
||||
for _, v in ipairs(lines) do width = math.max(width, #v) end
|
||||
local pad = setmetatable({
|
||||
x = x, y = y, width = width + 2, height = 2, offset = 0, selected = nil,
|
||||
chstrs = {}, lines = {},
|
||||
}, {__index=pad_methods})
|
||||
|
||||
pad._pad = curses.newpad(pad.height, pad.width)
|
||||
pad._pad:scrollok(true)
|
||||
for i, line in ipairs(lines) do
|
||||
pad:add_line(line)
|
||||
end
|
||||
return pad
|
||||
end
|
||||
|
||||
run_debugger = function(err_msg)
|
||||
local stdscr = curses.initscr()
|
||||
local initial_index = 1
|
||||
::restart::
|
||||
local stdscr = C.initscr()
|
||||
local SCREEN_H, SCREEN_W = stdscr:getmaxyx()
|
||||
|
||||
curses.cbreak()
|
||||
curses.echo(false) -- not noecho !
|
||||
curses.nl(false) -- not nonl !
|
||||
curses.curs_set(0)
|
||||
curses.start_color()
|
||||
curses.use_default_colors()
|
||||
|
||||
local _
|
||||
_, REGULAR = curses.init_pair(1, -1, -1), curses.color_pair(1)
|
||||
_, INVERTED = curses.init_pair(2, -1, curses.COLOR_BLACK), curses.color_pair(2)
|
||||
_, HIGHLIGHTED = curses.init_pair(3, curses.COLOR_BLACK, curses.COLOR_YELLOW), curses.color_pair(3)
|
||||
_, RED = curses.init_pair(4, curses.COLOR_RED, -1), curses.color_pair(4) | curses.A_BOLD
|
||||
C.cbreak()
|
||||
C.echo(false)
|
||||
C.nl(false)
|
||||
C.curs_set(0)
|
||||
C.start_color()
|
||||
C.use_default_colors()
|
||||
|
||||
stdscr:clear()
|
||||
stdscr:refresh()
|
||||
stdscr:keypad(true)
|
||||
|
||||
local _
|
||||
_, REGULAR = C.init_pair(1, -1, -1), C.color_pair(1)
|
||||
_, INVERTED = C.init_pair(2, -1, C.COLOR_BLACK), C.color_pair(2)
|
||||
_, HIGHLIGHTED = C.init_pair(3, C.COLOR_BLACK, C.COLOR_YELLOW), C.color_pair(3)
|
||||
_, RED = C.init_pair(4, C.COLOR_RED, -1), C.color_pair(4) | C.A_BOLD
|
||||
|
||||
local stack_names = {}
|
||||
local stack_locations = {}
|
||||
local max_filename = 0
|
||||
@ -158,7 +176,7 @@ run_debugger = function(err_msg)
|
||||
callstack[i] = stack_locations[i]..(" "):rep(max_filename-#stack_locations[i]).." | "..stack_names[i].." "
|
||||
end
|
||||
|
||||
local err_pad = Pad(0,0,2,SCREEN_W)
|
||||
local err_pad = Pad(0,0,AUTO,SCREEN_W)
|
||||
err_pad._pad:attrset(RED)
|
||||
for line in err_msg:gmatch("[^\n]*") do
|
||||
local buff = ""
|
||||
@ -174,10 +192,22 @@ run_debugger = function(err_msg)
|
||||
end
|
||||
err_pad:refresh()
|
||||
|
||||
local stack_pad = Pad(err_pad.height,0,2,50)
|
||||
local stack_pad = Pad(err_pad.height,0,AUTO,50)
|
||||
stack_pad:add_lines(callstack)
|
||||
local var_names = Pad(err_pad.height,stack_pad.x+stack_pad.width,2,25)
|
||||
local var_values = Pad(err_pad.height,var_names.x+var_names.width,2,SCREEN_W-(var_names.x+var_names.width))
|
||||
local var_names = Pad(err_pad.height,stack_pad.x+stack_pad.width,10,AUTO)
|
||||
local var_values = Pad(err_pad.height,var_names.x+var_names.width,10,AUTO)
|
||||
function stack_pad:on_resize()
|
||||
var_names:erase()
|
||||
var_names.x = self.x+self.width
|
||||
var_names:refresh()
|
||||
var_names:on_resize(var_names.height, var_names.width)
|
||||
end
|
||||
function var_names:on_resize()
|
||||
var_values:erase()
|
||||
var_values.x = self.x+self.width
|
||||
var_values.width = SCREEN_W - (self.x+self.width)
|
||||
var_values:refresh()
|
||||
end
|
||||
|
||||
function stack_pad:on_select(i)
|
||||
var_names:clear()
|
||||
@ -187,40 +217,61 @@ run_debugger = function(err_msg)
|
||||
local name, value = debug.getlocal(callstack_min+i-1, loc)
|
||||
if value == nil then break end
|
||||
var_names:add_line(tostring(name))
|
||||
var_values:add_line(tostring(value))
|
||||
if type(value) == 'function' then
|
||||
local info = debug.getinfo(value, 'nS')
|
||||
--var_values:add_line(("function: %s @ %s:%s"):format(info.name or '???', info.short_src, info.linedefined))
|
||||
var_values:add_line(repr(info))
|
||||
else
|
||||
var_values:add_line(repr(value))
|
||||
end
|
||||
end
|
||||
var_names:refresh()
|
||||
var_values:refresh()
|
||||
end
|
||||
stack_pad:select(1)
|
||||
stack_pad:select(initial_index)
|
||||
|
||||
while true do
|
||||
curses.doupdate()
|
||||
C.doupdate()
|
||||
local c = stdscr:getch()
|
||||
if c < 256 then c = string.char(c) end
|
||||
local old_index = index
|
||||
if ({[curses.KEY_DOWN]=1, [curses.KEY_SF]=1, j=1})[c] then
|
||||
if ({[C.KEY_DOWN]=1, [C.KEY_SF]=1, [("j"):byte()]=1})[c] then
|
||||
stack_pad:scroll(1)
|
||||
elseif ({[curses.KEY_UP]=1, [curses.KEY_SR]=1, k=1})[c] then
|
||||
elseif ({[C.KEY_UP]=1, [C.KEY_SR]=1, [("k"):byte()]=1})[c] then
|
||||
stack_pad:scroll(-1)
|
||||
elseif c == 'J' then
|
||||
elseif c == ('n'):byte() then
|
||||
var_names.offset = var_names.offset + 1
|
||||
var_names:refresh()
|
||||
--var_names:scroll(1)
|
||||
elseif c == ('m'):byte() then
|
||||
var_names.offset = var_names.offset - 1
|
||||
var_names:refresh()
|
||||
--var_names:scroll(-1)
|
||||
elseif c == ('J'):byte() then
|
||||
stack_pad:scroll(10)
|
||||
elseif c == 'K' then
|
||||
elseif c == ('K'):byte() then
|
||||
stack_pad:scroll(-10)
|
||||
elseif c == ('o'):byte() then
|
||||
local file = stack_locations[stack_pad.selected]
|
||||
local filename,line_no = file:match("([^:]*):(.*)")
|
||||
-- Launch system editor and then redraw everything
|
||||
C.endwin()
|
||||
os.execute((os.getenv("EDITOR") or "nano").." +"..line_no.." "..filename)
|
||||
initial_index = stack_pad.selected
|
||||
goto restart
|
||||
end
|
||||
|
||||
if c == 'q' or c == "Q" then
|
||||
if c == ('q'):byte() or c == ("Q"):byte() then
|
||||
break
|
||||
end
|
||||
end
|
||||
curses.endwin()
|
||||
C.endwin()
|
||||
end
|
||||
|
||||
cursey = function(fn, ...)
|
||||
-- To display Lua errors, we must close curses to return to
|
||||
-- normal terminal mode, and then write the error to stdout.
|
||||
local function err(err)
|
||||
curses.endwin()
|
||||
C.endwin()
|
||||
print "Caught an error:"
|
||||
print(debug.traceback(err, 2))
|
||||
os.exit(2)
|
||||
|
||||
Loading…
Reference in New Issue
Block a user