jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

scilab: add tests in arrays_global test

Browse source
This commit is contained in:
Simon Marchetto 2014-03-04 18:17:37 +01:00
commit 3b21f52620
1 changed files with 29 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

29
Examples/test-suite/scilab/arrays_global_runme.sci
View file

@ -1,5 +1,34 @@
exec("swigtest.start", -1);
function testArray(arrayName, arraySetFunc, arrayGetFunc, values)
try
arraySetFunc(values);
catch
swigtesterror("error in " + arrayName + "_set()");
end
try
if arrayGetFunc() <> values then
swigtesterror("wrong values returned from " + arrayName + "_get()");
end
catch
swigtesterror("error in " + arrayName + "_get()");
end
endfunction
// TODO: fix error in array_c_set
//testArray("array_c", array_c_set, array_c_get, ['a', 'b']);
testArray("array_sc", array_sc_set, array_sc_get, int8([-10, 20]));
testArray("array_s", array_s_set, array_s_get, int16([-10, 20]));
testArray("array_us", array_us_set, array_us_get, uint16([10, 20]));
testArray("array_i", array_i_set, array_i_get, int32([-10, 20]));
testArray("array_ui", array_ui_set, array_ui_get, uint32([10, 20]));
testArray("array_l", array_l_set, array_l_get, int32([-10, 20]));
testArray("array_ul", array_ul_set, array_ul_get, uint32([10, 20]));
//testArray("array_ll", array_l_set, array_ll_get, int32([-10, 20]));
testArray("array_f", array_f_set, array_f_get, [-10.5, 20.4]);
testArray("array_d", array_d_set, array_d_get, [-10.5, 20.4]);
if array_const_i_get() <> [10, 20] then swigtesterror(); end
if BeginString_FIX44a_get() <> "FIX.a.a" then swigtesterror(); end