3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-18 03:36:10 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Add tests for pointer map

Browse source
This commit is contained in:
Andrey Antukh 2022-11-03 14:46:09 +01:00 • committed by Andrés Moya
parent aa9e125e31
commit efb0ec46bf
2 changed files with 125 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

9
backend/test/app_tests/test_util_objects_map.clj
View file

@ -36,13 +36,6 @@
(let [obj (dissoc obj id)]
(t/is (not (contains? obj id))))))
(t/testing "dissoc"
(let [id (uuid/custom 0 1)
obj (-> (omap/create) (assoc id {:foo 1}))]
(t/is (contains? obj id))
(let [obj (dissoc obj id)]
(t/is (not (contains? obj id))))))
(t/testing "seq"
(let [id (uuid/custom 0 1)
obj (-> (omap/create) (assoc id 1))]
@ -52,7 +45,7 @@
(t/is (= (key entry) id))
(t/is (= (val entry) 1)))))
(t/testing "const & count"
(t/testing "cons & count"
(let [obj (into (omap/create) [[uuid/zero 1]])]
(t/is (contains? obj uuid/zero))
(t/is (= 1 (count obj)))