"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "tests/support/redis.tcl" between
redis-6.2-rc3.tar.gz and redis-6.2.0.tar.gz

About: redis is an advanced key-value store. It is often referred to as a data structure server since keys can contain strings, hashes, lists, sets and sorted sets.

redis.tcl  (redis-6.2-rc3):redis.tcl  (redis-6.2.0)
skipping to change at line 251 skipping to change at line 251
proc ::redis::redis_read_reply {id fd} { proc ::redis::redis_read_reply {id fd} {
set type [read $fd 1] set type [read $fd 1]
switch -exact -- $type { switch -exact -- $type {
_ {redis_read_null $fd} _ {redis_read_null $fd}
: - : -
+ {redis_read_line $fd} + {redis_read_line $fd}
, {expr {double([redis_read_line $fd])}} , {expr {double([redis_read_line $fd])}}
- {return -code error [redis_read_line $fd]} - {return -code error [redis_read_line $fd]}
$ {redis_bulk_read $fd} $ {redis_bulk_read $fd}
> - > -
~ -
* {redis_multi_bulk_read $id $fd} * {redis_multi_bulk_read $id $fd}
% {redis_read_map $id $fd} % {redis_read_map $id $fd}
default { default {
if {$type eq {}} { if {$type eq {}} {
catch {close $fd} catch {close $fd}
set ::redis::fd($id) {} set ::redis::fd($id) {}
return -code error "I/O error reading reply" return -code error "I/O error reading reply"
} }
return -code error "Bad protocol, '$type' as reply type byte" return -code error "Bad protocol, '$type' as reply type byte"
} }
 End of changes. 1 change blocks. 
0 lines changed or deleted 1 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)