Mercurial > octave-libtiff
view test/bug-54490.tst @ 31192:6a2bb6f4e41e
__tiff__.cc (F__tiff_imread__): fixed bug where file was not closed on errors.
author | magedrifaat <magedrifaat@gmail.com> |
---|---|
date | Sat, 27 Aug 2022 16:23:59 +0200 |
parents | 9080316864bf |
children |
line wrap: on
line source
%!function out = bug54490 () %! global k; %! k = 1; %! out = 3; %!endfunction %!test <*54490> %! 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