From 32a4e9b9bda51bb884333747a0a077c4d0999c09 Mon Sep 17 00:00:00 2001 From: Kyle Isom Date: Mon, 31 Aug 2015 22:04:20 -0700 Subject: [PATCH] when -> whenlet Somehow was changed. --- kutils.asd | 2 +- macros.lisp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/kutils.asd b/kutils.asd index 7974415..a73627e 100644 --- a/kutils.asd +++ b/kutils.asd @@ -11,5 +11,5 @@ (:file "lol") (:file "kutils") (:file "kutils-hash-tables") - (:file "macros.lisp"))) + (:file "macros"))) diff --git a/macros.lisp b/macros.lisp index 2e9f526..2507f69 100644 --- a/macros.lisp +++ b/macros.lisp @@ -4,7 +4,7 @@ ;;; Various utility macros. -(defmacro when (bindings &body body) +(defmacro whenlet (bindings &body body) "Evaluate the bindings in a let form; if they all evaluate to T, evaluate @c(body) in an implicit @c(progn)." (let ((bindings (if (listp (first bindings)) bindings (list bindings))))