delete an ancient, unused file

[?]
May 15, 2022, 9:38 PM
T4FRZSYLUWDA4K3URU4MI33EGD4XWSM7FPSIRNMAEYQAFEDFGPZAC

Dependencies

Change contents

  • file deletion: mu.lua (----------)
    [3.2][3.111:141](),[3.141][3.4:4]()
    curses = require 'curses'
    local stdscr = curses.initscr()
    stdscr:clear()
    curses.endwin()
    stdscr:scrollok(true)
    local function readline()
    local result = ''
    while true do
    local x = stdscr:getch()
    stdscr:addch(x)
    local c = string.char(x)
    result = result .. c
    if c == '\n' then break end
    end
    return result
    end
    local new_expr = true
    local buf = ''
    while true do
    if new_expr then
    stdscr:addstr('> ')
    else
    stdscr:addstr('>> ')
    end
    buf = buf .. readline()
    if f then
    buf = ''
    new_expr = true
    else
    buf = ''
    new_expr = true
    else
    if string.match(err, "'<eof>'$") or string.match(err, "<eof>$") then
    buf = buf .. '\n'
    new_expr = false
    else
    buf = ''
    new_expr = true
    end
    stdscr:addstr(err..'\n')
    end
    end
    end
    eval_print(f)
    local f, err = load(buf, 'REPL')
    if f then
    eval_print(f)
    local f = load('return '..buf, 'REPL')
    -- print value of expression the way Lua 5.3 does it: by prepending 'return' to the line
    -- based on https://github.com/hoelzro/lua-repl
    function eval_print(f)
    local success, results = gather_results(xpcall(f, function(...) return debug.traceback() end))
    if success then
    for i, result in ipairs(results) do
    if i > 1 then
    stdscr:addch('\t')
    end
    stdscr:addstr(tostring(result))
    end
    else
    stdscr:addstr(tostring(result[1]))
    end
    stdscr:addch('\n')
    end
    end
    local function gather_results(success, ...)
    local n = select('#', ...)
    return success, { n = n, ... }
    curses.echo(false) -- unclear why implicit echo can't handle newlines, regardless of stdscr:nl()