Nested function: Difference between revisions

Content added Content deleted
(Adds Clojure solution)
Line 245: Line 245:


Console.WriteLine(MakeList(". "));</lang>
Console.WriteLine(MakeList(". "));</lang>

=={{header|Clojure}}==

<lang clojure>(defn make-list [separator]
(let [x (atom 0)]
(letfn [(make-item [item] (swap! x inc) (println (format "%s%s%s" @x separator item)))]
(make-item "first")
(make-item "second")
(make-item "third"))))

(make-list ". ")</lang>

{{out}}
<pre>
1. first
2. second
3. third
</pre>


=={{header|Common Lisp}}==
=={{header|Common Lisp}}==