Возвращение сцепленного Params в Clojure

Question

функции

Необходимости или макросъемки, который принимает сопзИте параметры (маршрута) и динамические параметры (ARGS) и вернуть сцепленную строку параметров:

user>(defn full-url [route & args] *need code*) 
#'user/full-url 
user> (def p1 "value1") 
#'user/p1 
user> (def p2 "value2") 
#'user/p2 
user> (def p3 "value3") 
#'user/p3 
user> (full-url "/init" p1 p2 p3) 
"/init?p1=value1&p2=value2&p3value4" 

Есть идеи?

Answer 1

Во-первых, макрос, чтобы сделать то, что вы хотите:

(defmacro full-url 
    [route & args] 
    `(let [var-names# (map #(str %1 "=") '~args) 
     var-vals# (list ~@args) 
     joined# (clojure.string/join "&" (map str var-names# var-vals#))] 
    (str ~route "?" joined#))) 

Теперь я хотел бы добавить, что я не думаю, что это лучший подход, поскольку он связывает имена ваших Варс именам Param. IMO лучше использовать регулярную функцию, которая берет карту как второй аргумент, который имеет ключевые слова и значения. Такие как:

(defn full-url-fn 
    [route params] 
    (->> params 
     (map #(str (name (first %)) "=" (second %))) 
     (clojure.string/join "&") 
     (str route "?"))) 

(full-url-fn "/init" {:p1 "value1" :p2 "value2"}) 

Но в любом случае это должно сработать.