From ffc4b65493da1891a7c3fc65947891aea8cd0cc6 Mon Sep 17 00:00:00 2001 From: Ramakrishnan Muthukrishnan Date: Fri, 2 Jul 2010 12:47:37 +0530 Subject: [PATCH] solution to 2.23 --- src/sicp/ex2_23.clj | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 src/sicp/ex2_23.clj diff --git a/src/sicp/ex2_23.clj b/src/sicp/ex2_23.clj new file mode 100644 index 0000000..36b04e6 --- /dev/null +++ b/src/sicp/ex2_23.clj @@ -0,0 +1,8 @@ +(ns sicp.ex2_23 + (:use [sicp utils])) + +(defn for-each [f lst] + (when (not (empty? lst)) + (do + (f (first lst)) + (recur f (rest lst))))) \ No newline at end of file -- 2.45.2