diff options
| author | Frantisek Sodomka <fsodomka@gmail.com> | 2009-02-24 10:05:04 +0000 |
|---|---|---|
| committer | Frantisek Sodomka <fsodomka@gmail.com> | 2009-02-24 10:05:04 +0000 |
| commit | e10ba55de498e5e5687ccfb475250d6513ead677 (patch) | |
| tree | 3def5f3d2347ed070552b3c04eaf64440351c5de /src/clojure/contrib/test_clojure/numbers.clj | |
| parent | c7f3ec5bea8cc04da8453446e54d0a29333060b0 (diff) | |
test numbers: non-integer tests for 'mod' since Clojure SVN 1302
Diffstat (limited to 'src/clojure/contrib/test_clojure/numbers.clj')
| -rw-r--r-- | src/clojure/contrib/test_clojure/numbers.clj | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/src/clojure/contrib/test_clojure/numbers.clj b/src/clojure/contrib/test_clojure/numbers.clj index 62a11b9d..31341789 100644 --- a/src/clojure/contrib/test_clojure/numbers.clj +++ b/src/clojure/contrib/test_clojure/numbers.clj @@ -107,14 +107,12 @@ (mod 6 4) 2 (mod 0 5) 0 -;; Removed non-integer tests for Clojure SVN r1227+ + (mod 2 1/2) 0 + (mod 2/3 1/2) 1/6 + (mod 1 2/3) 1/3 -;; (mod 2 1/2) 0 -;; (mod 2/3 1/2) 1/6 -;; (mod 1 2/3) 1/3 - -;; (mod 4.0 2.0) 0.0 -;; (mod 4.5 2.0) 0.5 + (mod 4.0 2.0) 0.0 + (mod 4.5 2.0) 0.5 ; |num| > |div|, num != k * div (mod 42 5) 2 ; (42 / 5) * 5 + (42 mod 5) = 8 * 5 + 2 = 42 |