fix library path
[scilab.git] / scilab / modules / string / tests / unit_tests / string.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2007-2008 - INRIA
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 //===============================
9 // unit tests string
10 //===============================
11 assert_checkequal(string(1), "1");
12 //===============================
13 assert_checkequal(string(1.5), "1.5");
14 //===============================
15 // Special display cases :
16 assert_checkequal(string(0+%i), "%i");
17 assert_checkequal(string(0-%i), "-%i");
18 assert_checkequal(string(0+0*%i), "0");
19 assert_checkequal(string(-1+%i), "-1+%i");
20 assert_checkequal(string(-1-%i), "-1-%i");
21 assert_checkequal(string(0+2*%i), "%i*2");
22 assert_checkequal(string(0-2*%i), "-%i*2");
23 assert_checkequal(string(-2+2*%i), "-2+%i*2");
24 assert_checkequal(string(-2-2*%i), "-2-%i*2");
25 // BUG #10082
26 //assert_checkequal(string(1+%i), "1+%i");
27 //assert_checkequal(string(1-%i), "1-%i");
28 //assert_checkequal(string(2+2*%i), "2+%i*2");
29 //assert_checkequal(string(2-2*%i), "2-%i*2");
30 //===============================
31 assert_checkequal(string([]), []);
32 //===============================
33 assert_checkequal(string(""), "");
34 //===============================
35 assert_checkequal(string(1:3), ["1","2","3"]);
36 //===============================
37 assert_checkequal(string([1;2;3]), ["1";"2";"3"]);
38 //===============================
39 assert_checkequal(string("foo"), "foo");
40 //===============================
41 deff("y = mymacro(x)", "y = x + 1");
42 [out, in, text] = string(mymacro);
43 assert_checkequal(out, "y");
44 assert_checkequal(in, "x");
45 assert_checkequal(text, [" "; "y = x + 1"; " "]);
46 //===============================
47 mymacro = null();
48 deff("y = mymacro(x)", "y = x + 1", "n");
49 [out, in, text]=string(mymacro);
50 assert_checkequal(out, "y");
51 assert_checkequal(in, "x");
52 assert_checkequal(text, [" "; "y = x + 1"; " "]);
53 //===============================
54 R = string(corelib);
55 assert_checkequal(strsubst(R(1),"\","/"), "SCI/modules/core/macros/");
56 //===============================
57 A = floor(abs(2^8  * rand(10,10)));
58 B = floor(abs(2^16 * rand(10,10)));
59 C = floor(abs(2^32 * rand(10,10)));
60 D = floor(abs(2^7  * rand(10,10)));
61 E = floor(abs(2^15 * rand(10,10)));
62 F = floor(abs(2^31 * rand(10,10)));
63 assert_checkequal(string(A), string(uint8(A)));
64 assert_checkequal(string(B), string(uint16(B)));
65 assert_checkequal(string(C), string(uint32(C)));
66 assert_checkequal(string(D), string(int8(D)));
67 assert_checkequal(string(E), string(int16(E)));
68 assert_checkequal(string(F), string(int32(F)));