library-mirrors/inspect.lua
1
0
Fork 0
mirror of https://github.com/kikito/inspect.lua.git synced 2024-12-15 14:34:21 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

alternative implementation to fix problem with Lua 5.1

Browse Source
This commit is contained in:
Andreas Hofer 2016-03-31 21:22:23 +02:00
parent 2a5205e53c
commit ef3ae6b2d7
1 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
inspect.lua
View File

@ -41,17 +41,22 @@ local function smartQuote(str)
end
local controlCharsTranslation = {
["\\7"] = "\\a", ["\\007"] = "\\a",
["\\8"] = "\\b", ["\\008"] = "\\b",
["\\12"] = "\\f", ["\\012"] = "\\f",
["\\13"] = "\\r", ["\\013"] = "\\r",
["\\9"] = "\\t", ["\\009"] = "\\t",
["\\11"] = "\\v", ["\\011"] = "\\v",
["\a"] = "\\a", ["\b"] = "\\b", ["\f"] = "\\f", ["\n"] = "\\n",
["\r"] = "\\r", ["\t"] = "\\t", ["\v"] = "\\v"
}
local controlCharsTranslationBeforeDigit = {}
for i=0, 31 do
local ch = string.char(i)
if not controlCharsTranslation[ch] then
controlCharsTranslation[ch] = "\\"..i
controlCharsTranslationBeforeDigit[ch] = string.format("\\%03d",i)
end
end
local function escape(str)
local f = string.format("%q", str)
local result = f:gsub("\\%d%d?%d?", controlCharsTranslation):gsub("\\\n", "\\n"):gsub('\\"', '"'):sub(2,-2)
local result = str:gsub("\\", "\\\\"):gsub("(%c)%f[0-9]", controlCharsTranslationBeforeDigit):gsub("(%c)", controlCharsTranslation)
return result
end