Mercurial > jwe > octave

comparison test/bug-45972.tst @ 30115:9080316864bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
update bug status in test suite
author John W. Eaton <jwe@octave.org>
date Thu, 02 Sep 2021 11:40:04 -0400
parents 2838bbd84b87
children
comparison
equal deleted inserted replaced
30114:2838bbd84b87 30115:9080316864bf
1 %!test <45972> 1 %!test <*45972>
2 %! ascii_filename = tempname (); 2 %! ascii_filename = tempname ();
3 %! binary_filename = tempname (); 3 %! binary_filename = tempname ();
4 %! f = @ (x, y, varargin) x + y + varargin{1}; 4 %! f = @ (x, y, varargin) x + y + varargin{1};
5 %! unwind_protect 5 %! unwind_protect
6 %! save ("-text", ascii_filename, "f"); 6 %! save ("-text", ascii_filename, "f");
12 %! unwind_protect_cleanup 12 %! unwind_protect_cleanup
13 %! unlink (ascii_filename); 13 %! unlink (ascii_filename);
14 %! unlink (binary_filename); 14 %! unlink (binary_filename);
15 %! end_unwind_protect 15 %! end_unwind_protect
16 16
17 %!testif HAVE_HDF5 <45972> 17 %!testif HAVE_HDF5 <*45972>
18 %! hdf5_filename = tempname (); 18 %! hdf5_filename = tempname ();
19 %! f = @ (x, y, varargin) x + y + varargin{1}; 19 %! f = @ (x, y, varargin) x + y + varargin{1};
20 %! unwind_protect 20 %! unwind_protect
21 %! save ("-hdf5", hdf5_filename, "f"); 21 %! save ("-hdf5", hdf5_filename, "f");
22 %! hdf5 = load (hdf5_filename); 22 %! hdf5 = load (hdf5_filename);