Mercurial > lasercutter
annotate src/laser/rubyisms.clj @ 10:ef7dbbd6452c
added clojure source goodness
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 21 Aug 2010 06:25:44 -0400 |
parents | 35cf337adfcf |
children | f952052e37b7 |
rev | line source |
---|---|
rlm@8 | 1 (ns laser.rubyisms |
rlm@9 | 2 (:use [clojure.contrib |
rlm@9 | 3 repl-utils |
rlm@9 | 4 str-utils |
rlm@9 | 5 [duck-streams :only [file-str]] |
rlm@9 | 6 |
rlm@9 | 7 ])) |
rlm@8 | 8 |
rlm@8 | 9 (defmacro unless [boolean & forms] |
rlm@8 | 10 `(if (not ~boolean) ~@forms)) |
rlm@8 | 11 |
rlm@8 | 12 (defn exit [] |
rlm@9 | 13 (throw (Exception. "Exit."))) |