Test : list creation with null elements
[scilab.git] / scilab / modules / data_structures / tests / unit_tests / list.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014-2014 - Scilab Enterprises - Bruno JOFRET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8
9 // test de creation des listes avec des elements null()
10
11 l = list(,);
12 m = l(1);
13 n = l(2);
14 assert_checkfalse(isdef("m"));
15 assert_checkfalse(isdef("n"));
16
17 l = list(1,);
18 n = l(2);
19 assert_checkfalse(isdef("n"));
20 assert_checkequal(l(1), 1);
21
22 l = list(,1);
23 m = l(1);
24 assert_checkfalse(isdef("m"));
25 assert_checkequal(l(2), 1);
26
27 l = list(,,);
28 m = l(1);
29 n = l(2);
30 p = l(3);
31 assert_checkfalse(isdef("m"));
32 assert_checkfalse(isdef("n"));
33 assert_checkfalse(isdef("p"));
34
35 l = list(1,,);
36 n = l(2);
37 p = l(3);
38 assert_checkequal(l(1), 1);
39 assert_checkfalse(isdef("n"));
40 assert_checkfalse(isdef("p"));
41
42 l = list(,1,);
43 m = l(1);
44 p = l(3);
45 assert_checkfalse(isdef("m"));
46 assert_checkequal(l(2), 1);
47 assert_checkfalse(isdef("p"));
48
49 l = list(,,1);
50 m = l(1);
51 n = l(2);
52 assert_checkfalse(isdef("m"));
53 assert_checkfalse(isdef("n"));
54 assert_checkequal(l(3), 1);
55
56 l = list(1,1,);
57 p = l(3);
58 assert_checkequal(l(1), 1);
59 assert_checkequal(l(2), 1);
60 assert_checkfalse(isdef("p"));
61
62 l = list(1,,1);
63 n = l(2);
64 assert_checkequal(l(1), 1);
65 assert_checkfalse(isdef("n"));
66 assert_checkequal(l(3), 1);
67
68 l = list(,1,1);
69 m = l(1);
70 assert_checkfalse(isdef("m"));
71 assert_checkequal(l(2), 1);
72 assert_checkequal(l(3), 1);