fix bug_6690: up date random permutations
[scilab.git] / scilab / modules / core / tests / unit_tests / not_compiled_functions.tst
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
8 //non compiled functions
9
10 deff("y=foo(a)","x=a+1000,stacksize(x),y=stacksize();y=y(1)","n");
11
12 a = stacksize();
13 a = a(1);
14 y = foo(a);
15
16 if y<>a+1000 then pause,end
17
18 a = y;
19 deff("y=toto()","a=stacksize();a=a(1);y=foo(a)","n");
20 y = toto();
21
22 if y<>a+1000 then pause,end
23 a=y;
24 exec(toto);
25 if y<>a+1000 then pause,end
26 a=y;