* Bug #7649 fixed: isempty() on struct(), {} or list(,) returned %F
[scilab.git] / scilab / modules / elementary_functions / tests / unit_tests / isempty.tst
index 26fe6ec..f0deff3 100644 (file)
@@ -1,6 +1,7 @@
 // =============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 // Copyright (C) 2008 - INRIA - Pierre MARECHAL <pierre.marechal@inria.fr>
+// Copyright (C) 2016 - Samuel GOUGEON
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
@@ -23,5 +24,22 @@ assert_checkfalse(isempty([ ' ' , '' ; '' , '' ]));
 // empty list
 assert_checktrue(isempty(list()));
 
-// mlist is never empty
+// list with only undefined elements
+assert_checktrue(isempty(list(,)));
+
+// empty structure()
+assert_checktrue(isempty(struct()));
+
+// empty cell()
+assert_checktrue(isempty({}));
+
+// nested empty containers
+assert_checktrue(isempty(list({}, list("",,[]), [], struct())));
+s.r = [];
+s.c = {};
+s.L = list();
+s.s = struct();
+assert_checktrue(isempty(s));
+
+// other mlists are never empty
 assert_checkfalse(isempty(mlist('')));