diff --git a/project.clj b/project.clj index 2df450a..5499e1c 100644 --- a/project.clj +++ b/project.clj @@ -1,4 +1,4 @@ -(defproject net.cgrand/xforms "0.19.0" +(defproject net.cgrand/xforms "0.19.1" :description "Extra transducers for Clojure" :url "https://github.com/cgrand/xforms" :license {:name "Eclipse Public License" diff --git a/src/net/cgrand/xforms/rfs.cljc b/src/net/cgrand/xforms/rfs.cljc index a055c65..8fc8a3b 100644 --- a/src/net/cgrand/xforms/rfs.cljc +++ b/src/net/cgrand/xforms/rfs.cljc @@ -39,11 +39,11 @@ :else a)))) ([#?(:clj ^java.util.Comparator comparator :cljs comparator) absolute-maximum] (fn - ([] ::+∞) - ([x] (if (#?(:clj identical? :cljs keyword-identical?) ::+∞ x) + ([] ::+infinity) + ([x] (if (#?(:clj identical? :cljs keyword-identical?) ::+infinity x) absolute-maximum x)) - ([a b] (if (or (#?(:clj identical? :cljs keyword-identical?) ::+∞ a) (pos? (#?(:clj .compare :cljs cmp) comparator a b))) b a))))) + ([a b] (if (or (#?(:clj identical? :cljs keyword-identical?) ::+infinity a) (pos? (#?(:clj .compare :cljs cmp) comparator a b))) b a))))) (defn maximum ([#?(:clj ^java.util.Comparator comparator :cljs comparator)] @@ -57,11 +57,11 @@ :else a)))) ([#?(:clj ^java.util.Comparator comparator :cljs comparator) absolute-minimum] (fn - ([] ::-∞) - ([x] (if (#?(:clj identical? :cljs keyword-identical?) ::-∞ x) + ([] ::-infinity) + ([x] (if (#?(:clj identical? :cljs keyword-identical?) ::-infinity x) absolute-minimum x)) - ([a b] (if (or (#?(:clj identical? :cljs keyword-identical?) ::-∞ a) (neg? (#?(:clj .compare :cljs cmp) comparator a b))) b a))))) + ([a b] (if (or (#?(:clj identical? :cljs keyword-identical?) ::-infinity a) (neg? (#?(:clj .compare :cljs cmp) comparator a b))) b a))))) (def min (minimum compare))