Regression test for issue #2175.

2014-12-03 10:38:56 +01:00 · 2014-12-03 10:38:56 +01:00 · b8a48ad5fe
parent 3632026210
commit b8a48ad5fe
1 changed files with 10 additions and 0 deletions
--- a/tests/unit/scan.tcl
+++ b/tests/unit/scan.tcl
@ -226,4 +226,14 @@ start_server {tags {"scan"}} {
        set res [r zscan mykey 0 MATCH foo* COUNT 10000]
        lsort -unique [lindex $res 1]
    }
+
+    test "ZSCAN scores: regression test for issue #2175" {
+        r del mykey
+        for {set j 0} {$j < 500} {incr j} {
+            r zadd mykey 9.8813129168249309e-323 $j
+        }
+        set res [lindex [r zscan mykey 0] 1]
+        set first_score [lindex $res 1]
+        assert {$first_score != 0}
+    }
 }