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

scilab: move integer error tests in integers test

Browse source
This commit is contained in:
Simon Marchetto 2014-02-07 15:42:58 +01:00
commit 67aba0bfc2
2 changed files with 29 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

29
Examples/test-suite/scilab/integers_runme.sci Normal file
View file

@ -0,0 +1,29 @@
exec("swigtest.start", -1);
// Negative values
if signed_char_identity(-1) <> -1 then swigtesterror(); end
if signed_short_identity(-1) <> -1 then swigtesterror(); end
if signed_int_identity(-1) <> -1 then swigtesterror(); end
if signed_long_identity(-1) <> -1 then swigtesterror(); end
// Overflow errors
ierr = execstr('signed_char_identity(2^8)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('signed_short_identity(2^16)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('signed_int_identity(2^32)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('signed_long_identity(2^64)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
// Value errors
ierr = execstr('signed_char_identity(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('signed_short_identity(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('signed_int_identity(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('signed_long_identity(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
exec("swigtest.quit", -1);

18
Examples/test-suite/scilab/primitive_types_runme.sci
View file

@ -58,23 +58,5 @@ if (ref_bool(%t) <> %t) then swigtesterror(); end
//if (ref_ullong(42) <> 42) then swigtesterror(); end
//if (ref_ullong(uint64(42)) <> uint64(42)) then swigtesterror(); end
// check errors
ierr = execstr('val_schar(2^9)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_schar(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_short(2^17)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_short(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_int(2^33)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_int(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_long(2^65)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
ierr = execstr('val_long(100.2)', 'errcatch');
if ierr <> 999 then swigtesterror(); end
exec("swigtest.quit", -1);