Mercurial > hg > octave-nkf

comparison test/io.tst @ 19541:112fc552ea22

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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
comparison
equal deleted inserted replaced
19538:eb90f921bbc0 19541:112fc552ea22
607 %! frewind (id); 607 %! frewind (id);
608 %! [data, count] = fread (id, [3, Inf], "4*uint16", 3); 608 %! [data, count] = fread (id, [3, Inf], "4*uint16", 3);
609 %! assert (data, [256, 1798; 770, 3083; 1284, 3597]); 609 %! assert (data, [256, 1798; 770, 3083; 1284, 3597]);
610 %! assert (count, 6); 610 %! assert (count, 6);
611 %! fclose (id); 611 %! fclose (id);
612
613 %!test
614 %! id = tmpfile ();
615 %! fwrite (id, "abcd");
616 %! frewind (id);
617 %! [data, count] = fread (id, [2, 3], "char");
618 %! assert (data, [97, 99; 98, 100]);
619 %! assert (count, 4);
620 %! fclose (id);