factor/extra/redis/response-parser/response-parser-tests.factor

21 lines
666 B
Factor

! Copyright (C) 2009 Bruno Deferrari
! See http://factorcode.org/license.txt for BSD license.
USING: tools.test redis.response-parser io.streams.string ;
IN: redis.response-parser.tests
[ 1 ] [ ":1\r\n" [ read-response ] with-string-reader ] unit-test
[ "hello" ] [ "$5\r\nhello\r\n" [ read-response ] with-string-reader ] unit-test
[ f ] [ "$-1\r\n" [ read-response ] with-string-reader ] unit-test
[ { "hello" "world!" } ] [
"*2\r\n$5\r\nhello\r\n$6\r\nworld!\r\n" [ read-response ] with-string-reader
] unit-test
[ { "hello" f "world!" } ] [
"*3\r\n$5\r\nhello\r\n$-1\r\n$6\r\nworld!\r\n" [
read-response
] with-string-reader
] unit-test