1 files changed, 26 insertions, 0 deletions

diff --git a/tests/agentzh.t b/tests/agentzh.t
index 2e7c8ce..552630a 100644
--- a/tests/agentzh.t
+++ b/tests/agentzh.t
@@ -306,3 +306,29 @@ print(b)
 {"test":"http:\/\/google.com\/google"}
 {"test":"http://google.com/google"}
 {"test":"http:\/\/google.com\/google"}
+
+
+
+=== TEST 22: disable error on invalid type
+--- lua
+local cjson = require "cjson"
+local f = function (x) return 2*x end
+local res, err = pcall(cjson.encode, f)
+print(err)
+local t = {f = f, valid = "valid"}
+local res, err = pcall(cjson.encode, t)
+print(err)
+local arr = {"one", "two", f, "three"}
+local res, err = pcall(cjson.encode, arr)
+print(err)
+cjson.encode_skip_unsupported_value_types(true)
+print(cjson.encode(f))
+print(cjson.encode(t))
+print(cjson.encode(arr))
+--- out
+Cannot serialise function: type not supported
+Cannot serialise function: type not supported
+Cannot serialise function: type not supported
+
+{"valid":"valid"}
+["one","two","three"]