Mercurial > hg > octave-nkf
diff test/io.tst @ 19541:112fc552ea22
maint: Periodic merge of gui-release to default.
author | Rik <rik@octave.org> |
---|---|
date | Sat, 22 Nov 2014 20:20:13 -0800 |
parents | 6ca096827123 2a790328fc50 |
children | 03067dab10ca |
line wrap: on
line diff
--- a/test/io.tst +++ b/test/io.tst @@ -609,3 +609,12 @@ %! assert (data, [256, 1798; 770, 3083; 1284, 3597]); %! assert (count, 6); %! fclose (id); + +%!test +%! id = tmpfile (); +%! fwrite (id, "abcd"); +%! frewind (id); +%! [data, count] = fread (id, [2, 3], "char"); +%! assert (data, [97, 99; 98, 100]); +%! assert (count, 4); +%! fclose (id);