Export destructuring-bind

diff --git a/src/toplevel.lisp b/src/toplevel.lisp
index 9261925..fa7c3f1 100644 (file)
--- a/src/toplevel.lisp
+++ b/src/toplevel.lisp
@@ -57,7 +57,7 @@
           char-code char= code-char cond cons consp constantly
           copy-alist copy-list copy-tree decf declaim declare defconstant
           define-setf-expander define-symbol-macro defmacro defparameter defun
-          defvar digit-char digit-char-p disassemble do do* documentation
+          defvar destructuring-bind digit-char digit-char-p disassemble do do* documentation
           dolist dotimes ecase eighth eq eql equal error eval every export expt
           fdefinition fifth find-package find-symbol first flet format fourth
           fset funcall function functionp gensym get-internal-real-time