]> gitweb.factorcode.org Git - factor.git/blob - extra/tools/image-analyzer/utils/utils-tests.factor
tools.image-analyzer: new set of vocabs for reading and analyzing factor images
[factor.git] / extra / tools / image-analyzer / utils / utils-tests.factor
1 USING: io io.encodings.binary io.streams.byte-array
2 tools.image-analyzer.utils tools.test ;
3 IN: tools.image-analyzer.utils.tests
4
5 {
6     B{ 5 6 7 8 }
7     B{ 1 2 3 4 }
8 } [
9     B{ 1 2 3 4 5 6 7 8 } binary <byte-reader> <backwards-reader> [
10         4 read 4 read
11     ] with-input-stream
12 ] unit-test