--- a/package.lisp Sat Dec 07 16:58:32 2019 -0500
+++ b/package.lisp Sat Dec 07 16:58:49 2019 -0500
@@ -37,7 +37,6 @@
:let-result
:let-complex
:queue-thunk
- :rebind
:ring
:ring-prev--- a/src/utils.lisp Sat Dec 07 16:58:32 2019 -0500
+++ b/src/utils.lisp Sat Dec 07 16:58:49 2019 -0500
@@ -478,13 +478,6 @@
(lambda () (pop elements)))
-(defmacro rebind ((&rest vars) &body body)
- `(let (,@(iterate
- (for var :in vars)
- (collect `(,var ,var))))
- ,@body))
-
-
;;;; A* Search ----------------------------------------------------------------
(defstruct path
state