fix core tests
[scilab.git] / scilab / modules / core / tests / unit_tests / parse.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) ????-2008 - INRIA
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 funcprot(0);
9 //syntax with no explicit lhs
10 1
11  ans  =
12    1.
13 -1
14  ans  =
15   -1.
16 1+1
17  ans  =
18    2.
19 1==2
20  ans  =
21   F
22 [1 2 3]
23  ans  =
24    1.   2.   3.
25 ans(1)
26  ans  =
27    1.
28 [sin(3) 2 3]
29  ans  =
30    0.14112   2.   3.
31 sin(3)
32  ans  =
33    0.1411200
34 ans
35  ans  = 
36    0.1411200
37 ans==1
38  ans  =
39   F
40 [
41 ]
42  ans  =
43     []
44 [ans
45 ]
46  ans  =
47     []
48 "xxxxx"
49  ans  =
50   "xxxxx"
51 "xx=xxx"
52  ans  =
53   "xx=xxx"
54 disp xxx
55   "xxx"
56 //syntax with simple lhs
57 a=1
58  a  = 
59    1.
60 a=[1 2 3]
61  a  = 
62    1.   2.   3.
63 a=[1 2 3
64 4 5 6]
65  a  = 
66    1.   2.   3.
67    4.   5.   6.
68 a(2)=44
69  a  = 
70    1.    2.   3.
71    44.   5.   6.
72 clear c;c(5)=9
73  c  = 
74    0.
75    0.
76    0.
77    0.
78    9.
79 [m,k]=max(1:3)
80  m  = 
81    3.
82  k  = 
83    3.
84 [d1f d2f d3f d4f] = (1,2,3,4)
85  d1f  = 
86    1.
87  d2f  = 
88    2.
89  d3f  = 
90    3.
91  d4f  = 
92    4.
93 //if 10<>3 then x=disp('abcd'),end
94 if 10<>3 then disp("abcd"),end
95   "abcd"
96 //if 10<>3  x=disp('abcd'),end//matlab syntax
97 if 10<>3  disp("abcd"),end//matlab syntax
98   "abcd"
99 if (1==1) then "ok",end
100  ans  =
101   "ok"
102 for k=1:2,disp(k),end
103    1.
104    2.
105 function foo(k),disp(k),endfunction;
106 for k=1:2,foo(k),end
107    1.
108    2.
109 for k=1:2,(1+1),end
110  ans  =
111    2.
112  ans  =
113    2.
114 for k=1:2,[m,k]=max(1:k),end
115  m  = 
116    1.
117  k  = 
118    1.
119  m  = 
120    2.
121  k  = 
122    2.
123 for k=1:2,[1,2],end
124  ans  =
125    1.   2.
126  ans  =
127    1.   2.
128 for k=1:3 k,end //matlab syntax
129  k  = 
130    1.
131  k  = 
132    2.
133  k  = 
134    3.
135 //nouvelles syntaxes
136 [a(1),b(2)]=(3,4)
137  a  = 
138    3.    2.   3.
139    44.   5.   6.
140  b  = 
141    0.
142    4.
143 [a(1),x,b(2)]=(3,4,5)
144  a  = 
145    3.    2.   3.
146    44.   5.   6.
147  x  = 
148    4.
149  b  = 
150    0.
151    5.
152 [a(1),b(1,2),x]=(3,4,5)
153  a  = 
154    3.    2.   3.
155    44.   5.   6.
156  b  = 
157    0.   4.
158    5.   0.
159  x  = 
160    5.
161 I1=list(2,3);I2=list(1,2);
162 clear x y;[x,y(I2(:))]=(11,12)
163  x  = 
164    11.
165  y  = 
166    0.   12.
167 clear x y;[x(I1(:)),y]=(11,12)
168  x  = 
169    0.   0.   0. 
170    0.   0.   11.
171  y  = 
172    12.
173 clear x y;[x(I1(:)),y(I2(:))]=(11,12)
174  x  = 
175    0.   0.   0. 
176    0.   0.   11.
177  y  = 
178    0.   12.
179 str_l=list();str_l(1)=1;str_l(1)
180  ans  =
181    1.
182 l=list(1,2,3);l(3)=null()
183  l  = 
184        l(1)
185    1.
186        l(2)
187    2.
188 function []=foo()
189     [noeuds,triang]=resume(1,2)
190 endfunction
191 foo();disp([noeuds,triang])
192    1.   2.
193 function [a]=foo(x)
194     a=33
195     [noeuds,triang]=resume(45,sin(2))
196 endfunction
197 foo(%t)
198  ans  =
199    33.
200 function [a]=foo(x)
201     a=33
202     if x,  return,end
203 endfunction
204 foo(%t)
205  ans  =
206    33.
207 foo();disp([noeuds,triang])
208    45.   0.9092974
209 deff("t1=foo()","t1(2)= 1");foo()
210  ans  =
211    0.
212    1.
213 deff("t1=foo()","t1=list();t1(1)= 44;");foo()
214  ans  =
215        ans(1)
216    44.
217 deff("[a,b,x]=foo()","[a(1),b(1,2),x]=(3,4,5);");[a,b,x]=foo()
218  a  = 
219    3.
220  b  = 
221    0.   4.
222  x  = 
223    5.
224 function [a,b,x]=foo(),u=5;[a(1),b(1,2),x]=(3,4,u),a(2)=44,endfunction
225 [a,b,x]=foo()
226  a  = 
227    3. 
228    44.
229  b  = 
230    0.   4.
231  x  = 
232    5.
233 function [a,b,x]=foo(),[a,b,x]=(3,4,5),endfunction
234 [a,b,x]=foo()
235  a  = 
236    3.
237  b  = 
238    4.
239  x  = 
240    5.
241 function x=foo(),INDX=list(2,3); x(INDX(:))=11; endfunction
242 foo()
243  ans  =
244    0.   0.   0. 
245    0.   0.   11.
246 I1=list(2,3);I2=list(1,2);
247 function foo(),[x(I1(:)),y(I2(:))]=(11,12);disp(x,y), endfunction
248 foo()
249    0.   0.   0. 
250    0.   0.   11.
251    0.   12.
252 function l=foo(),l=list(1,2,3);l(3)=null();endfunction
253 foo()
254  ans  =
255        ans(1)
256    1.
257        ans(2)
258    2.
259 funcprot(1);