Xcos: tests for Integer palette blocks 02/12102/5
Paul BIGNIER [Mon, 22 Jul 2013 15:41:15 +0000 (17:41 +0200)]
Block SWITCH2_m is already testes in xcos non-reg.

Change-Id: I7a9ab1fd601ea642e58a046597dda62aebf41e84

45 files changed:
scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/dlatch.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/dlatch.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/dlatch.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/intmul.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/intmul.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/intmul.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/iselect.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/iselect.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/iselect.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/logic.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/logic.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/logic.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/matmul.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/matmul.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/matmul.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/samphold.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/samphold.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/samphold.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/select.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/select.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/select.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/set_bit.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/set_bit.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/set_bit.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/shift.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/shift.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/shift.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.zcos [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/summation.dia.ref [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/summation.tst [new file with mode: 0644]
scilab/modules/xcos/tests/unit_tests/Integer/summation.zcos [new file with mode: 0644]

diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.dia.ref
new file mode 100644 (file)
index 0000000..8e9f7b1
--- /dev/null
@@ -0,0 +1,13 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/clear_bit.zcos"));
+A_ref = int16(36*ones(128,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.tst b/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.tst
new file mode 100644 (file)
index 0000000..55aa672
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/clear_bit.zcos"));
+
+A_ref = int16(36*ones(128,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.zcos
new file mode 100644 (file)
index 0000000..64d02c1
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/clear_bit.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.dia.ref
new file mode 100644 (file)
index 0000000..957405a
--- /dev/null
@@ -0,0 +1,30 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/dflipflop.zcos"));
+// Redefining messagebox() to avoid popup from c_pass2.sci
+prot = funcprot();
+funcprot(0);
+function messagebox(msg, modal, msg_title)
+    disp(msg);
+endfunction
+funcprot(prot);
+A_ref = int8(zeros(128,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+!No continuous-time state. Thresholds are ignored; this             !
+!                                                                   !
+!may be OK if you don't generate external events with them.         !
+!                                                                   !
+!If you want to reactivate the thresholds, then you need            !
+!                                                                   !
+!to include a block with continuous-time state in your diagram.     !
+!                                                                   !
+!   You can for example include DUMMY CLSS block (linear palette).  !
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.tst b/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.tst
new file mode 100644 (file)
index 0000000..f8ae1d7
--- /dev/null
@@ -0,0 +1,26 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/dflipflop.zcos"));
+
+// Redefining messagebox() to avoid popup from c_pass2.sci
+prot = funcprot();
+funcprot(0);
+function messagebox(msg, modal, msg_title)
+    disp(msg);
+endfunction
+funcprot(prot);
+
+A_ref = int8(zeros(128,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.zcos
new file mode 100644 (file)
index 0000000..dc6365a
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/dflipflop.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.dia.ref
new file mode 100644 (file)
index 0000000..f247598
--- /dev/null
@@ -0,0 +1,36 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/dlatch.zcos"));
+A_ref1 = int8(ones(7,1));
+A_ref2 = int8(zeros(24,1));
+A_ref3 = int8(ones(15,1));
+A_ref4 = int8(zeros(26,1));
+// Redefining messagebox() to avoid popup from c_pass2.sci
+prot = funcprot();
+funcprot(0);
+function messagebox(msg, modal, msg_title)
+    disp(msg);
+endfunction
+funcprot(prot);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+!No continuous-time state. Thresholds are ignored; this             !
+!                                                                   !
+!may be OK if you don't generate external events with them.         !
+!                                                                   !
+!If you want to reactivate the thresholds, then you need            !
+!                                                                   !
+!to include a block with continuous-time state in your diagram.     !
+!                                                                   !
+!   You can for example include DUMMY CLSS block (linear palette).  !
+assert_checkequal(A.values(1:7),   A_ref1);
+assert_checkequal(A.values(8:31),  A_ref2);
+assert_checkequal(A.values(32:46), A_ref3);
+assert_checkequal(A.values(47:72), A_ref4);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.tst b/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.tst
new file mode 100644 (file)
index 0000000..bc702c5
--- /dev/null
@@ -0,0 +1,32 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/dlatch.zcos"));
+
+A_ref1 = int8(ones(7,1));
+A_ref2 = int8(zeros(24,1));
+A_ref3 = int8(ones(15,1));
+A_ref4 = int8(zeros(26,1));
+
+// Redefining messagebox() to avoid popup from c_pass2.sci
+prot = funcprot();
+funcprot(0);
+function messagebox(msg, modal, msg_title)
+    disp(msg);
+endfunction
+funcprot(prot);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values(1:7),   A_ref1);
+assert_checkequal(A.values(8:31),  A_ref2);
+assert_checkequal(A.values(32:46), A_ref3);
+assert_checkequal(A.values(47:72), A_ref4);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.zcos
new file mode 100644 (file)
index 0000000..258fb48
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/dlatch.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.dia.ref
new file mode 100644 (file)
index 0000000..32847fe
--- /dev/null
@@ -0,0 +1,13 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/extract_bits.zcos"));
+A_ref = 32*ones(128,1);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.tst b/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.tst
new file mode 100644 (file)
index 0000000..d8b305e
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/extract_bits.zcos"));
+
+A_ref = 32*ones(128,1);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.zcos
new file mode 100644 (file)
index 0000000..a4ad343
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/extract_bits.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/intmul.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/intmul.dia.ref
new file mode 100644 (file)
index 0000000..2f8b1d0
--- /dev/null
@@ -0,0 +1,15 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/intmul.zcos"));
+A_ref = int16([19 22 ; 43 50]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+for i = 1:128
+    assert_checkequal(A.values(:,:,i), A_ref);
+end
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/intmul.tst b/scilab/modules/xcos/tests/unit_tests/Integer/intmul.tst
new file mode 100644 (file)
index 0000000..fcd7b64
--- /dev/null
@@ -0,0 +1,20 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/intmul.zcos"));
+
+A_ref = int16([19 22 ; 43 50]);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+for i = 1:128
+    assert_checkequal(A.values(:,:,i), A_ref);
+end
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/intmul.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/intmul.zcos
new file mode 100644 (file)
index 0000000..886955e
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/intmul.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/iselect.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/iselect.dia.ref
new file mode 100644 (file)
index 0000000..12ccc6b
--- /dev/null
@@ -0,0 +1,13 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/iselect.zcos"));
+A_ref = int32([0;0;0;0;1;1;1;2;2;2;3;3;3;3;3;3;3;3;3;3;3;3;3;3;3;2;2;2;1;1;1;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/iselect.tst b/scilab/modules/xcos/tests/unit_tests/Integer/iselect.tst
new file mode 100644 (file)
index 0000000..c072a0d
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/iselect.zcos"));
+
+A_ref = int32([0;0;0;0;1;1;1;2;2;2;3;3;3;3;3;3;3;3;3;3;3;3;3;3;3;2;2;2;1;1;1;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/iselect.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/iselect.zcos
new file mode 100644 (file)
index 0000000..56df17c
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/iselect.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.dia.ref
new file mode 100644 (file)
index 0000000..bf3d280
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/jkflipflop.zcos"));
+A_ref1 = int8(ones(8,1));
+A_ref2 = int8(zeros(20,1));
+A_ref3 = int8(ones(20,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values(1:8),   A_ref1);
+assert_checkequal(A.values(9:28),  A_ref2);
+assert_checkequal(A.values(29:48), A_ref3);
+assert_checkequal(A.values(49:68), A_ref2);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.tst b/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.tst
new file mode 100644 (file)
index 0000000..5daddc7
--- /dev/null
@@ -0,0 +1,23 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/jkflipflop.zcos"));
+
+A_ref1 = int8(ones(8,1));
+A_ref2 = int8(zeros(20,1));
+A_ref3 = int8(ones(20,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values(1:8),   A_ref1);
+assert_checkequal(A.values(9:28),  A_ref2);
+assert_checkequal(A.values(29:48), A_ref3);
+assert_checkequal(A.values(49:68), A_ref2);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.zcos
new file mode 100644 (file)
index 0000000..5de8f06
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/jkflipflop.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/logic.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/logic.dia.ref
new file mode 100644 (file)
index 0000000..d46c6bb
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/logic.zcos"));
+A_ref1 = int8(zeros(8,1));
+A_ref2 = int8(ones(10,1));
+A_ref3 = int8(zeros(10,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values(1:8),   A_ref1);
+assert_checkequal(A.values(9:18),  A_ref2);
+assert_checkequal(A.values(19:28), A_ref3);
+assert_checkequal(A.values(29:38), A_ref2);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/logic.tst b/scilab/modules/xcos/tests/unit_tests/Integer/logic.tst
new file mode 100644 (file)
index 0000000..00ff5ee
--- /dev/null
@@ -0,0 +1,23 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/logic.zcos"));
+
+A_ref1 = int8(zeros(8,1));
+A_ref2 = int8(ones(10,1));
+A_ref3 = int8(zeros(10,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values(1:8),   A_ref1);
+assert_checkequal(A.values(9:18),  A_ref2);
+assert_checkequal(A.values(19:28), A_ref3);
+assert_checkequal(A.values(29:38), A_ref2);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/logic.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/logic.zcos
new file mode 100644 (file)
index 0000000..3fc1dba
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/logic.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/matmul.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/matmul.dia.ref
new file mode 100644 (file)
index 0000000..d6e6b98
--- /dev/null
@@ -0,0 +1,15 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/matmul.zcos"));
+A_ref = int16([19 22 ; 43 50]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+for i = 1:128
+    assert_checkequal(A.values(:,:,i), A_ref);
+end
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/matmul.tst b/scilab/modules/xcos/tests/unit_tests/Integer/matmul.tst
new file mode 100644 (file)
index 0000000..2755f74
--- /dev/null
@@ -0,0 +1,20 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/matmul.zcos"));
+
+A_ref = int16([19 22 ; 43 50]);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+for i = 1:128
+    assert_checkequal(A.values(:,:,i), A_ref);
+end
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/matmul.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/matmul.zcos
new file mode 100644 (file)
index 0000000..74d44a2
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/matmul.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/samphold.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/samphold.dia.ref
new file mode 100644 (file)
index 0000000..2a81a96
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/samphold.zcos"));
+Zero = zeros(71, 1);
+MinusOne   = -1*ones(4, 1);
+MinusTwo   = -2*ones(5, 1);
+MinusThree = -3*ones(5, 1);
+MinusFour  = -4*ones(8, 1);
+A_ref = int32([MinusFour; MinusThree; MinusTwo; MinusOne; Zero; MinusOne; MinusTwo; MinusThree; MinusFour]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/samphold.tst b/scilab/modules/xcos/tests/unit_tests/Integer/samphold.tst
new file mode 100644 (file)
index 0000000..7eaa078
--- /dev/null
@@ -0,0 +1,24 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/samphold.zcos"));
+
+Zero = zeros(71, 1);
+MinusOne   = -1*ones(4, 1);
+MinusTwo   = -2*ones(5, 1);
+MinusThree = -3*ones(5, 1);
+MinusFour  = -4*ones(8, 1);
+
+A_ref = int32([MinusFour; MinusThree; MinusTwo; MinusOne; Zero; MinusOne; MinusTwo; MinusThree; MinusFour]);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/samphold.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/samphold.zcos
new file mode 100644 (file)
index 0000000..4dd0fb9
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/samphold.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/select.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/select.dia.ref
new file mode 100644 (file)
index 0000000..6907096
--- /dev/null
@@ -0,0 +1,13 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/select.zcos"));
+A_ref = int32([1;1;0;0;1;1;1;2;2;2;3;3;3;3;3;3;3;3;3;3;3;3;3;3;3;2;2;2;1;1;1;0;0;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/select.tst b/scilab/modules/xcos/tests/unit_tests/Integer/select.tst
new file mode 100644 (file)
index 0000000..f603b57
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/select.zcos"));
+
+A_ref = int32([1;1;0;0;1;1;1;2;2;2;3;3;3;3;3;3;3;3;3;3;3;3;3;3;3;2;2;2;1;1;1;0;0;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1]);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/select.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/select.zcos
new file mode 100644 (file)
index 0000000..9c3207a
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/select.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.dia.ref
new file mode 100644 (file)
index 0000000..b312230
--- /dev/null
@@ -0,0 +1,13 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/set_bit.zcos"));
+A_ref = int16(37*ones(128,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.tst b/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.tst
new file mode 100644 (file)
index 0000000..7e7e926
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/set_bit.zcos"));
+
+A_ref = int16(37*ones(128,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.zcos
new file mode 100644 (file)
index 0000000..a9017f2
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/set_bit.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/shift.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/shift.dia.ref
new file mode 100644 (file)
index 0000000..c5ac266
--- /dev/null
@@ -0,0 +1,13 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/shift.zcos"));
+A_ref = int16(148*ones(128,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/shift.tst b/scilab/modules/xcos/tests/unit_tests/Integer/shift.tst
new file mode 100644 (file)
index 0000000..3163cfd
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/shift.zcos"));
+
+A_ref = int16(148*ones(128,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values, A_ref);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/shift.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/shift.zcos
new file mode 100644 (file)
index 0000000..a31f544
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/shift.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.dia.ref
new file mode 100644 (file)
index 0000000..3c57e70
--- /dev/null
@@ -0,0 +1,15 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/srflipflop.zcos"));
+A_ref1 = int8(zeros(28,1));
+A_ref2 = int8(ones(172,1));
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+assert_checkequal(A.values(1:28), A_ref1);
+assert_checkequal(A.values(29:$), A_ref2);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.tst b/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.tst
new file mode 100644 (file)
index 0000000..fd86311
--- /dev/null
@@ -0,0 +1,20 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/srflipflop.zcos"));
+
+A_ref1 = int8(zeros(28,1));
+A_ref2 = int8(ones(172,1));
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+assert_checkequal(A.values(1:28), A_ref1);
+assert_checkequal(A.values(29:$), A_ref2);
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.zcos
new file mode 100644 (file)
index 0000000..6b19547
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/srflipflop.zcos differ
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/summation.dia.ref b/scilab/modules/xcos/tests/unit_tests/Integer/summation.dia.ref
new file mode 100644 (file)
index 0000000..025b369
--- /dev/null
@@ -0,0 +1,15 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/summation.zcos"));
+A_ref = int16([-4 -4 ; -5 -6]);
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+for i = 1:128
+    assert_checkequal(A.values(:,:,i), A_ref);
+end
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/summation.tst b/scilab/modules/xcos/tests/unit_tests/Integer/summation.tst
new file mode 100644 (file)
index 0000000..9c37a7c
--- /dev/null
@@ -0,0 +1,20 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- ENGLISH IMPOSED -->
+// <-- XCOS TEST -->
+
+// Import diagram
+assert_checktrue(importXcosDiagram("SCI/modules/xcos/tests/unit_tests/Integer/summation.zcos"));
+
+A_ref = int16([-4 -4 ; -5 -6]);
+
+try scicos_simulate(scs_m, 'nw'); catch disp(lasterror()); end
+
+for i = 1:128
+    assert_checkequal(A.values(:,:,i), A_ref);
+end
diff --git a/scilab/modules/xcos/tests/unit_tests/Integer/summation.zcos b/scilab/modules/xcos/tests/unit_tests/Integer/summation.zcos
new file mode 100644 (file)
index 0000000..ffcc238
Binary files /dev/null and b/scilab/modules/xcos/tests/unit_tests/Integer/summation.zcos differ