c402376c45b581540f91dcec0caed2f2fc0ee742
[scilab.git] / scilab / modules / overloading / tests / nonreg_tests / bug_3222.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2008 - INRIA - Serge Steer
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7
8 //
9 // <-- CLI SHELL MODE -->
10 //
11 // <-- Non-regression test for bug 3222 -->
12 //
13 // <-- Bugzilla URL -->
14 // http://bugzilla.scilab.org/show_bug.cgi?id=3222
15 //
16 // <-- Short Description -->
17 // indexing problem
18 clear D;D(1)(2)="3";
19 if or(D<>["" "3"]) then pause,end
20
21 clear D;D(1).x="3";
22 if D.x<>"3" then pause,end
23
24 clear D;D(1,2).x="3";
25 if D(1).x<>[]  then pause,end
26 if D(2).x<>"3"  then pause,end
27
28
29 clear D;D.x(1,2)="3";
30 if or(D.x<>["" "3"]) then pause,end
31
32 clear D;D(1,1,2)="3";
33 if D(1,1,2)<>"3"  then pause,end