* bug #14801 fixed: [cells1 cells2] puzzled cells components
[scilab.git] / scilab / modules / string / tests / unit_tests / emptystr.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2007-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 //===============================
9 // unit tests emptystr
10 //===============================
11 s = emptystr();
12 if (s <> '') then bugmes();quit;end;
13 //===============================
14 s = emptystr([]);
15 if (s <> []) then bugmes();quit;end;
16 //===============================
17 s = emptystr("Scilab");
18 d = size(s);
19 if (d <> [1 1]) then bugmes();quit;end;
20 if (s <> '') then bugmes();quit;end;
21 //===============================
22 MS = ["Scilab";"String"];
23 s = emptystr(MS);
24 d = size(s);
25 if (d <> size(MS)) then bugmes();quit;end;
26 if or(s <> '') then bugmes();quit;end;
27 //===============================
28 M = 5;
29 N = 3;
30 s = emptystr(M,N);
31 d = size(s);
32 if (d <> [M N]) then bugmes();quit;end;
33 if or(s <> '') then bugmes();quit;end;
34 //===============================
35 M = 200;
36 N = 300;
37 s = emptystr(M,N);
38 d = size(s);
39 if (d <> [M N]) then bugmes();quit;end;
40 if or(s <> '') then bugmes();quit;end;
41 //===============================
42 s = emptystr(0,0);
43 if (s <> []) then bugmes();quit;end;
44 //===============================
45 s = emptystr(0);
46 d = size(s);
47 if (d <> [1 1]) then bugmes();quit;end;
48 if (s <> '') then bugmes();quit;end;
49 //===============================
50 M = 200;
51 s = emptystr(M);
52 d = size(s);
53 if (d <> [1 1]) then bugmes();quit;end;
54 if (s <> '') then bugmes();quit;end;
55 //===============================
56 if ( size(emptystr(0,1)) <> [ 0 0 ] ) then bugmes();quit;end
57 //===============================