continuations[-docs]: add the finally word

[factor.git] / core / io / files / files-tests.factor

diff --git a/core/io/files/files-tests.factor b/core/io/files/files-tests.factor
index 4024e5ed5c3008febeaa57f2c88f22b1a5dae614..6893424f172dc2aa4e578ef450e350f57e7edf08 100644 (file)
--- a/core/io/files/files-tests.factor
+++ b/core/io/files/files-tests.factor
@@ -274,7 +274,7 @@ CONSTANT: pt-array-1
     [
         "resource:core" normalize-path
         [ cwd = ] [ cd ] [ cwd = ] tri
-    ] cwd '[ _ dup cd cwd = ] [ ] cleanup
+    ] cwd '[ _ dup cd cwd = ] finally
 ] unit-test
 
 { t } [