couple more ordered set operations

jcrosby · May 30, 2011 · 7a34384 · 7a34384
1 parent eb8ad9b
commit 7a34384
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/src/clj_redis/client.clj b/src/clj_redis/client.clj
@@ -231,6 +231,12 @@
 (defn zremrangebyscore [p ^String k ^Double start ^Double end]
   (lease p (fn [^Jedis j] (.zremrangeByScore j k start end))))
 
+(defn zinterstore [p ^String d k]
+  (lease p (fn [^Jedis j] (.zinterstore j d ^"[Ljava.lang.String;" (into-array k)))))
+
+(defn zunionstore [p ^String d k]
+  (lease p (fn [^Jedis j] (.zunionstore j d ^"[Ljava.lang.String;" (into-array k)))))
+
 
 ; Hashes