1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2008 - INRIA
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
// compiled functions
deff('y=foo(a)','x=a+1000,stacksize(x),y=stacksize();y=y(1)')
a = stacksize();
a = a(1);
y = foo(a);
if y<>a+1000 then pause,end
a=y;
deff('y=toto()','a=stacksize();a=a(1);y=foo(a)')
y=toto();
if y<>a+1000 then pause,end
a=y;
exec(toto)
if y<>a+1000 then pause,end
a=y;
//in a loop
for k=1:3,
y=toto();
if y<>a+1000 then pause,end
a=y;
end
|
