Skip to content

Commit e3ddece

Browse files
committed
fixed tests broken by is-approx=, is-data-approx=, or the new random. Also updated all tests to use t/ instead of :refer :all.
1 parent 38bd014 commit e3ddece

File tree

6 files changed

+338
-337
lines changed

6 files changed

+338
-337
lines changed

apache-math.iml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,12 +24,12 @@
2424
<orderEntry type="library" name="Deps: orchestra:2021.01.01-1" level="project" />
2525
<orderEntry type="library" name="Deps: org.clojure/tools.reader:1.5.0" level="project" />
2626
<orderEntry type="library" name="Deps: org.clojure/test.check:1.1.2" level="project" />
27-
<orderEntry type="library" name="Deps: provisdom/test:07d497" level="project" />
2827
<orderEntry type="library" name="Deps: org.clojure/core.memoize:1.1.266" level="project" />
2928
<orderEntry type="library" name="Deps: org.clojure/data.priority-map:1.2.0" level="project" />
3029
<orderEntry type="library" name="Deps: org.clojure/core.cache:1.1.234" level="project" />
3130
<orderEntry type="library" name="Deps: org.clojure/core.async:1.8.741" level="project" />
3231
<orderEntry type="module" module-name="utility-belt" />
3332
<orderEntry type="module" module-name="math" />
33+
<orderEntry type="module" module-name="test" />
3434
</component>
3535
</module>

bin/kaocha

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,3 @@
11
#!/usr/bin/env bash
22

3-
clojure -M:test:test-clj-runner "$@"
3+
clojure -M:local:test:test-clj-runner "$@"

deps.edn

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -6,6 +6,7 @@
66
:sha "c4bcc1478fa8d866baff56ec1bf5c4bb353c5353"}}
77
:aliases {:dev {:extra-paths ["siderail"]}
88
:local {:override-deps {provisdom/math {:local/root "../math"}
9+
provisdom/test {:local/root "../test"}
910
provisdom/utility-belt {:local/root "../utility-belt"}}}
1011
:test {:extra-paths ["test" "siderail"]
1112
:extra-deps {criterium/criterium {:mvn/version "0.4.6"}

test/provisdom/apache_math/alternative_random_test.clj

Lines changed: 16 additions & 16 deletions
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
(:require
33
[clojure.spec.test.alpha :as st]
44
[clojure.test :refer :all]
5-
[provisdom.test.core :refer :all]
5+
[provisdom.test.core :as t]
66
[provisdom.apache-math.alternative-random :as alt-random]))
77

88
;;? seconds
@@ -11,24 +11,24 @@
1111

1212
;;;APACHE RANDOM NUMBER GENERATORS
1313
(deftest quasi-rnd-vector-lazy-test
14-
(with-instrument `alt-random/quasi-rnd-vector-lazy
15-
(is (spec-check alt-random/quasi-rnd-vector-lazy)))
16-
(with-instrument (st/instrumentable-syms)
17-
(is= '([0.0] [0.5] [0.75])
14+
(t/with-instrument `alt-random/quasi-rnd-vector-lazy
15+
(is (t/spec-check alt-random/quasi-rnd-vector-lazy)))
16+
(t/with-instrument (st/instrumentable-syms)
17+
(t/is= '([0.0] [0.5] [0.75])
1818
(take 3 (alt-random/quasi-rnd-vector-lazy 1)))
19-
(is= '([0.0 0.0] [0.5 0.5] [0.75 0.25])
19+
(t/is= '([0.0 0.0] [0.5 0.5] [0.75 0.25])
2020
(take 3 (alt-random/quasi-rnd-vector-lazy 2)))))
2121

2222
(deftest secure-rnd-lazy-test
23-
(with-instrument `alt-random/secure-rnd-lazy
24-
(is (spec-check alt-random/secure-rnd-lazy)))
25-
(with-instrument (st/instrumentable-syms)
26-
(is= 0.26673862796330083 (first (alt-random/secure-rnd-lazy 4)))
27-
(is= 0.9214463212165593 (first (alt-random/secure-rnd-lazy 0)))))
23+
(t/with-instrument `alt-random/secure-rnd-lazy
24+
(is (t/spec-check alt-random/secure-rnd-lazy)))
25+
(t/with-instrument (st/instrumentable-syms)
26+
(t/is= 0.26673862796330083 (first (alt-random/secure-rnd-lazy 4)))
27+
(t/is= 0.9214463212165593 (first (alt-random/secure-rnd-lazy 0)))))
2828

2929
(deftest mersenne-rnd-lazy-test
30-
(with-instrument `alt-random/mersenne-rnd-lazy
31-
(is (spec-check alt-random/mersenne-rnd-lazy)))
32-
(with-instrument (st/instrumentable-syms)
33-
(is= 0.8335762378570932 (first (alt-random/mersenne-rnd-lazy 4)))
34-
(is= 0.15071724896777527 (first (alt-random/mersenne-rnd-lazy 0)))))
30+
(t/with-instrument `alt-random/mersenne-rnd-lazy
31+
(is (t/spec-check alt-random/mersenne-rnd-lazy)))
32+
(t/with-instrument (st/instrumentable-syms)
33+
(t/is= 0.8335762378570932 (first (alt-random/mersenne-rnd-lazy 4)))
34+
(t/is= 0.15071724896777527 (first (alt-random/mersenne-rnd-lazy 0)))))

0 commit comments

Comments
 (0)