http://teslafreak.vox.com/library/post/ ... wlisp.html
I once wrote a macro that didn't need to 'begin', but couldn't do anything 'else':
Code: Select all
(define-macro (if* condition) 
(let (c (eval condition)) 
   (if c (map eval (args)))))
(if* true
   (println "yes")
   (println "I've")
   (println "done")
   (println "that")
   (println "too!"))