I hacked this together:

(defn f [& args] (let [default-args-atom (atom {:a 1 :b 2 :c 3 :d 4}) kwds 
(vec (keys @default-args-atom)) 
                             kwargs (map-indexed (fn [idx arg] (if 
(keyword? arg) (swap! default-args-atom assoc arg (get args (inc idx))) 
(swap! a assoc (get kwds idx) arg))) args)]
    (function-that-actually-does-what-i-want-to-do (:a @default-args-atom) 
(:b @default-args-atom) (:c @default-args-atom) (:d @default-args-atom)))

But it seems kind of gross to me. Is there a cleaner solution?

On Sunday, July 20, 2014 8:16:55 PM UTC-4, Alex Baranosky wrote:
>
> You can get keyword args like this:
>
> (defn f [& {:keys [a b c d]
>             :or {a 1 b 2 c 3 d 4}}]
>   [a b c d])
>
> But you cannot also get the ability to call:
> (f 5 6 7 8)
>
>
> On Sun, Jul 20, 2014 at 4:13 PM, Sam Raker <sam....@gmail.com 
> <javascript:>> wrote:
>
>> I'm trying to write a function that takes (up to) 4 arguments. I want to 
>> be able to supply every argument positionally, with a keyword or as a 
>> default, so that
>>
>> (f)
>> (f 1)
>> (f 1 2)
>> (f 1 2 3)
>> (f 1 2 3 4)
>> (f 1 :b 2)
>> (f 1 2 :c 3)
>> ...
>> (f :a 1 :b 2 :c 3 :d 4)
>>
>> are all equivalent. In Python, I could do this by
>>
>> def f(a=1,b=2,c=3,d=4):...
>>
>> but I'm not sure how to do it in Clojure.
>>
>> -- 
>> You received this message because you are subscribed to the Google
>> Groups "Clojure" group.
>> To post to this group, send email to clo...@googlegroups.com 
>> <javascript:>
>> Note that posts from new members are moderated - please be patient with 
>> your first post.
>> To unsubscribe from this group, send email to
>> clojure+u...@googlegroups.com <javascript:>
>> For more options, visit this group at
>> http://groups.google.com/group/clojure?hl=en
>> --- 
>> You received this message because you are subscribed to the Google Groups 
>> "Clojure" group.
>> To unsubscribe from this group and stop receiving emails from it, send an 
>> email to clojure+u...@googlegroups.com <javascript:>.
>> For more options, visit https://groups.google.com/d/optout.
>>
>
>

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
--- 
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to