Bug 13027 fixed: There was no autowrap into array in JIMS
[scilab.git] / scilab / modules / external_objects_java / tests / unit_tests / array_wrapping.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2013 - Scilab Enterprises - Calixte DENIZET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 c = jcompile("Test", ["public class Test {"
8 "public static double foo(double[] x) {"
9 " double s = 0;"
10 " for (int i = 0; i < x.length; i++) s += x[i];"
11 " return s;"
12 "}"
13 "public static double foo(String[] x) {"
14 " double s = 0;"
15 " for (int i = 0; i < x.length; i++) s += x[i].length();"
16 " return s;"
17 "}"
18 "public static double bar(int[] x) {"
19 " double s = 0;"
20 " for (int i = 0; i < x.length; i++) s += x[i];"
21 " return s;"
22 "}"
23 "}"
24 ]);
25 jimport Test;
26 x = 123;
27 assert_checkequal(Test.foo(x), x);
28 x = rand(1,100);
29 assert_checkequal(Test.foo(x), sum(x));
30 x = rand(100,100);
31 assert_checkequal(Test.foo(x), sum(x));
32 assert_checkequal(Test.foo(1,2,3,4,5,6), sum(1:6));
33 x = "hello";
34 assert_checkequal(Test.foo(x), length(x));
35 x = string(rand(1,100));
36 assert_checkequal(Test.foo(x), sum(length(x)));
37 x = string(rand(100,100));
38 assert_checkequal(Test.foo(x), sum(length(x)));
39 x = 123;
40 assert_checkequal(Test.bar(x), x);
41 x = floor(123 * rand(1,100));
42 assert_checkequal(Test.bar(x), sum(x));
43 assert_checkequal(Test.bar(1,2,3,4,5,6), sum(1:6));