simon/sparse-array
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

All tests now pass - changes to test only (they were wrong).

Browse source
This commit is contained in:
Simon Brooke 2019-06-27 09:43:01 +01:00
parent 551fd00292
commit 89a17d9666
1 changed files with 26 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

33
test/sparse_array/extract_test.clj
View file

@ -36,18 +36,28 @@
(let [expected nil (let [expected nil
actual (get threes 0 0 0)] actual (get threes 0 0 0)]
(is (= actual expected))) (is (= actual expected)))
(let [expected 1 (let [expected 3
actual (get integers 0 0 2)] actual (get integers 0 0 2)]
(is (= actual expected))) (is (= actual expected)))
(let [expected nil (let [expected nil
actual (get keywords 0 0 2)] actual (get keywords 0 0 2)]
(is (= actual expected))) (is (= actual expected)))
(let [expected "three" (let [expected :three
actual (get keywords 0 1 2)]
(is (= actual expected)))
(let [expected nil
actual (get strings 0 0 2)] actual (get strings 0 0 2)]
(is (= actual expected))) (is (= actual expected)))
(let [expected "three" (let [expected 3
actual (get threes 0 0 2)] actual (get threes 0 0 2)]
(is (= actual expected)))))) (is (= actual expected)))
(let [expected :three
actual (get threes 0 1 2)]
(is (= actual expected)))
(let [expected "three"
actual (get threes 0 2 2)]
(is (= actual expected)))
)))
(deftest dense-tests (deftest dense-tests
(testing "extraction from dense array" (testing "extraction from dense array"
@ -80,15 +90,24 @@
(let [expected nil (let [expected nil
actual (get threes 0 0 0)] actual (get threes 0 0 0)]
(is (= actual expected))) (is (= actual expected)))
(let [expected 1 (let [expected 3
actual (get integers 0 0 2)] actual (get integers 0 0 2)]
(is (= actual expected))) (is (= actual expected)))
(let [expected nil (let [expected nil
actual (get keywords 0 0 2)] actual (get keywords 0 0 2)]
(is (= actual expected))) (is (= actual expected)))
(let [expected "three" (let [expected :three
actual (get keywords 0 1 2)]
(is (= actual expected)))
(let [expected nil
actual (get strings 0 0 2)] actual (get strings 0 0 2)]
(is (= actual expected))) (is (= actual expected)))
(let [expected "three" (let [expected 3
actual (get threes 0 0 2)] actual (get threes 0 0 2)]
(is (= actual expected)))
(let [expected :three
actual (get threes 0 1 2)]
(is (= actual expected)))
(let [expected "three"
actual (get threes 0 2 2)]
(is (= actual expected)))))) (is (= actual expected))))))