continuations[-docs]: add the finally word

[factor.git] / extra / graphviz / graphviz-tests.factor

diff --git a/extra/graphviz/graphviz-tests.factor b/extra/graphviz/graphviz-tests.factor
index b5b58fb465de572b58ebc67b4f9a9efff012cf1b..70be570456b80edd394eb3c12348cfd452e0b50e 100644 (file)
--- a/extra/graphviz/graphviz-tests.factor
+++ b/extra/graphviz/graphviz-tests.factor
@@ -232,7 +232,7 @@ SYMBOLS: supported-layouts supported-formats ;
 :: with-global-value ( value variable quot -- )
     variable get-global "orig" [
         [ value variable set-global quot call ]
-        [ "orig" get variable set-global ] [ ] cleanup
+        [ "orig" get variable set-global ] finally
     ] with-variable ; inline
 
 : preview-format-test ( format -- pass? )