Bir clojure makrosundan birden çok değer döndürme

Question

Birkaç aynı Swing bileşeni için yazdığım bir Clojure defprotocol'e birkaç yöntem eklemem gerekiyor:

(defprotocol view-methods 
    (ok-button-add-action-listener  [this listener]) 
    (ok-button-set-enabled    [this enabled]) 
    (ok-button-set-selected   [this selected]) 
    (cancel-button-add-action-listener [this listener]) 
    (cancel-button-set-enabled   [this enabled]) 
    (cancel-button-set-selected  [this selected]) 
    (other-button-add-action-listener [this listener]) 
    (other-button-set-enabled   [this enabled]) 
    (other-button-set-selected   [this selected])) 

Yöntem imzalarının üçünü döndüren bir makro yazabileceğim herhangi bir yol var mı (xxx-button-add-action-listener, xxx-button-set-enabled) , xxx-button-set-selected)?

(defprotocol view-methods 
    (add-methods ok) 
    (add-methods cancel) 
    (add-methods other)) 

Bu makro, her bir çağrı ile büyüyen defprotocol'ye üç öğe eklemelidir.

Makro `~@a-list döndürüp "yerinde" genişleyebilir mi?

Answer 1

Evet, yalnızca makronuzun bir (do ...) içinde genişlemesini sağlamanız ve Clojure derleyicisinin do alt öğelerini bir üst düzey formlar dizisi olarak işleyebilmesi gerekir.

Answer 2

Bir makronun tek bir forma genişletmesi gerektiğine inanıyorum - böylece bunu tam olarak açıkladığınız şekilde yapamazsınız.

Ancak, tüm kesinlikle gibi görünür üst düzeyinde bir makro ile bunu yazmak mümkün olacağını, çünkü kayıp verilmez: siz kullanabilirsiniz

(defmacro build-button-protocol [name & method-specs] 
    ....) 

aşağıdaki gibidir:

(build-button-protocol view-methods 
    (add-methods ok) 
    (add-methods cancel) 
    (add-methods other))