@@ -63,28 +63,28 @@ local function table_r(var, level, indent)
63
63
local t = {}
64
64
local szType = type (var )
65
65
if szType == ' nil' then
66
- insert (t , ' nil' )
66
+ table. insert (t , ' nil' )
67
67
elseif szType == ' number' then
68
- insert (t , tostring (var ))
68
+ table. insert (t , tostring (var ))
69
69
elseif szType == ' string' then
70
- insert (t , string.format (' %q' , var ))
70
+ table. insert (t , string.format (' %q' , var ))
71
71
elseif szType == ' function' then
72
72
local s = string.dump (var )
73
- insert (t , ' loadstring("' )
73
+ table. insert (t , ' loadstring("' )
74
74
-- 'string slice too long'
75
75
for i = 1 , # s , 2000 do
76
- insert (t , concat ({' ' , byte (s , i , i + 2000 - 1 )}, ' \\ ' ))
76
+ table. insert (t , table. concat ({' ' , string. byte (s , i , i + 2000 - 1 )}, ' \\ ' ))
77
77
end
78
- insert (t , ' ")' )
78
+ table. insert (t , ' ")' )
79
79
elseif szType == ' boolean' then
80
- insert (t , tostring (var ))
80
+ table. insert (t , tostring (var ))
81
81
elseif szType == ' table' then
82
- insert (t , ' {' )
82
+ table. insert (t , ' {' )
83
83
local s_tab_equ = ' ='
84
84
if indent then
85
85
s_tab_equ = ' = '
86
86
if not empty (var ) then
87
- insert (t , ' \n ' )
87
+ table. insert (t , ' \n ' )
88
88
end
89
89
end
90
90
local nohash = true
@@ -104,55 +104,55 @@ local function table_r(var, level, indent)
104
104
-- process to insert to table
105
105
if nohash then -- pure list table
106
106
if indent then
107
- insert (t , rep (indent , level + 1 ))
107
+ table. insert (t , string. rep (indent , level + 1 ))
108
108
end
109
- insert (t , table_r (val , level + 1 , indent ))
110
- insert (t , ' ,' )
109
+ table. insert (t , table_r (val , level + 1 , indent ))
110
+ table. insert (t , ' ,' )
111
111
if indent then
112
- insert (t , ' \n ' )
112
+ table. insert (t , ' \n ' )
113
113
end
114
114
elseif type (key ) == ' string' and key :find (' ^[a-zA-Z_][a-zA-Z0-9_]*$' ) then -- a = val
115
115
if indent then
116
- insert (t , rep (indent , level + 1 ))
116
+ table. insert (t , string. rep (indent , level + 1 ))
117
117
end
118
- insert (t , key )
119
- insert (t , s_tab_equ ) -- ' = '
120
- insert (t , table_r (val , level + 1 , indent ))
121
- insert (t , ' ,' )
118
+ table. insert (t , key )
119
+ table. insert (t , s_tab_equ ) -- ' = '
120
+ table. insert (t , table_r (val , level + 1 , indent ))
121
+ table. insert (t , ' ,' )
122
122
if indent then
123
- insert (t , ' \n ' )
123
+ table. insert (t , ' \n ' )
124
124
end
125
125
else -- [10010] = val -- ['.start with or contains special char'] = val
126
126
if indent then
127
- insert (t , rep (indent , level + 1 ))
127
+ table. insert (t , string. rep (indent , level + 1 ))
128
128
end
129
- insert (t , ' [' )
130
- insert (t , table_r (key , level + 1 , indent ))
131
- insert (t , ' ]' )
132
- insert (t , s_tab_equ ) -- ' = '
133
- insert (t , table_r (val , level + 1 , indent ))
134
- insert (t , ' ,' )
129
+ table. insert (t , ' [' )
130
+ table. insert (t , table_r (key , level + 1 , indent ))
131
+ table. insert (t , ' ]' )
132
+ table. insert (t , s_tab_equ ) -- ' = '
133
+ table. insert (t , table_r (val , level + 1 , indent ))
134
+ table. insert (t , ' ,' )
135
135
if indent then
136
- insert (t , ' \n ' )
136
+ table. insert (t , ' \n ' )
137
137
end
138
138
end
139
139
lastkey , lastval = key , val
140
140
end
141
141
until not key
142
142
if not empty (var ) then
143
143
if indent then -- insert `}` with indent
144
- insert (t , rep (indent , level ))
144
+ table. insert (t , string. rep (indent , level ))
145
145
else -- remove last comma when no indent
146
- remove (t )
146
+ table. remove (t )
147
147
end
148
148
end
149
- insert (t , ' }' )
149
+ table. insert (t , ' }' )
150
150
else -- if (szType == 'userdata') then
151
- insert (t , ' "' )
152
- insert (t , tostring (var ))
153
- insert (t , ' "' )
151
+ table. insert (t , ' "' )
152
+ table. insert (t , tostring (var ))
153
+ table. insert (t , ' "' )
154
154
end
155
- return concat (t )
155
+ return table. concat (t )
156
156
end
157
157
158
158
function var2str (var , indent , level )
@@ -185,7 +185,7 @@ function str2var(str, env)
185
185
if bdata then
186
186
datalist = {env .data }
187
187
else
188
- remove (datalist , 1 )
188
+ table. remove (datalist , 1 )
189
189
end
190
190
else
191
191
Log (' [CALL ERROR]str2var("' .. str .. ' "): \n ERROR:' .. datalist [2 ])
0 commit comments