vocabs.parser: use finally instead of ``[ ] cleanup``.

diff --git a/core/vocabs/parser/parser.factor b/core/vocabs/parser/parser.factor
index 459e6ec6516c6c237886bed07c925f21d15a76d1..408ef633f44e382bc635357f6228cca515ceffd1 100644 (file)
--- a/core/vocabs/parser/parser.factor
+++ b/core/vocabs/parser/parser.factor
@@ -176,7 +176,7 @@ TUPLE: rename word vocab words ;
     <extra-words> qualified-vocabs remove! drop ;
 
 : with-words ( assoc quot -- )
-    [ use-words ] prepose over '[ _ unuse-words ] [ ] cleanup ; inline
+    [ use-words ] prepose over '[ _ unuse-words ] finally ; inline
 
 TUPLE: ambiguous-use-error name words ;
 
@@ -274,7 +274,6 @@ PRIVATE>
         [ call ] [
             [ manifest get add-definition-observer call ]
             [ manifest get remove-definition-observer ]
-            [ ]
-            cleanup
+            finally
         ] if-bootstrapping
     ] with-variable ; inline