diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/clojure/contrib/generic/functor.clj | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/clojure/contrib/generic/functor.clj b/src/clojure/contrib/generic/functor.clj index 1198c510..8611916f 100644 --- a/src/clojure/contrib/generic/functor.clj +++ b/src/clojure/contrib/generic/functor.clj @@ -1,7 +1,7 @@ ;; Generic interface for functors ;; by Konrad Hinsen -;; last updated March 18, 2009 +;; last updated March 23, 2009 ;; Copyright (c) Konrad Hinsen, 2009. All rights reserved. The use ;; and distribution terms for this software are covered by the Eclipse @@ -21,9 +21,9 @@ {:arglists '([f s])} (fn [f s] (type s))) -(defmethod fmap clojure.lang.ISeq - [f s] - (map f s)) +(defmethod fmap clojure.lang.IPersistentList + [f v] + (into (empty v) (map f v))) (defmethod fmap clojure.lang.IPersistentVector [f v] |