mirror of
https://github.com/gvx/Ser.git
synced 2024-10-11 21:14:16 +00:00
0c42f20f63
Thanks to Ivan (2DEngine.com), who wrote this and convinced me it was a good idea. This change in writing tables results in up to 20% faster serialization in common cases, and doesn't significantly affect performance in contrived cases.
73 lines
1.9 KiB
Lua
73 lines
1.9 KiB
Lua
local serialize = require 'ser'
|
|
|
|
local succeeded = 0
|
|
local failed = 0
|
|
|
|
function case(input, expected, message)
|
|
local output = serialize(input)
|
|
if output == expected then
|
|
succeeded = succeeded + 1
|
|
else
|
|
print('test failed: ' .. message)
|
|
print('expected:')
|
|
print(expected)
|
|
print('got:')
|
|
print(output)
|
|
failed = failed + 1
|
|
end
|
|
end
|
|
|
|
function case_error(input, expected, message)
|
|
local success, err = pcall(serialize, input)
|
|
if not success and err == expected then
|
|
succeeded = succeeded + 1
|
|
else
|
|
print('test failed: ' .. message)
|
|
print('expected error:')
|
|
print(expected)
|
|
print('got:')
|
|
print(success, err)
|
|
failed = failed + 1
|
|
end
|
|
end
|
|
|
|
case({}, 'return {}', 'empty table')
|
|
|
|
case({true}, 'return {true}', 'simple table')
|
|
|
|
case({{}}, [[
|
|
local _={}
|
|
_[1]={}
|
|
return {_[1]}]], 'empty table within a table')
|
|
|
|
local _t = {}
|
|
_t.self = _t
|
|
case(_t, [=[local _={}
|
|
_[0]={}
|
|
_[0].self=_[0]
|
|
return _[0]]=], 'simple cycle')
|
|
|
|
case_error({coroutine.create(function()end)}, './ser.lua:29: Trying to serialize unsupported type thread', 'unsupported type')
|
|
|
|
case({"a", foo = "bar", ["3f"] = true, _1 = false, ["00"] = 9}, 'return {"a",["3f"]=true,_1=false,["00"]=9,foo="bar"}', 'various')
|
|
|
|
case({'\127\230\255\254\128\12\0128\n\31'}, 'return {"\\127\\230\\255\\254\\128\\12\\0128\\n\\31"}', 'non-ASCII or control characters in string value')
|
|
|
|
case({['\127\230\255\254\128\12\0128\n\31'] = '\0'}, 'return {["\\127\\230\\255\\254\\128\\12\\0128\\n\\31"]="\\0"}', 'non-ASCII or control characters in string key')
|
|
|
|
local x = {}
|
|
case({x, {x}, x}, [=[
|
|
local _={}
|
|
_[2]={nil}
|
|
_[1]={}
|
|
_[0]={_[1],_[2],_[1]}
|
|
_[2][1]=_[1]
|
|
return _[0]]=], 'repeated table')
|
|
|
|
case({['end'] = true, ['false'] = false}, 'return {["false"]=false,["end"]=true}', 'keywords as table keys')
|
|
|
|
case({1/0, -1/0, 0/0}, 'return {1/0,-1/0,0/0}', 'representation of infinity and NaN')
|
|
|
|
print(failed .. ' tests failed')
|
|
print(succeeded .. ' tests succeeded')
|