blob: 855e4c192b5908084331fa069f2dd1dbfadd5165 (
plain)
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
37
38
39
40
41
42
|
-- dump global environment
function savevar (n,v)
if v == nil then return end
if type(v)=="userdata" or type(v)=="function" then return end
-- if type(v)=="userdata" or type(v)=="function" then write("\t-- ") end
write(n,"=")
if type(v) == "string" then write(format("%q",v))
elseif type(v) == "table" then
if v.__visited__ ~= nil then
write(v.__visited__)
else
write("{}\n")
v.__visited__ = n
for r,f in v do
if r ~= "__visited__" then
if type(r) == 'string' then
savevar(n.."."..r,f)
else
savevar(n.."["..r.."]",f)
end
end
end
end
else write(tostring(v)) end
write("\n")
end
function save ()
write("\n-- global environment\n")
foreach(globals(),savevar)
end
-- an example
a = 3
x = {a = 4, b = "name", l={4,5,67}}
b = {t=5}
x.next = b
save()
|
