* Bug 16450 fixed: [double, integer] & [double ; integer] implemented
[scilab.git] / scilab / modules / overloading / tests / unit_tests / concatenations_mixed.tst
index f3e2155..5dc34dd 100644 (file)
@@ -1,6 +1,6 @@
 // =============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2018 - Samuel GOUGEON
+// Copyright (C) 2018 - 2020 - Samuel GOUGEON
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
@@ -9,7 +9,9 @@
 // <-- CLI SHELL MODE -->
 // <-- NO CHECK REF -->
 
+// -----------------------------
 // Booleans and encoded integers
+// -----------------------------
 for i = [1 2 4 8 11 12 14 18]  // loop on inttype codes
     r = [iconvert(-3,i) , %t];
     r2 = [%t , iconvert(-3,i)];
@@ -24,3 +26,16 @@ for i = [1 2 4 8 11 12 14 18]  // loop on inttype codes
     assert_checkequal(size(c) , [2 1]);
     assert_checkequal(size(c2), [2 1]);
 end
+
+// ----------------------------
+// Doubles and encoded integers
+// ----------------------------
+D = list(2, [3 7], [3 ; 7], [1 2 3 ; 4 5 6], cat(3,[1 2 3;4 5 6],[8 4 9;0 3 1]));
+for it = [1 2 4 8 11 12 14 18]  // Loop on integer types
+    for d = D
+        assert_checkequal([d, iconvert(d,it)], [d d]);
+        assert_checkequal([iconvert(d,it), d], [d d]);
+        assert_checkequal([d ; iconvert(d,it)], [d ; d]);
+        assert_checkequal([iconvert(d,it) ; d], [d ; d]);
+    end
+end