1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2005-2008 - INRIA - Serge Steer
5 // This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- Non-regression test for bug 2072 -->
9 // <-- Bugzilla URL -->
10 // http://bugzilla.scilab.org/show_bug.cgi?id=2072
12 // <-- Short Description -->
13 // incorrect clause uncorrectly handled under errcatch
14 // <-- CLI SHELL MODE -->
15 mkdir(TMPDIR,"b2072");
16 txt=["function test()"
24 mputl(txt,TMPDIR+"/b2072/test.sci");
25 txt=["function testOK()"
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