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}
+    }
 }