rewrite hypermat api for scilab 6
[scilab.git] / scilab / modules / api_scilab / tests / unit_tests / hypermatIntExample.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2013 - Scilab Enterprises 
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 ilib_verbose(0);
9 mkdir(pathconvert(TMPDIR+"/hypermatIntExample"));
10 cd(pathconvert(TMPDIR+"/hypermatIntExample"));
11 copyfile(SCI+"/modules/api_scilab/tests/unit_tests/hypermatIntExample.c",pathconvert(TMPDIR+"/hypermatIntExample/hypermatIntExample.c",%F));
12 ilib_build("gw_hypermatIntExample",["hypermatIntExample","hypermatIntExample"],"hypermatIntExample.c",[],"","","");
13 exec("loader.sce");
14 a = hypermat([1 2 3], int8(1:6));
15 b = hypermat([1 2 3], uint8(1:6));
16 c = hypermat([1 2 3], int16(1:6));
17 d = hypermat([1 2 3], uint16(1:6));
18 e = hypermat([1 2 3], int32(1:6));
19 f = hypermat([1 2 3], uint32(1:6));
20 g = hypermat([1 2 3], int64(1:6));
21 h = hypermat([1 2 3], uint64(1:6));
22 assert_checkequal(hypermatIntExample(a), a);
23 assert_checkequal(hypermatIntExample(b), b);
24 assert_checkequal(hypermatIntExample(c), c);
25 assert_checkequal(hypermatIntExample(d), d);
26 assert_checkequal(hypermatIntExample(e), e);
27 assert_checkequal(hypermatIntExample(f), f);
28 assert_checkequal(hypermatIntExample(g), g);
29 assert_checkequal(hypermatIntExample(h), h);