Mercurial > hg > octave-lyh
view test/bug-38576.tst @ 16482:84873dc19757
maint: merge stable to default.
author | Rik <rik@octave.org> |
---|---|
date | Tue, 09 Apr 2013 16:13:36 -0700 |
parents | 11115c237231 |
children |
line wrap: on
line source
%!function r = f1 () %! ls = svd (1); %! r = eval ("ls -1;"); %!endfunction %!function r = f2 () %! [u,ls,v] = svd (1); %! r = eval ("ls -1;"); %!endfunction %!function r = f3 (ls) %! r = eval ("ls -1;"); %!endfunction %!assert (f1 (), 0); %!assert (f2 (), 0); %!assert (ischar (f3 ()), true); %!assert (f3 (1), 0);