lua实现一个打印函数，打印table

　　lua实现一个打印函数，打印table
　　格式化多行输出
　　local function dumptable(a_obj)
　　local getIndent, quoteStr, wrapKey, wrapVal, dumpObj
　　getIndent = function(level)
　　return string.rep(＂	＂, level)
　　end
　　quoteStr = function(str)
　　return ＂＂＂ .. string.gsub(str, ＂＂＂, ＂＂＂) .. ＂＂＂
　　end
　　- wrapKey = function(val)
　　if type(val) == ＂number＂ then
　　return ＂[＂ .. val .. ＂]＂
　　elseif type(val) == ＂string＂ then
　　return ＂[＂ .. quoteStr(val) .. ＂]＂
　　else
　　return ＂[＂ .. tostring(val) .. ＂]＂
　　end
　　end
　　wrapVal = function(val, level)
　　if type(val) == ＂table＂ then
　　return dumpObj(val, level)
　　elseif type(val) == ＂number＂ then
　　return val
　　elseif type(val) == ＂string＂ then
　　return quoteStr(val)
　　else
　　return tostring(val)
　　end
　　end
　　dumpObj = function(obj, level)
　　if type(obj) ~= ＂table＂ then
　　return wrapVal(obj)
　　end
　　level = level + 1
　　local tokens = {}
　　tokens[#tokens + 1] = ＂{＂
　　for k, v in pairs(obj) do
　　tokens[#tokens + 1] =
　　getIndent(level) ..
　　wrapKey(k) .. ＂ = ＂ .. wrapVal(v, level) .. ＂,＂
　　end
　　tokens[#tokens + 1] = getIndent(level - 1) .. ＂}＂
　　return table.concat(tokens, ＂ ＂)
　　end
　　return dumpObj(a_obj, 0)
　　end
　　使用demo
　　local tb = {
　　a = 1,
　　b = ＂aaa＂,
　　c = {
　　c1 = 2,
　　c2 = ＂c222＂
　　}
　　}
　　print(＂tb:＂,dumptable(tb))
　　输出效果
　　tb: {
　　[＂a＂] = 1,
　　[＂c＂] = {
　　[＂c1＂] = 2,
　　[＂c2＂] = ＂c222＂,
　　},
　　[＂b＂] = ＂aaa＂,
　　}
　　单行输出
　　local function dump(a_obj)
　　local getIndent, quoteStr, wrapKey, wrapVal, dumpObj
　　getIndent = function(level)
　　--return string.rep(＂	＂, level)
　　return string.rep(＂＂, level)
　　end
　　quoteStr = function(str)
　　return ＂＂＂ .. string.gsub(str, ＂＂＂, ＂＂＂) .. ＂＂＂
　　end
　　wrapKey = function(val)
　　if type(val) == ＂number＂ then
　　return ＂[＂ .. val .. ＂]＂
　　elseif type(val) == ＂string＂ then
　　return ＂[＂ .. quoteStr(val) .. ＂]＂
　　else
　　return ＂[＂ .. tostring(val) .. ＂]＂
　　end
　　end
　　wrapVal = function(val, level)
　　if type(val) == ＂table＂ then
　　return dumpObj(val, level)
　　elseif type(val) == ＂number＂ then
　　return val
　　elseif type(val) == ＂string＂ then
　　return quoteStr(val)
　　else
　　return tostring(val)
　　end
　　end
　　dumpObj = function(obj, level)
　　if type(obj) ~= ＂table＂ then
　　return wrapVal(obj)
　　end
　　level = level + 1
　　local tokens = {}
　　tokens[#tokens + 1] = ＂{＂
　　for k, v in pairs(obj) do
　　tokens[#tokens + 1] =
　　getIndent(level) ..
　　wrapKey(k) .. ＂ = ＂ .. wrapVal(v, level) .. ＂,＂
　　end
　　tokens[#tokens + 1] = getIndent(level - 1) .. ＂}＂
　　--return table.concat(tokens, ＂ ＂)
　　return table.concat(tokens, ＂＂)
　　end
　　return dumpObj(a_obj, 0)
　　end
　　demo
　　local tb = {
　　a = 1,
　　b = ＂aaa＂,
　　c = {
　　c1 = 2,
　　c2 = ＂c222＂
　　}
　　}
　　print(＂test dump(tb):＂,dump(tb))
　　运行效果
　　test dump(tb): {[＂a＂] = 1,[＂c＂] = {[＂c1＂] = 2,[＂c2＂] = ＂c222＂,},[＂b＂] = ＂aaa＂,}