From 88544175c093a261a0c355acd42ba040ba375b30 Mon Sep 17 00:00:00 2001 From: Colin Jones Date: Thu, 6 May 2010 22:07:07 -0500 Subject: [PATCH] adding blank function (multi-argument) --- src/koans/about_functions.clj | 4 ++-- src/path_to_enlightenment.clj | 1 + 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/src/koans/about_functions.clj b/src/koans/about_functions.clj index c0f33b5..82774b5 100644 --- a/src/koans/about_functions.clj +++ b/src/koans/about_functions.clj @@ -17,5 +17,5 @@ 4 5)) "Higher-order functions take function arguments" - (= 25 ((fn [f] (f 5)) - (fn [n] (__ __ __))))) + (= 25 (___ + (fn [n] (* n n))))) diff --git a/src/path_to_enlightenment.clj b/src/path_to_enlightenment.clj index 519a3d9..b58861e 100644 --- a/src/path_to_enlightenment.clj +++ b/src/path_to_enlightenment.clj @@ -2,6 +2,7 @@ (:use clojure.test)) (def __ nil) +(def ___ (fn [& args] args)) (defmacro meditations [& forms] (let [pairs (partition 2 forms)]