kyle
/
kutils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

when -> whenlet 

Somehow was changed.
This commit is contained in:
Kyle Isom 2015-08-31 22:04:20 -07:00
parent 9ff4f34e44
commit 32a4e9b9bd
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
kutils.asd
View File

@ -11,5 +11,5 @@
(:file "lol") (:file "lol")
(:file "kutils") (:file "kutils")
(:file "kutils-hash-tables") (:file "kutils-hash-tables")
(:file "macros.lisp"))) (:file "macros")))

2
macros.lisp
View File

@ -4,7 +4,7 @@
;;; Various utility macros. ;;; 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 the bindings in a let form; if they all evaluate to T,
evaluate @c(body) in an implicit @c(progn)." evaluate @c(body) in an implicit @c(progn)."
(let ((bindings (if (listp (first bindings)) bindings (list bindings)))) (let ((bindings (if (listp (first bindings)) bindings (list bindings))))