1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
--- lam.pp
local pp = {}
function pp.dump (x, lvl)
lvl = lvl or 0
local space = string.rep(" ", lvl)
local output = ""
if type(x) == "table" then
local subo = ""
for k,v in pairs(x) do
if v == x then
v = "self"
else
v = pp.dump(v, lvl+2)
end
subo = subo .. string.format("\n%s[%s] = %s,",
(space.." "), k, v)
end
output = output .. string.format("\n%s{%s\n%s}",
space, subo, space)
else
output = output .. string.format("%s", x)
end
return output
end
function pp.pp (x)
print(pp.dump(x))
end
return setmetatable(pp, { __call =
function(_, x)
return pp.pp(x)
end,
})
|