Mercurial > octave
view test/bug-54490.tst @ 28106:c08d7b53f1a2
new function, rng
* rng.m: New function.
* scripts/general/module.mk: Update.
author | Guillaume Flandin |
---|---|
date | Wed, 19 Feb 2020 10:02:09 -0500 |
parents | cc9da21511c1 |
children | 2838bbd84b87 |
line wrap: on
line source
%!function out = bug54490 () %! global k; %! k = 1; %! out = 3; %!endfunction %!test %! global k; %! k = 2; %! a = [5, 6]; %! a(k) = bug54490 (); %! assert (a, [5, 3]); %! k = 2; %! a = [5, 6]; %! [a(k)] = bug54490 (); %! assert (a, [5, 3]); %! clear -global k; # cleanup after test