Clojure tail call recursion with variable argument function

Question

I basically want this:

(defn mymax
        ([a b] (if (> a b) a b))
        ([a b & rest] (apply recur (conj rest (mymax a b)))))

So that: (mymax 1 2 3 4) tail calls (mymax 2 3 4) which tail calls (mymax 3 4)

I see the problem that "apply" stops recur being in the tail position, which means it won't work. But I don't see how I can not use apply for variable arguement functions

[Note, I know you can solve this particular problem with reduce. Just wondering if you can do tail-call-recursion with variable params]

related: stackoverflow.com/questions/3670010/…

Jonas
– Jonas

2012-01-08 06:28:40 +00:00
Commented Jan 8, 2012 at 6:28 — Jonas
– Jonas, Commented Jan 8, 2012 at 6:28

Svante · Accepted Answer · 2012-01-08 10:31:24Z

7

Make the function take a single vector as an argument rather than using aruguments as the sequence of values. That would allow you to get rid of apply.

(defn mymax [[a b & rest]]
  (let [m (if (> a b) a b)]    
    (if (not rest)
        m 
        (recur (conj rest m)))))

edited Jan 8, 2012 at 10:31

Svante

51.8k11 gold badges84 silver badges127 bronze badges

answered Jan 8, 2012 at 9:42

Ankur

33.7k2 gold badges50 silver badges73 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Clojure tail call recursion with variable argument function

1 Answer 1

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related