Create optimizer_collision_repro.myc

This commit is contained in:
Michael Schimmel
2026-02-25 13:44:08 +01:00
parent 3ff7ba9d59
commit b12b85f54a
+10
View File
@@ -0,0 +1,10 @@
(do
(macro wrap [f] `(fn [x] (~f x)))
(def add1 (fn [x] (+ x 1)))
(def add2 (fn [x] (+ x 2)))
(def w1 (wrap add1))
(def w2 (wrap add2))
(w1 (w2 10)))