* Bug 15858 fixed: size(cblock) had troubles
[scilab.git] / scilab / modules / data_structures / tests / unit_tests / cblock_size.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2018 - Samuel GOUGEON
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 // <-- NO CHECK REF -->
9
10 // Unit tests for size(cblock)
11
12 T = mlist('cblock');
13 assert_checkequal(size(T), [0 0]);
14 assert_checkequal(size(T,1), 0);
15 assert_checkequal(size(T,2), 0);
16 assert_checkequal(size(T,"r"), 0);
17 assert_checkequal(size(T,"c"), 0);
18 assert_checkequal(size(T,"*"), 0);
19 [m, n] = size(T);
20 assert_checkequal(m, 0);
21 assert_checkequal(n, 0);
22
23 T = msscanf(-1,["Alain 19";"Pierre 15";"Tom 12"],'%s %d');
24 assert_checkequal(size(T), [3 2]);
25 assert_checkequal(size(T,1), 3);
26 assert_checkequal(size(T,2), 2);
27 assert_checkequal(size(T,"r"), 3);
28 assert_checkequal(size(T,"c"), 2);
29 assert_checkequal(size(T,"*"), 6);
30 [m, n] = size(T);
31 assert_checkequal(m, 3);
32 assert_checkequal(n, 2);