From 5e14c0cce9db90fa3631b365860132fbfdb0570b Mon Sep 17 00:00:00 2001 From: Tj Gabbour Date: Thu, 7 May 2015 17:04:30 +0200 Subject: [PATCH] Typo fixes (:hald-even and "rouding"). --- src/clojure/clojurewerkz/money/amounts.clj | 8 ++++---- test/clojurewerkz/money/amounts_test.clj | 16 ++++++++-------- 2 files changed, 12 insertions(+), 12 deletions(-) diff --git a/src/clojure/clojurewerkz/money/amounts.clj b/src/clojure/clojurewerkz/money/amounts.clj index 9bc963d..23aba5a 100644 --- a/src/clojure/clojurewerkz/money/amounts.clj +++ b/src/clojure/clojurewerkz/money/amounts.clj @@ -107,7 +107,7 @@ mode which is one of: * java.math.RoundingMode instances - * :floor, :ceiling, :up, :down, :half-up, :half-down, :hald-even that correspond to + * :floor, :ceiling, :up, :down, :half-up, :half-down, :half-even that correspond to java.math.RoundingMode constants with the same names * nil for no rounding" ([^Money money ^double multiplier] @@ -120,7 +120,7 @@ mode which is one of: * java.math.RoundingMode instances - * :floor, :ceiling, :up, :down, :half-up, :half-down, :hald-even that correspond to + * :floor, :ceiling, :up, :down, :half-up, :half-down, :half-even that correspond to java.math.RoundingMode constants with the same names * nil for no rounding" ([^Money money ^double multiplier] @@ -220,7 +220,7 @@ Rounding mode should be one of: * java.math.RoundingMode instances - * :floor, :ceiling, :up, :down, :half-up, :half-down, :hald-even that correspond to + * :floor, :ceiling, :up, :down, :half-up, :half-down, :half-even that correspond to java.math.RoundingMode constants with the same names * nil for no rounding" [^Money money ^long scale rounding-mode] @@ -235,7 +235,7 @@ Rounding mode should be one of: * java.math.RoundingMode instances - * :floor, :ceiling, :up, :down, :half-up, :half-down, :hald-even that correspond to + * :floor, :ceiling, :up, :down, :half-up, :half-down, :half-even that correspond to java.math.RoundingMode constants with the same names * nil for no rounding" [^Money money ^CurrencyUnit currency multiplier rounding-mode] diff --git a/test/clojurewerkz/money/amounts_test.clj b/test/clojurewerkz/money/amounts_test.clj index 0c1e025..387f85e 100644 --- a/test/clojurewerkz/money/amounts_test.clj +++ b/test/clojurewerkz/money/amounts_test.clj @@ -302,35 +302,35 @@ (is (= ma (ams/amount-of cu/USD 50))))) (deftest test-round - (testing "with scale -1 and flooring rouding mode" + (testing "with scale -1 and flooring rounding mode" (let [oa (ams/amount-of cu/USD 40.01) ma (ams/round oa -1 :floor)] (is (= ma (ams/amount-of cu/USD 40)))) - (testing "with scale -1 and up rouding mode" + (testing "with scale -1 and up rounding mode" (let [oa (ams/amount-of cu/USD 40.01) ma (ams/round oa -1 :up)] (is (= ma (ams/amount-of cu/USD 50))))) - (testing "with scale 0 and flooring rouding mode" + (testing "with scale 0 and flooring rounding mode" (let [oa (ams/amount-of cu/USD 45.24) ma (ams/round oa 0 :floor)] (is (= ma (ams/amount-of cu/USD 45))))) - (testing "with scale 0 and up rouding mode" + (testing "with scale 0 and up rounding mode" (let [oa (ams/amount-of cu/USD 45.24) ma (ams/round oa 0 :up)] (is (= ma (ams/amount-of cu/USD 46))))) - (testing "with scale 1 and flooring rouding mode" + (testing "with scale 1 and flooring rounding mode" (let [oa (ams/amount-of cu/USD 45.24) ma (ams/round oa 1 :floor)] (is (= ma (ams/amount-of cu/USD 45.20))))) - (testing "with scale 1 and up rouding mode" + (testing "with scale 1 and up rounding mode" (let [oa (ams/amount-of cu/USD 45.24) ma (ams/round oa 1 :up)] (is (= ma (ams/amount-of cu/USD 45.30))))) - (testing "with scale 2 and flooring rouding mode" + (testing "with scale 2 and flooring rounding mode" (let [oa (ams/amount-of cu/USD 45.24) ma (ams/round oa 2 :floor)] (is (= ma (ams/amount-of cu/USD 45.24))))) - (testing "with scale 2 and up rouding mode" + (testing "with scale 2 and up rounding mode" (let [oa (ams/amount-of cu/USD 45.24) ma (ams/round oa 1 :up)] (is (= ma (ams/amount-of cu/USD 45.30)))))))