7bc5cdcc33c74e6f70f52a033f43f6374bbe66cf
[scilab.git] / scilab / modules / data_structures / tests / unit_tests / setfield.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2015 - Scilab Enterprises - Cedric Delamarre
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 l = list(1, "string", %s);
9 setfield(2, "newString", l);
10 assert_checkequal(l, list(1, "newString", %s));
11 setfield(0, "front", l);
12 assert_checkequal(l, list("front", 1, "newString", %s));
13 // b must not be modified
14 a = list(2);
15 b = a;
16 setfield(1, 15, a);
17 assert_checkequal(a, list(15));
18 assert_checkequal(b, list(2));