аргументов Clojure ключевого слова

Question

В Common Lisp вы можете сделать это:

(defun foo (bar &key baz quux) 
    (list bar baz quux)) 

(foo 1 :quux 3 :baz 2) ; => (1 2 3) 

Clojure не имеют аргументов ключевых слов. Один из вариантов заключается в следующем:

(defn foo [bar {:keys [baz quux]}] 
    (list bar baz quux)) 

(foo 1 {:quux 3 :baz 2}) ; => (1 2 3) 

Это слишком много вложенных скобок, чтобы напечатать и читать все время. Для этого также требуется, чтобы явная хэш-карта передавалась как аргумент, а не как плоский список.

Какой самый идиоматический эквивалент Ключевого слова, связанный с ключевыми словами, который не смотрит, что кто-то отправил препинающую бомбу?

Answer 1

Простой способ имитации арг ключевых слов в Clojure использует хэш-карту на остальных параметров, как это:

> (defn kwtest [x & e] (:foo (apply hash-map e))) 
#'user/kwtest 
> (kwtest 12 :bar "ignored" :foo "returned") 
"returned" 

Rich Хики предоставил макрос this message from the clojure google group, который дает вам параметры ключевых слов. В файле corresponding thread содержится информация о том, почему ключевые слова не поддерживаются clojure. В основном, чтобы избежать накладных расходов времени исполнения. Рич объясняет метод я показал выше в this message

Answer 2

Недавнее дополнение к clojure.contrib.def является defnk макросъемки, который позволяет определение функций с аргументами ключевого слова (см here).

Answer 3

Чтобы обновить этот ответ на Clojure 1.2 есть теперь полное ключевое слово поддержка агд со значениями по умолчанию предоставляется карта формами destructuring binding:

user> (defn foo [bar &{ :keys [baz quux] 
         :or {baz "baz_default" quux "quux_default"}}] 
     (list bar baz quux)) 
#'user/foo 

user> (foo 1 :quux 3) 
(1 "baz_default" 3)