Test:Fix invalid cases in hash.tcl and dump.tcl (#4611)
This commit is contained in:
parent
fbed632f3a
commit
ddcbb628a1
@ -170,7 +170,7 @@ start_server {tags {"dump"}} {
|
||||
$second set list somevalue
|
||||
catch {r -1 migrate $second_host $second_port list 9 5000 copy} e
|
||||
assert_match {ERR*} $e
|
||||
set res [r -1 migrate $second_host $second_port list 9 5000 copy replace]
|
||||
set ret [r -1 migrate $second_host $second_port list 9 5000 copy replace]
|
||||
assert {$ret eq {OK}}
|
||||
assert {[$first exists list] == 1}
|
||||
assert {[$second exists list] == 1}
|
||||
|
@ -302,7 +302,7 @@ start_server {tags {"hash"}} {
|
||||
r hset smallhash str " 11"
|
||||
r hset bighash str " 11"
|
||||
catch {r hincrby smallhash str 1} smallerr
|
||||
catch {r hincrby smallhash str 1} bigerr
|
||||
catch {r hincrby bighash str 1} bigerr
|
||||
set rv {}
|
||||
lappend rv [string match "ERR*not an integer*" $smallerr]
|
||||
lappend rv [string match "ERR*not an integer*" $bigerr]
|
||||
@ -312,7 +312,7 @@ start_server {tags {"hash"}} {
|
||||
r hset smallhash str "11 "
|
||||
r hset bighash str "11 "
|
||||
catch {r hincrby smallhash str 1} smallerr
|
||||
catch {r hincrby smallhash str 1} bigerr
|
||||
catch {r hincrby bighash str 1} bigerr
|
||||
set rv {}
|
||||
lappend rv [string match "ERR*not an integer*" $smallerr]
|
||||
lappend rv [string match "ERR*not an integer*" $bigerr]
|
||||
@ -374,7 +374,7 @@ start_server {tags {"hash"}} {
|
||||
r hset smallhash str " 11"
|
||||
r hset bighash str " 11"
|
||||
catch {r hincrbyfloat smallhash str 1} smallerr
|
||||
catch {r hincrbyfloat smallhash str 1} bigerr
|
||||
catch {r hincrbyfloat bighash str 1} bigerr
|
||||
set rv {}
|
||||
lappend rv [string match "ERR*not*float*" $smallerr]
|
||||
lappend rv [string match "ERR*not*float*" $bigerr]
|
||||
@ -384,7 +384,7 @@ start_server {tags {"hash"}} {
|
||||
r hset smallhash str "11 "
|
||||
r hset bighash str "11 "
|
||||
catch {r hincrbyfloat smallhash str 1} smallerr
|
||||
catch {r hincrbyfloat smallhash str 1} bigerr
|
||||
catch {r hincrbyfloat bighash str 1} bigerr
|
||||
set rv {}
|
||||
lappend rv [string match "ERR*not*float*" $smallerr]
|
||||
lappend rv [string match "ERR*not*float*" $bigerr]
|
||||
|
Loading…
x
Reference in New Issue
Block a user