Bruce/nomsu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Better repr.

Browse Source
This commit is contained in:
Bruce Hill 2018-03-22 13:56:31 -07:00
parent 972de38421
commit 9109a090eb
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
utils.lua
View File

@ -30,6 +30,8 @@ local max = math.max
local _quote_patt = re.compile("(({'\n' / '\"' / \"'\" / '\\'}->mark_char) / (']' ({'='*}->mark_eq) (']' / !.)) / .)*", local _quote_patt = re.compile("(({'\n' / '\"' / \"'\" / '\\'}->mark_char) / (']' ({'='*}->mark_eq) (']' / !.)) / .)*",
{mark_char=function(q) {mark_char=function(q)
if q == "\n" or q == "\\" then if q == "\n" or q == "\\" then
_quote_state["'"] = false
_quote_state['"'] = false
if _quote_state.min_eq == nil then if _quote_state.min_eq == nil then
_quote_state.min_eq = 0 _quote_state.min_eq = 0
end end
@ -74,9 +76,9 @@ local function repr(x, depth)
end end
_quote_state = {} _quote_state = {}
_quote_patt:match(x) _quote_patt:match(x)
if _quote_state["'"] ~= false and _quote_state.min_eq == nil then if _quote_state["'"] ~= false then
return "\'" .. x .. "\'" return "\'" .. x .. "\'"
elseif _quote_state['"'] ~= false and _quote_state.min_eq == nil then elseif _quote_state['"'] ~= false then
return "\"" .. x .. "\"" return "\"" .. x .. "\""
else else
local eq = ("="):rep(_quote_state.min_eq or 0) local eq = ("="):rep(_quote_state.min_eq or 0)