summaryrefslogtreecommitdiff
path: root/tests/unit/dump.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/unit/dump.tcl')
-rw-r--r--tests/unit/dump.tcl13
1 files changed, 12 insertions, 1 deletions
diff --git a/tests/unit/dump.tcl b/tests/unit/dump.tcl
index 062d803b5..a9def9206 100644
--- a/tests/unit/dump.tcl
+++ b/tests/unit/dump.tcl
@@ -36,7 +36,18 @@ start_server {tags {"dump"}} {
assert {$ttl >= 2900 && $ttl <= 3100}
r get foo
} {bar}
-
+
+ test {RESTORE with ABSTTL in the past} {
+ r set foo bar
+ set encoded [r dump foo]
+ set now [clock milliseconds]
+ r debug set-active-expire 0
+ r restore foo [expr $now-3000] $encoded absttl REPLACE
+ catch {r debug object foo} e
+ r debug set-active-expire 1
+ set e
+ } {ERR no such key}
+
test {RESTORE can set LRU} {
r set foo bar
set encoded [r dump foo]