Had failed to rename one finalize to final-forms. Bug caught by +davidcrawford. Thanks!
authorFrancois-Rene Rideau <tunes@google.com>
Mon, 2 Jul 2012 18:36:14 +0000 (14:36 -0400)
committerFrancois-Rene Rideau <tunes@google.com>
Mon, 2 Jul 2012 18:36:14 +0000 (14:36 -0400)
finalizers.lisp

index 5786180..f8e0dfe 100644 (file)
@@ -109,7 +109,7 @@ evaluate finalization forms."
        (*finalizers-data* (make-hash-table :test 'equal)))
     (unwind-protect
         (funcall thunk)
-      (when finalize (eval '(finalize)))
+      (when finalize (eval '(final-forms)))
       (assert-no-finalizer-left-behind))))
 
 (defun eval-at-toplevel (form &optional already-done-p-form warning &rest warning-arguments)