First version for this test but needs improvements
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/branches/gsoc2009-sploving@12551 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
5cd249c330
commit
6a4221ce6d
1 changed files with 17 additions and 0 deletions
17
Examples/test-suite/scilab/apply_signed_char_runme.sci
Normal file
17
Examples/test-suite/scilab/apply_signed_char_runme.sci
Normal file
|
|
@ -0,0 +1,17 @@
|
||||||
|
exec("swigtest.start", -1);
|
||||||
|
|
||||||
|
smallnum = -127;
|
||||||
|
if CharValFunction(smallnum) <> smallnum then swigtesterror(); end
|
||||||
|
if CCharValFunction(smallnum) <> smallnum then swigtesterror(); end
|
||||||
|
if CCharRefFunction(smallnum) <> smallnum then swigtesterror(); end
|
||||||
|
|
||||||
|
try
|
||||||
|
globalchar_set(smallnum);
|
||||||
|
catch
|
||||||
|
swigtesterror();
|
||||||
|
end
|
||||||
|
if globalchar_get() <> smallnum then swigtesterror(); end
|
||||||
|
|
||||||
|
if globalconstchar_get() <> -110 then swigtesterror(); end
|
||||||
|
|
||||||
|
exec("swigtest.quit", -1);
|
||||||
Loading…
Add table
Add a link
Reference in a new issue