39359f5317abbce5f02390c2d120a9723e2a23fe
[scilab.git] / scilab / modules / elementary_functions / tests / unit_tests / isempty.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2008 - INRIA - Pierre MARECHAL <pierre.marechal@inria.fr>
4 // Copyright (C) 2016 - Samuel GOUGEON
5 //
6 //  This file is distributed under the same license as the Scilab package.
7 // =============================================================================
8 // <-- CLI SHELL MODE -->
9 // unit tests for isempty function
10 // =============================================================================
11 // empty matrix
12 assert_checktrue(isempty([]));
13 // character string
14 assert_checktrue(isempty(''));
15 // matrix of character string
16 assert_checktrue(isempty([ '' , '' ; '' , '' ]));
17 assert_checkfalse(isempty([ ' ' , '' ; '' , '' ]));
18 // empty list
19 assert_checktrue(isempty(list()));
20 // list with only undefined elements
21 assert_checktrue(isempty(list(,)));
22 // empty structure()
23 assert_checktrue(isempty(struct()));
24 // empty cell()
25 assert_checktrue(isempty({}));
26 // nested empty containers
27 assert_checktrue(isempty(list({}, list("",,[]), [], struct())));
28 s.r = [];
29 s.c = {};
30 s.L = list();
31 s.s = struct();
32 assert_checktrue(isempty(s));
33 // other mlists are never empty
34 assert_checkfalse(isempty(mlist('')));