* bug #16399 fixed - zeros() with empty list extraction failed.

[scilab.git] / scilab / modules / elementary_functions / tests / unit_tests / zeros.tst

diff --git a/scilab/modules/elementary_functions/tests/unit_tests/zeros.tst b/scilab/modules/elementary_functions/tests/unit_tests/zeros.tst
index 58aa06b..f930499 100644 (file)
--- a/scilab/modules/elementary_functions/tests/unit_tests/zeros.tst
+++ b/scilab/modules/elementary_functions/tests/unit_tests/zeros.tst
@@ -13,10 +13,19 @@ res(2,3,4) = 0;
 computed = list([], 1, 10, list(2,3), list(2,3,4));
 expected = list([], 0, 0, [0 0 0;0 0 0], res);
 
+assert_checkequal(zeros(), 0);
 for i = 1:size(computed)
     assert_checkequal(zeros(computed(i)(:)), expected(i));
 end
 
+// by list extraction
+l = list(1, 2, 3)
+assert_checkequal(zeros(l(1:0)), 0);
+assert_checkequal(zeros(l(1:1)), 0);
+assert_checkequal(zeros(l(1:2)), [0, 0]);
+assert_checkequal(zeros(l(1:3)), matrix([0, 0, 0, 0, 0, 0] , 1, 2, 3));
+
+
 data = rand(4, 3, 2) * 1000;
 dataz = zeros(data);