From b6eaee8d1219619113f715a7ee35644bfd557f34 Mon Sep 17 00:00:00 2001 From: Erez Geva Date: Tue, 2 May 2023 19:07:43 +0200 Subject: Add li_constraints test, testing 'constraints.i'. For: JavaScript, C#, go, Java, Lua, Perl, PHP, python, Ruby, TCL and Octave. Signed-off-by: Erez Geva --- Examples/test-suite/lua/li_constraints_runme.lua | 40 ++++++++++++++++++++++++ 1 file changed, 40 insertions(+) create mode 100644 Examples/test-suite/lua/li_constraints_runme.lua (limited to 'Examples/test-suite/lua/li_constraints_runme.lua') diff --git a/Examples/test-suite/lua/li_constraints_runme.lua b/Examples/test-suite/lua/li_constraints_runme.lua new file mode 100644 index 000000000..c7577c2ac --- /dev/null +++ b/Examples/test-suite/lua/li_constraints_runme.lua @@ -0,0 +1,40 @@ +require('import') -- the import fn +import('li_constraints') -- import lib into global +cn=li_constraints --alias + +function check_func(except, f, val, name) + actual, err = pcall(f, val); + assert(actual == except, 'function perform exception wrongly'); + if name == nil then + r = 'SWIG_ValueError:Received a NULL pointer.'; + else + r = 'SWIG_ValueError:Expected a ' .. name .. ' value.'; + end + if not actual then + assert(err == r, 'function perform the wrong exception'); + end +end + +check_func(true, cn.test_nonnegative, 10, 'non-negative'); +check_func(true, cn.test_nonnegative, 0, 'non-negative'); +check_func(false, cn.test_nonnegative, -10, 'non-negative'); + +check_func(false, cn.test_nonpositive, 10, 'non-positive'); +check_func(true, cn.test_nonpositive, 0, 'non-positive'); +check_func(true, cn.test_nonpositive, -10, 'non-positive'); + +check_func(true, cn.test_positive, 10, 'positive'); +check_func(false, cn.test_positive, 0, 'positive'); +check_func(false, cn.test_positive, -10, 'positive'); + +check_func(false, cn.test_negative, 10, 'negative'); +check_func(false, cn.test_negative, 0, 'negative'); +check_func(true, cn.test_negative, -10, 'negative'); + +check_func(true, cn.test_nonzero, 10, 'nonzero'); +check_func(false, cn.test_nonzero, 0, 'nonzero'); +check_func(true, cn.test_nonzero, -10, 'nonzero'); + +check_func(false, cn.test_nonnull, nil); +nonnull = cn.get_nonnull(); +check_func(true, cn.test_nonnull, nonnull); -- cgit v1.2.1