fluencelabs/redis
1
0
Fork 0
mirror of https://github.com/fluencelabs/redis synced 2025-04-25 18:42:13 +00:00
Code Issues Projects Releases Wiki Activity

Test: use higher level redis.tcl proc to read replies.

Browse Source
This commit is contained in:
antirez 2014-06-18 15:54:55 +02:00
parent 5260ce1260
commit 1c343ec29f
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/unit/basic.tcl
View File

@ -290,9 +290,9 @@ start_server {tags {"basic"}} {
puts -nonewline $fd "SET k1 xyzk\r\nGET k1\r\nPING\r\n" puts -nonewline $fd "SET k1 xyzk\r\nGET k1\r\nPING\r\n"
flush $fd flush $fd
set res {} set res {}
append res [string match OK* [::redis::redis_read_reply $fd]] append res [string match OK* [r read]]
append res [::redis::redis_read_reply $fd] append res [r read]
append res [string match PONG* [::redis::redis_read_reply $fd]] append res [string match PONG* [r read]]
format $res format $res
} {1xyzk1} } {1xyzk1}