Chcę użyć makra binding, ale chcę, aby był sekwencyjny jak w let.Czy istnieje sposób wykonywania sekwencyjnych powiązań w Clojure?
Chyba mogę napisać to tak ...
(binding [a 1]
(binding [b (inc a)]
(println b)))
... ale tam musi być lepszy sposób. jakieś pomysły?
(defmacro binding* [bindings & body]
(reduce (fn [acc [x y]]
`(binding [~x ~y] ~acc))
`(do [email protected])
(reverse (partition 2 bindings))))
user> (declare ^:dynamic a ^:dynamic b)
#'user/b
user> (binding* [a 1 b (inc a)] [a b])
[1 2]
user> (macroexpand-1 '(binding* [a 1 b (inc a)] [a b]))
(clojure.core/binding [a 1]
(clojure.core/binding [b (inc a)]
(do [a b])))
+1, ale czy masz pojęcie, dlaczego powiązanie nie zostało w ten sposób zaimplementowane w pierwszej kolejności? – mikera
+1 także. Dobra ilustracja tego, jak makra mogą korygować ograniczenia języka. –
@mikera Może dlatego, że 'binding' zmienia zmienne vars, więc musi martwić się bardziej o bezpieczeństwo wątków? Tylko domysły, naprawdę nie mam pojęcia. –