mirror of
https://codeberg.org/redict/redict.git
synced 2025-01-23 16:48:27 -05:00
17 lines
498 B
Tcl
17 lines
498 B
Tcl
|
start_cluster 2 2 {tags {external:skip cluster}} {
|
||
|
|
test {Key lazy expires during key migration} {
|
||
|
|
R 0 DEBUG SET-ACTIVE-EXPIRE 0
|
||
|
|
|
||
|
|
set key_slot [R 0 CLUSTER KEYSLOT FOO]
|
||
|
|
R 0 set FOO BAR PX 10
|
||
|
|
set src_id [R 0 CLUSTER MYID]
|
||
|
|
set trg_id [R 1 CLUSTER MYID]
|
||
|
|
R 0 CLUSTER SETSLOT $key_slot MIGRATING $trg_id
|
||
|
|
R 1 CLUSTER SETSLOT $key_slot IMPORTING $src_id
|
||
|
|
after 11
|
||
|
|
assert_error {ASK*} {R 0 GET FOO}
|
||
|
|
R 0 ping
|
||
|
|
} {PONG}
|
||
|
|
}
|
||
|
|
|