continuations[-docs]: add the finally word

[factor.git] / basis / tools / destructors / destructors.factor

diff --git a/basis/tools/destructors/destructors.factor b/basis/tools/destructors/destructors.factor
index 36cecc35e8147a70f312705c1f530b1dfabad428..452cb29fd2f465a7d525ba8e03c0de1e1565afc8 100644 (file)
--- a/basis/tools/destructors/destructors.factor
+++ b/basis/tools/destructors/destructors.factor
@@ -47,7 +47,7 @@ PRIVATE>
     t debug-leaks? set-global
     [
         [ call disposables get clone ] dip
-    ] [ f debug-leaks? set-global ] [ ] cleanup
+    ] [ f debug-leaks? set-global ] finally
     diff ; inline
 
 : leaks. ( quot -- )