diff --git a/tests/unit/hyperloglog.tcl b/tests/unit/hyperloglog.tcl index af86e68e52a1dd999664c5000f89fb1dc0ae3242..3f51420760bbd3bdcb03afe022c83cb447f363d6 100644 --- a/tests/unit/hyperloglog.tcl +++ b/tests/unit/hyperloglog.tcl @@ -156,4 +156,15 @@ start_server {tags {"hll"}} { r pfadd hll 1 2 3 llength [r pfdebug getreg hll] } {16384} + + test {PFADD / PFCOUNT cache invalidation works} { + r del hll + r pfadd hll a b c + r pfcount hll + assert {[r getrange hll 15 15] eq "\x00"} + r pfadd hll a b c + assert {[r getrange hll 15 15] eq "\x00"} + r pfadd hll 1 2 3 + assert {[r getrange hll 15 15] eq "\x80"} + } }