scilab: implement preproc_constants test
This commit is contained in:
parent
27a9fe476e
commit
3780a46f39
1 changed files with 30 additions and 0 deletions
30
Examples/test-suite/scilab/preproc_constants_runme.sci
Normal file
30
Examples/test-suite/scilab/preproc_constants_runme.sci
Normal file
|
|
@ -0,0 +1,30 @@
|
|||
exec("swigtest.start", -1);
|
||||
|
||||
checkequal(CONST_INT1_get(), 10, "CONST_INT1");
|
||||
checkequal(CONST_DOUBLE3_get(), 12.3, "CONST_DOUBLE3");
|
||||
checkequal(CONST_BOOL1_get(), %T, "CONST_BOOL1");
|
||||
checkequal(CONST_CHAR_get(), 'x', "CONST_CHAR");
|
||||
checkequal(CONST_STRING1_get(), "const string", "CONST_STRING1");
|
||||
|
||||
// Test global constants can be seen within functions
|
||||
function test_global()
|
||||
global CONST_INT1
|
||||
global CONST_DOUBLE3
|
||||
global CONST_BOOL1
|
||||
global CONST_CHAR
|
||||
global CONST_STRING1
|
||||
|
||||
checkequal(CONST_INT1_get(), 10, "CONST_INT1");
|
||||
checkequal(CONST_DOUBLE3_get(), 12.3, "CONST_DOUBLE3");
|
||||
checkequal(CONST_BOOL1_get(), %T, "CONST_BOOL1");
|
||||
checkequal(CONST_CHAR_get(), 'x', "CONST_CHAR");
|
||||
checkequal(CONST_STRING1_get(), "const string", "CONST_STRING1");
|
||||
endfunction
|
||||
|
||||
test_global();
|
||||
|
||||
|
||||
// Test assignement in enums
|
||||
checkequal(kValue_get(), 4, "kValue");
|
||||
|
||||
exec("swigtest.quit", -1);
|
||||
Loading…
Add table
Add a link
Reference in a new issue