Question

Examples of Clojure arity-overloading on functions like the following (taken from the cookbook):

(defn argcount
  ([] 0)                                ; Zero arguments
  ([x] 1)                               ; One argument
  ([ x &  args] (inc (count args))))    ; List of arguments

… use a form that doesn’t seem to allow the functions of lower arity to simply call the functions of higher arity with some default values (that’s a common idiom in Java).
Is some other special form used for that ?

Answer 1

There’s usually a good way to express the higher arity arguments in a way that doesn’t need to refer to other arities using higher order functions and map / reduce. In this case it’s pretty simple:

(defn argcount
  ([] 0)
  ([x] 1)
  ([x & args]
    (reduce + 1 (map (constantly 1) args))))

Notice the general form of the expression is:

(reduce reducing-function arity-1-value (map mapping-function rest-of-args))

You can’t do everything this way, but this works for a surprisingly large proportion of multi-argument functions. It also gains the advnatages of laziness using map, so you can do crazy things like pass ten million arguments to a function with little fear:

(apply argcount (take 10000000 (range)))
=> 10000000

Try that in most other languages and your stack will be toast 🙂