noe/arthur
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move palette controls to sidebar and expand stage navigation

Browse source
This commit is contained in:
Olive Vaughn 2026-10-04 00:40:20 -04:00
parent 1ae49a4015
commit 484b4f1698
9 changed files with 175 additions and 49 deletions
Download patch file Download diff file Expand all files Collapse all files

9
frontend/test/arthur/domain/outline_test.cljs
View file

@ -96,3 +96,12 @@
(is (zero? (aget back (+ 25 (* 20 60)))) "and is a hole")
(is (every? #(< (count %) 30) rs) "and simple")
(is (zero? (aget back (+ 5 (* 5 60)))) "and nothing outside the body is filled"))))
(deftest a-brush-mask-can-live-outside-the-export-rectangle
(let [m (assoc (outline/mask 60 50) :origin [-20 -20])
normal (outline/stamp! (outline/mask 60 50) [10 12] [30 24] 6)
outside (outline/stamp! m [-10 -8] [10 4] 6)
shift (fn [ring] (mapv #(- % 20) ring))]
(is (= (vec (array-seq (:buf normal))) (vec (array-seq (:buf outside)))))
(is (= (mapv shift (outline/rings normal)) (outline/rings outside)))
(is (neg? (apply min (first (outline/rings outside)))))))