Clojure: if-let and when-let

http://blog.jayfields.com/2011/03/clojure-if-let-and-when-let.html?utm_source=feedburner&utm_medium=feed&utm_campaign=Feed%3A+jayfields%2FmjKQ+%28Jay+Fields+Thoughts%29

by DanielRibeiro • 15 years ago

36 8 15 years ago

blog.jayfields.com

JeanPierre2• 15 years ago

PG has written about if-let, when-let, while-let and the likes in On Lisp, but calls them anaphoric macros instead. They are basically the same macros, but without the use of bindings (more brevity). You should take a look at it if you're interested.

http://lib.store.yahoo.net/lib/paulgraham/onlisp.pdf - Chapter 14 - Anaphoric Macros is on page 189.

alex_stoddard• 15 years ago

Also appears to be available online: http://www.bookshelf.jp/texi/onlisp/onlisp_15.html#SEC99

cgrand-net• 15 years ago

It's a design choice to value explicit naming (and easier nesting) over brevity.

Anaphoric macros are not idiomatic in Clojure (there is only one: proxy), implicit introduction of locals is frowned upon (and you have to fight the hygienic macro system to create them).

JeanPierre2• 15 years ago

Oh, I am by no means against explicit naming. I'm just recommending people to read chapter 14 of On Lisp if they find if-let and when-let good macros they use often.

felideon2• 15 years ago

They are basically the same macros, but without the use of bindings (more brevity).

So if-let and when-let are not really anaphoric.

In Common Lisp, I use b-when and b-if that Kenny Tilton wrote:

  (defmacro b-when (bindvar boundform &body body)
    `(let ((,bindvar ,boundform))
       (when ,bindvar
         ,@body)))

  (defmacro b-if (bindvar boundform yup &optional nope)
    `(let ((,bindvar ,boundform))
       (if ,bindvar
           ,yup
         ,nope)))

Usage:

  (b-when foo (plusp 1)
	(frob foo))

Hexstream• 15 years ago

I find your lack of parentheses disturbing. I'd personally prefer:

  (b-when foo (plusp 1)
    (frob foo))

These implementations also don't handle declarations correctly ;P A surprisingly tricky topic.

pwpwp• 15 years ago

AND-LET* is a nice generalization: http://srfi.schemers.org/srfi-2/srfi-2.html

Clojure: if-let and when-let

Related Stories