Clojureで引数のデフォルト値を指定する

gistfile1.clj

;; 引数の個数（アリティ）でわける方法
(defn myfunc1
  ([arg] (myfunc1 arg "default"))
  ([arg opt] (format "arg=[%s] opt=[%s]" arg opt)))

(myfunc1 "argument")
; => "arg=[argument] opt=[default]"
  
(myfunc1 "argument" "option")
; => "arg=[argument] opt=[option]"

;; destructuringでデフォルト値を指定する方法
(defn myfunc2
  [arg & {:keys [opt1 opt2] :or {opt1 "default1" opt2 "default2"}}]
  (format "arg=[%s] opt1=[%s] opt2=[%s]" arg opt1 opt2))

(myfunc2 "argument")
; => "arg=[argument] opt1=[default1] opt2=[default2]"

(myfunc2 "argument" :opt1 "option1")
; => "arg=[argument] opt1=[option1] opt2=[default2]"

(myfunc2 "argument" :opt2 "option2")
; => "arg=[argument] opt1=[default1] opt2=[option2]"

(myfunc2 "argument" :opt1 "option1" :opt2 "option2")
; => "arg=[argument] opt1=[option1] opt2=[option2]"