Skip to content

Commit

Permalink
FIXUP wrap unittest mapcat expression in jsv
Browse files Browse the repository at this point in the history
  • Loading branch information
jonasseglare committed Feb 11, 2025
1 parent 77e976a commit 6964fb9
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion test/squint/compiler_test.cljs
Original file line number Diff line number Diff line change
Expand Up @@ -1273,7 +1273,7 @@
(testing "multiple colls"
(is (eq ["a" 1 "b" 2] (jsv! '(vec (mapcat list [:a :b :c] [1 2]))))))
(testing "transducer"
(is (eq [1 1001 2 1002 3 1003] (into [] (mapcat (fn [x] [x (+ 1000 x)])) [1 2 3])))))
(is (eq [1 1001 2 1002 3 1003] (jsv! '(into [] (mapcat (fn [x] [x (+ 1000 x)])) [1 2 3]))))))

(deftest laziness-test
(is (eq ["right" "up" "left" "left" "down" "down" "right" "right" "right" "up" "up" "up" "left" "left" "left" "left" "down" "down" "down" "down"]
Expand Down

0 comments on commit 6964fb9

Please sign in to comment.