summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorSerge Steer <serge.steer@scilab.org>2007-08-09 11:40:16 +0000
committerSerge Steer <serge.steer@scilab.org>2007-08-09 11:40:16 +0000
commit9d8185267288637bde096344c789edcfe02609c0 (patch)
treebe480449a3af17bd666dab50d8ce7fa28d74ab8f /tests
parent750a993825b1da3fdd461cd0d1f26ec1fb8714f1 (diff)
downloadscilab-9d8185267288637bde096344c789edcfe02609c0.zip
scilab-9d8185267288637bde096344c789edcfe02609c0.tar.gz
bug 1619 fix
Diffstat (limited to 'tests')
-rw-r--r--tests/nonRegression/bug1619.sci29
1 files changed, 29 insertions, 0 deletions
diff --git a/tests/nonRegression/bug1619.sci b/tests/nonRegression/bug1619.sci
new file mode 100644
index 0000000..cd86e6b
--- /dev/null
+++ b/tests/nonRegression/bug1619.sci
@@ -0,0 +1,29 @@
1// Non-regression test file for bug 1619
2// Copyright INRIA
3// Scilab Project - Serge Steer
4// Copyright INRIA 2006
5// Date : 2 octobre 2006
6
7mode(-1);
8clear;
9
10
11
12deff('x=foo(n)',['if n==0 then'
13 ' x=[]'
14 'else'
15 ' x=0'
16 ' for k=1:n'
17 ' s=svd(rand(n+10,n+10))'
18 ' x=x+s(1)'
19 ' end'
20 'end'],'p')
21T1=execstr('T=macr2tree(foo)','errcatch')==0;
22clear foo;
23function y=foo(),y=sin(33)+1;endfunction
24foo(); //execution creates a deleted op in the pseudo code of foo
25T2=execstr('macr2tree(foo)','errcatch')==0
26affich_result(T1&T2,1619);
27
28clear
29