base: Export `nlet' and `while'.

[lisp] / mdw-base.lisp

diff --git a/mdw-base.lisp b/mdw-base.lisp
index 4d67b7ae2498241a4299985090665254d99d1edb..5203933bffdde883bed6ead569e5a238bb32ee6a 100644 (file)
--- a/mdw-base.lisp
+++ b/mdw-base.lisp
@@ -33,6 +33,7 @@ (defpackage #:mdw.base
           #:stringify #:listify #:fix-pair #:pairify
           #:whitespace-char-p
           #:slot-uninitialized
           #:stringify #:listify #:fix-pair #:pairify
           #:whitespace-char-p
           #:slot-uninitialized

+          #:nlet #:while

           #:with-gensyms #:let*/gensyms #:with-places
           #:locp #:locf #:ref #:with-locatives
           #:update-place #:update-place-after
           #:with-gensyms #:let*/gensyms #:with-places
           #:locp #:locf #:ref #:with-locatives
           #:update-place #:update-place-after