From e6bb738b873e9922437c918426dd3c7b18968552 Mon Sep 17 00:00:00 2001 From: antirez Date: Thu, 31 Oct 2013 09:43:21 +0100 Subject: [PATCH] Regression test added for [SHZ]SCAN issue #1354. --- tests/unit/scan.tcl | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/tests/unit/scan.tcl b/tests/unit/scan.tcl index 71c4e365..511dd1fc 100644 --- a/tests/unit/scan.tcl +++ b/tests/unit/scan.tcl @@ -195,4 +195,12 @@ start_server {tags {"scan"}} { set keys2 [lsort -unique $keys2] assert_equal 100 [llength $keys2] } + + test "SSCAN with integer encoded object (issue #1345)" { + set objects {1 a} + r del set + r sadd set {*}$objects + set res [r sscan set 0 MATCH *a* COUNT 100] + assert_equal [lsort -unique [lindex $res 1]] {a} + } }