Filtering empty sequential returns empty sequential. EOM

timvisher · Apr 12, 2012 · 24b7584 · 24b7584
1 parent 61399d3
commit 24b7584
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/ft3/product-currying/src/product_currying/core.clj b/ft3/product-currying/src/product_currying/core.clj
@@ -74,4 +74,5 @@
 
 (defn my-filter [predicate sequence]
   {:pre [(sequential? sequence)
-         (every? integer? sequence)]})
+         (every? integer? sequence)]}
+  (when (empty? sequence) sequence))