1 files changed, 10 insertions, 0 deletions
diff --git a/src/prelude.lisp b/src/prelude.lisp
index 3e7ab81..7b49977 100644
--- a/src/prelude.lisp
+++ b/src/prelude.lisp
@@ -9,3 +9,13 @@
   `(setq ,i (- ,i 1)))
 
 (defun zerop (x) (= x 0))
+
+(defmacro when (pred . body)
+  `(if ,pred
+     (progn ,@body)
+     nil))
+
+(defmacro unless (pred . body)
+  `(if ,pred
+     nil
+     (progn ,@body)))