packedpcall.lua

local function test(f)
	local function pack2end(a1, ...)
		return a1, {...}
	end
	local ok, t_result = pack2end(pcall(f))
	if not ok then
		return("error="..t_result[1] )
	else
		return("ok="..#t_result )
	end
end

assert(
	test(function() return 1, 2, 3 end) == "ok=3"
)
assert( string.find(
	test(function() error("raise an error") end),
	"^error=.*raise an error$" )
)
print("OK")