* Bug 16592 fixed: | and & between complex and boolean or []

[scilab.git] / scilab / modules / ast / tests / unit_tests / or.tst

diff --git a/scilab/modules/ast/tests/unit_tests/or.tst b/scilab/modules/ast/tests/unit_tests/or.tst
index 5e0d2cc..f3bb35f 100644 (file)
--- a/scilab/modules/ast/tests/unit_tests/or.tst
+++ b/scilab/modules/ast/tests/unit_tests/or.tst
@@ -1,11 +1,13 @@
 // ============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 // Copyright (C) 2014 - Scilab Enterprises - Antoine ELIAS
+// Copyright (C) 2020 - Samuel GOUGEON
 //
 //  This file is distributed under the same license as the Scilab package.
 // ============================================================================
 //
 // <-- CLI SHELL MODE -->
+// <-- NO CHECK REF -->
 
 empty = [];
 r = 2;
@@ -51,6 +53,8 @@ B = [%t %f;%f %t];
 assert_checkequal(empty | empty, []);
 assert_checkequal(empty | r, []);
 assert_checkequal(empty | R, []);
+assert_checkequal(empty | c, []);
+assert_checkequal(empty | C, []);
 assert_checkequal(empty | e, []);
 assert_checkequal(empty | b, %t);
 assert_checkequal(empty | B, [%t %t;%t %t]);
@@ -58,6 +62,8 @@ assert_checkequal(empty | B, [%t %t;%t %t]);
 assert_checkequal(r | empty, []);
 assert_checkequal(r | r, %t);
 assert_checkequal(r | R, [%t,%t;%t,%t]);
+assert_checkequal(r | c, %t);
+assert_checkequal(r | C, [%t,%t;%t,%t]);
 assert_checkequal(r | e, %t);
 assert_checkequal(r | b, %t);
 assert_checkequal(r | B, [%t,%t;%t,%t]);
@@ -65,19 +71,43 @@ assert_checkequal(r | B, [%t,%t;%t,%t]);
 assert_checkequal(R | empty, []);
 assert_checkequal(R | r, [%t,%t;%t,%t]);
 assert_checkequal(R | R, [%t,%t;%t,%t]);
+assert_checkequal(R | c, [%t,%t;%t,%t]);
+assert_checkequal(R | C, [%t,%t;%t,%t]);
 assert_checkequal(R | e, [%t,%t;%t,%t]);
 assert_checkequal(R | b, [%t,%t;%t,%t]);
 assert_checkequal(R | B, [%t,%t;%t,%t]);
 
+assert_checkequal(c | empty, []);
+assert_checkequal(c | r, %t);
+assert_checkequal(c | R, [%t,%t;%t,%t]);
+assert_checkequal(c | c, %t);
+assert_checkequal(c | C, [%t,%t;%t,%t]);
+assert_checkequal(c | e, %t);
+assert_checkequal(c | b, %t);
+assert_checkequal(c | B, [%t,%t;%t,%t]);
+
+assert_checkequal(C | empty, []);
+assert_checkequal(C | r, [%t,%t;%t,%t]);
+assert_checkequal(C | R, [%t,%t;%t,%t]);
+assert_checkequal(C | c, [%t,%t;%t,%t]);
+assert_checkequal(C | C, [%t,%t;%t,%t]);
+assert_checkequal(C | e, [%t,%t;%t,%t]);
+assert_checkequal(C | b, [%t,%t;%t,%t]);
+assert_checkequal(C | B, [%t,%t;%t,%t]);
+
 assert_checkequal(e | empty, []);
 assert_checkequal(e | r, %t);
 assert_checkequal(e | R, [%t,%t;%t,%t]);
+assert_checkequal(e | c, %t);
+assert_checkequal(e | C, [%t,%t;%t,%t]);
 assert_checkequal(e | b, %t);
 assert_checkequal(e | B, [%t,%t;%t,%t]);
 
 assert_checkequal(b | empty, %t);
 assert_checkequal(b | r, %t);
 assert_checkequal(b | R, [%t,%t;%t,%t]);
+assert_checkequal(b | c, %t);
+assert_checkequal(b | C, [%t,%t;%t,%t]);
 assert_checkequal(b | e, %t);
 assert_checkequal(b | b, %f);
 assert_checkequal(b | B, [%t,%f;%f,%t]);
@@ -86,6 +116,8 @@ assert_checkequal(b | SPB, sparse([1,2;2,1],[%t;%t],[2,2]));
 assert_checkequal(B | empty, [%t,%t;%t,%t]);
 assert_checkequal(B | r, [%t,%t;%t,%t]);
 assert_checkequal(B | R, [%t,%t;%t,%t]);
+assert_checkequal(B | c, [%t,%t;%t,%t]);
+assert_checkequal(B | C, [%t,%t;%t,%t]);
 assert_checkequal(B | e, [%t,%t;%t,%t]);
 assert_checkequal(B | b, [%t,%f;%f,%t]);
 assert_checkequal(B | B, [%t,%f;%f,%t]);