diff --git a/compiler/macros.lisp b/compiler/macros.lisp index 2e3c23c8b88447104d8a1eac51ac080e8de5243e..d9637fc25f833cdf88c5b3984b042bdb6fd05729 100644 --- a/compiler/macros.lisp +++ b/compiler/macros.lisp @@ -697,7 +697,8 @@ `(let ((*free-variables* (make-hash-table :test #'eq)) (*free-functions* (make-hash-table :test #'equal)) (*constants* (make-hash-table :test #'equal)) - (*source-paths* (make-hash-table :test #'eq))) + (*source-paths* (make-hash-table :test #'eq)) + (*failed-optimizations* (make-hash-table :test #'eq))) ,@forms))