Mercurial > lasercutter
annotate src/laser/rubyisms.clj @ 12:aadb93318584
testing committ
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 24 Aug 2010 19:10:22 -0400 |
parents | f952052e37b7 |
children |
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@11 | 9 |
rlm@11 | 10 |
rlm@11 | 11 |
rlm@8 | 12 (defmacro unless [boolean & forms] |
rlm@8 | 13 `(if (not ~boolean) ~@forms)) |
rlm@8 | 14 |
rlm@8 | 15 (defn exit [] |
rlm@9 | 16 (throw (Exception. "Exit."))) |