squish-tests.factor | searchcode

/extra/sequences/squish/squish-tests.factor

http://github.com/abeaumont/factor
Unknown | 8 lines | 7 code | 1 blank | 0 comment | 0 complexity | 0b57fa9e1db1e4ec14207a2a6f13ed14 MD5 | raw file

1! (c)2009 Slava Pestov & Joe Groff, see BSD license
2USING: kernel sequences sequences.squish tools.test vectors ;
3IN: sequences.squish.tests
4
5[ { { 1 2 3 } { 4 } { 5 6 } } ] [
6    V{ { 1 2 3 } V{ { 4 } { 5 6 } } }  
7    [ vector? ] { } squish
8] unit-test