1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2008 - INRIA
5 // This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 //non compiled functions
8 deff("y=foo(a)","x=a+1000,stacksize(x),y=stacksize();y=y(1)","n");
12 if y<>a+1000 then bugmes();quit;end
14 deff("y=toto()","a=stacksize();a=a(1);y=foo(a)","n");
16 if y<>a+1000 then bugmes();quit;end
22 if y<>a+1000 then bugmes();quit;end