OK! After a few false starts, I think I got it:
(defn f [& args] (let [args (vec args) default-args-atom (atom {:a 1 :b 2
:c 3 :d 4}) kwds [:a :b :c :d]]
(do
(dorun (map-indexed (fn [idx arg] (if
(keyword? arg)
(swap! default-args-atom assoc arg (get args (inc idx)))
(if (not (keyword? (get args (dec idx)))) (swap! default-args-atom
assoc (get kwds idx) arg))))
args))
(the-real-func (:a @default-args-atom) (:b
@default-args-atom) (:c @default-args-atom) (:d @default-args-atom)))))
I feel like I should turn this into a macro, but I've spent enough time on
it as is, for now.
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 <[email protected]
> <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 [email protected]
>> <javascript:>
>> Note that posts from new members are moderated - please be patient with
>> your first post.
>> To unsubscribe from this group, send email to
>> [email protected] <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 [email protected] <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 [email protected]
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
[email protected]
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 [email protected].
For more options, visit https://groups.google.com/d/optout.
