exec and ecestr fixed about parsing error.
[scilab.git] / scilab / modules / core / tests / nonreg_tests / bug_2072.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2005-2008 - INRIA - Serge Steer
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- Non-regression test for bug 2072 -->
8 //
9 // <-- Bugzilla URL -->
10 // http://bugzilla.scilab.org/show_bug.cgi?id=2072
11 //
12 // <-- Short Description -->
13 //   incorrect clause uncorrectly handled under errcatch
14 // <-- CLI SHELL MODE -->
15 mkdir(TMPDIR,"b2072");
16 txt=["function test()"
17 "if 1 ~=1 then"
18 "   a=3;"
19 "end"
20 "else"
21 "   a=7;"
22 "end"
23 "endfunction"];
24 mputl(txt,TMPDIR+"/b2072/test.sci");
25 txt=["function testOK()"
26 "a=3;"
27 "   end"
28 "endfunction   "];
29 mputl(txt,TMPDIR+"/b2072/testOK.sci");
30 if execstr("exec(TMPDIR+''/b2072/test.sci'');","errcatch")==0 then bugmes();quit;end
31 if execstr("exec(TMPDIR+''/b2072/testOK.sci'');","errcatch")==0 then bugmes();quit;end