fix core tests
[scilab.git] / scilab / modules / core / tests / unit_tests / eq_neq_priority.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2010 - DIGITEO - Bruno JOFRET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 // This test is to show priority between == and <> operator
9 // the disp are done on purpose to track the calls.
10 function b=a(x)
11   disp("Compute "+x)
12   b=tlist(["tut", "val"], %t)
13 endfunction
14 function c=%tut_o_tut(a,b)
15   disp("Calling %tut_o_tut")
16   c = b
17 endfunction
18 function c=%tut_n_tut(a,b)
19  disp("Calling %tut_n_tut")
20  c = b
21 endfunction
22 // Compute 1
23 // Compute 2
24 // Calling %tut_o_tut
25 // Compute 3
26 // Compute 4
27 // Calling %tut_o_tut
28 // Calling %tut_n_tut
29 (a("1") == a("2")) <> (a("3")==a("4"));
30   "Compute 1"
31   "Compute 2"
32   "Calling %tut_o_tut"
33   "Compute 3"
34   "Compute 4"
35   "Calling %tut_o_tut"
36   "Calling %tut_n_tut"
37 // Compute 1
38 // Compute 2
39 // Calling %tut_o_tut
40 // Compute 3
41 // Calling %tut_n_tut
42 // Compute 4
43 // Calling %tut_o_tut
44 a("1") == a("2") <> a("3")==a("4");
45   "Compute 1"
46   "Compute 2"
47   "Calling %tut_o_tut"
48   "Compute 3"
49   "Calling %tut_n_tut"
50   "Compute 4"
51   "Calling %tut_o_tut"