From 8b44229ef44f0558ce045e46ff833fb44df913c9 Mon Sep 17 00:00:00 2001
From: jofret
Date: Mon, 21 Jun 2010 06:24:38 +0000
Subject: Tagging the 2.0 release of scilab2c

---
 tests/unit_tests/test_double_Size.sci | 41 +++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 tests/unit_tests/test_double_Size.sci

(limited to 'tests/unit_tests/test_double_Size.sci')

diff --git a/tests/unit_tests/test_double_Size.sci b/tests/unit_tests/test_double_Size.sci
new file mode 100644
index 00000000..e25f5627
--- /dev/null
+++ b/tests/unit_tests/test_double_Size.sci
@@ -0,0 +1,41 @@
+function test_double_Size()
+	disp(size(4));
+	disp(size([1 2]))
+	disp(size(2+3*%i));
+	disp(size([1 2 3 ; 4 5 6]));
+	disp(size([1 2 3 ; 4 5 6]*%i));
+	e = %pi ;
+	disp(size(e)); // d0Sized0
+
+	f = e * %i;
+	disp(size(f));// z0Sized0
+
+	a = [1 2 3 ; 4 5 6];
+	disp(size(a));// d2Sized0
+	
+	b = [1 2 3 ; 4 5 6] * %i;
+	disp(size(b));// z2Sized0
+
+// with a second argument
+	o=1;
+	
+	disp(size(4,1));
+	disp(size(2+3*%i,1));
+	disp(size([1 2 3 ; 4 5 6],o));
+	disp(size([1 2 3 ; 4 5 6]*%i,1));
+	e = %pi ;
+	disp(size(e,1)); // d0Sized0
+
+	f = e * %i;
+	disp(size(f,1));// z0Sized0
+
+	a = [1 2 3 ; 4 5 6];
+	disp(size(a,o));// d2Sized0
+	
+	b = [1 2 3 ; 4 5 6] * %i;
+	disp(size(b,1));// z2Sized0
+	
+
+
+
+endfunction 
-- 
cgit