Skip to content
Browse files

Merge pull request #10 from process/master

fixed read-bulk-reply in redis.lisp to work with 0-byte strings
  • Loading branch information...
2 parents b7e8ea7 + 4276820 commit e5c8af93e0e2e99420c6d93e8f2da57b3a039e97 @vseloved committed
Showing with 1 addition and 1 deletion.
  1. +1 −1 redis.lisp
View
2 redis.lisp
@@ -208,7 +208,7 @@ server with the first character removed."
(macrolet ((read-bulk-reply (&optional reply-transform)
`(let ((n (parse-integer reply)))
- (unless (<= n 0)
+ (unless (< n 0)
(let ((bytes (make-array n :element-type 'flex:octet))
(in (conn-stream *connection*)))
(read-sequence bytes in)

0 comments on commit e5c8af9

Please sign in to comment.
Something went wrong with that request. Please try again.