From 25cadaa9fedd489f95217f8a250f77f9794aab4a Mon Sep 17 00:00:00 2001 From: Simon Marchetto Date: Fri, 21 Mar 2014 11:25:28 +0100 Subject: [PATCH] scilab: implement primitive_ref test --- .../test-suite/scilab/primitive_ref_runme.sci | 24 +++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100644 Examples/test-suite/scilab/primitive_ref_runme.sci diff --git a/Examples/test-suite/scilab/primitive_ref_runme.sci b/Examples/test-suite/scilab/primitive_ref_runme.sci new file mode 100644 index 000000000..87d97d468 --- /dev/null +++ b/Examples/test-suite/scilab/primitive_ref_runme.sci @@ -0,0 +1,24 @@ +exec("swigtest.start", -1); + +checkequal(ref_int(3), 3, "ref_int() test fails."); +checkequal(ref_uint(uint32(3)), uint32(3), "ref_uint() test fails."); + +checkequal(ref_short(3), 3, "ref_short() test fails."); +checkequal(ref_ushort(uint16(3)), uint16(3), "ref_ushort() test fails."); + +checkequal(ref_long(3), 3, "ref_long() test fails."); +checkequal(ref_ulong(uint32(3)), uint32(3), "ref_ulong() test fails."); + +checkequal(ref_schar(3), 3, "ref_schar() test fails."); +checkequal(ref_uchar(uint8(3)), uint8(3), "ref_uchar() test fails."); + +checkequal(ref_float(3), 3, "ref_float() test fails."); +checkequal(ref_double(3), 3, "ref_double() test fails."); + +checkequal(ref_bool(%T), %T, "ref_bool() test fails."); + +checkequal(ref_char('x'), 'x', "ref_char() test fails."); + +checkequal(ref_over(0), 0, "ref_over() test fails."); + +exec("swigtest.quit", -1);