fix ast tests 98/21298/3
Antoine ELIAS [Mon, 10 Feb 2020 21:38:18 +0000 (22:38 +0100)]
Some tests still failed, especially with time comparison. ( 15087, 15701 )
And other with numerical difference ( 14303, 15781 )

Change-Id: I1cbf68c1953e6017e9e601b3f330a2b4ba043c5d

scilab/modules/ast/tests/nonreg_tests/bug_11228.dia.ref
scilab/modules/ast/tests/nonreg_tests/bug_6434.tst
scilab/modules/ast/tests/unit_tests/concatenation.tst
scilab/modules/ast/tests/unit_tests/newtype.dia.ref
scilab/modules/ast/tests/unit_tests/trycatch.dia.ref

index 249151b..039a171 100644 (file)
@@ -18,7 +18,7 @@
 a = mlist('A');
 deff('y=%A_e(name,a)','disp(name);if name~=''e'' then y=mlist(''A''), else y=clc, end')
 a.b.c.d.e()
- b
- c
- d
- e
+  "b"
+  "c"
+  "d"
+  "e"
index b1b7c26..e446aba 100644 (file)
@@ -25,5 +25,5 @@ assert_checkequal(execstr("elementary_functionslib.atand(1,0)", "errcatch"), 0);
 assert_checkequal(elementary_functionslib.atand(1,0), 90);
 
 // 3 argins
-assert_checkequal(execstr("elementary_functionslib.linspace(0,1,3)", "errcatch"), 0);
-assert_checkequal(elementary_functionslib.linspace(0,1,3), linspace(0,1,3));
+assert_checkequal(execstr("elementary_functionslib.setdiff([1 2;3 4], [1, 2], ""r"")", "errcatch"), 0);
+assert_checkequal(elementary_functionslib.setdiff([1 2;3 4], [1, 2], "r"), setdiff([1 2;3 4], [1, 2], "r"));
index 34a4080..55cfb43 100644 (file)
@@ -51,8 +51,8 @@ checkCallOverload("[ldouble ; lsta]");
 // Bool
 assert_checkequal([lbool ldouble], [double(lbool) ldouble]);
 assert_checkequal([lbool lbool], [%t %f %t %t %f %t]);
-checkCallOverload("[lbool lint]");
-checkCallOverload("[lbool lint16]");
+assert_checkequal([lbool lint], int32([1 0 1 1 2 3]));
+assert_checkequal([lbool lint16], int16([1 0 1 1 2 3]));
 checkCallOverload("[lbool lpoly]");
 checkCallOverload("[lbool lsparse]");
 assert_checkequal([lbool lspb], [sparse(lbool) lspb]);
@@ -61,8 +61,8 @@ checkCallOverload("[lbool lsta]");
 
 assert_checkequal([lbool ; ldouble], [double(lbool) ; ldouble]);
 assert_checkequal([lbool ; lbool], matrix([%t %t %f %f %t %t], 2, 3));
-checkCallOverload("[lbool ; lint]");
-checkCallOverload("[lbool ; lint16]");
+assert_checkequal([lbool ; lint], int32([1 0 1;1 2 3]));
+assert_checkequal([lbool ; lint16], int16([1 0 1;1 2 3]));
 checkCallOverload("[lbool ; lpoly]");
 checkCallOverload("[lbool ; lsparse]");
 assert_checkequal([lbool ; lspb], [sparse(lbool) ; lspb]);
@@ -71,7 +71,7 @@ checkCallOverload("[lbool ; lsta]");
 
 // int
 checkCallOverload("[lint ldouble]");
-checkCallOverload("[lint lbool]");
+assert_checkequal([lint lbool], int32([1 2 3 1 0 1]));
 assert_checkequal([lint lint], int32([1 2 3 1 2 3]));
 checkCallOverload("[lint lint16]");
 checkCallOverload("[lint lpoly]");
@@ -81,7 +81,7 @@ checkCallOverload("[lint lstring]");
 checkCallOverload("[lint lsta]");
 
 checkCallOverload("[lint ; ldouble]");
-checkCallOverload("[lint ; lbool]");
+assert_checkequal([lint ; lbool], int32([1 2 3;1 0 1]));
 assert_checkequal([lint ; lint], int32(matrix([1 1 2 2 3 3], 2, 3)));
 checkCallOverload("[lint ; lint16]");
 checkCallOverload("[lint ; lpoly]");
index be1d331..41b8985 100644 (file)
@@ -31,7 +31,7 @@ l=list(2, a, "test")
        l(2)
 This is my type.
        l(3)
- test
+  "test"
 // overload call
 b = newtype(%f);
 function %nt_p(h)
@@ -39,14 +39,14 @@ function %nt_p(h)
 end
 b
  b  = 
- %nt_p: This is my type.
+  "%nt_p: This is my type."
 disp(b)
- %nt_p: This is my type.
+  "%nt_p: This is my type."
 l=list(2, b, "test")
  l  = 
        l(1)
    2.
        l(2)
- %nt_p: This is my type.
+  "%nt_p: This is my type."
        l(3)
- test
+  "test"
index 759a6fb..e0a95b8 100644 (file)
@@ -22,7 +22,7 @@ function foo()
     disp("should not display")
 endfunction
 foo()
- should display
+  "should display"
 function bar()
     try
         disp("should display")
@@ -32,4 +32,4 @@ function bar()
     disp("should not display")
 endfunction
 bar()
- should display
+  "should display"