Toolboxes menu: case-insensitive sorting
[scilab.git] / scilab / modules / types / tests / unit_tests / fieldnames.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2015 - Scilab Enterprises - Paul Bignier
4 // Copyright (C) 2009 - INRIA - Serge.Steer@inria.fr
5 //
6 //  This file is distributed under the same license as the Scilab package.
7 // =============================================================================
8 //
9 // <-- XCOS TEST -->
10 //
11 // <-- ENGLISH IMPOSED -->
12 //
13 // <-- CLI SHELL MODE -->
14 // unit tests for fieldnames function
15 // =============================================================================
16 assert_checkequal(fieldnames(1), []);
17 my_struct = struct("field_1", 123, "field_2", 456);
18 assert_checkequal(fieldnames(my_struct), ["field_1"; "field_2"]);
19 clear T;
20 T.a = rand(2, 2);
21 T.b = "s";
22 assert_checkequal(fieldnames(T), ["a"; "b"]);
23 assert_checkequal(fieldnames(1/%s), ["num"; "den"; "dt"]);
24 M = mlist(["foo" "A" "B" "C"], [], [], []);
25 assert_checkequal(fieldnames(M), ["A"; "B"; "C"]);
26 // Scicos objects
27 d = scicos_diagram();
28 assert_checkequal(fieldnames(d), ["props"; "objs"; "version"; "contrib"]);
29 b = scicos_block();
30 assert_checkequal(fieldnames(b), ["graphics"; "model"; "gui"; "doc"]);
31 l = scicos_link();
32 assert_checkequal(fieldnames(l), ["xx"; "yy"; "id"; "thick"; "ct"; "from"; "to"]);