diff options
author | Matt Stancliff <matt@genges.com> | 2014-04-10 18:32:19 -0400 |
---|---|---|
committer | Matt Stancliff <matt@genges.com> | 2014-04-10 18:32:19 -0400 |
commit | 88530804e8c7ad977277ea693026b2b0a5f4816d (patch) | |
tree | 0fc7cc9e8d634b3995c286a166a60a4de28254c6 | |
parent | 83d28303725ea48e6ba1ab08b57d1eacf9137961 (diff) | |
download | redis-88530804e8c7ad977277ea693026b2b0a5f4816d.tar.gz |
Add test for deleting an expired key
Verify proper expire-before-delete behavior.
This test passes with the expire-before-delete commit and fails
without it.
-rw-r--r-- | tests/unit/basic.tcl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/unit/basic.tcl b/tests/unit/basic.tcl index 1f46ba666..8da358968 100644 --- a/tests/unit/basic.tcl +++ b/tests/unit/basic.tcl @@ -261,6 +261,14 @@ start_server {tags {"basic"}} { assert_equal 20 [r get x] } + test "DEL against expired key" { + r debug set-active-expire 0 + r setex keyExpire 1 valExpire + after 1100 + assert_equal 0 [r del keyExpire] + r debug set-active-expire 1 + } + test {EXISTS} { set res {} r set newkey test |