Revert "locals.parser: use with-words."

This reverts commit ccdfb1744890c9a05eaa25a3e2d521278620bbc5.

diff --git a/core/locals/parser/parser.factor b/core/locals/parser/parser.factor
index 84e02fdf5f28e76d7aec3364ca7bd9d8fe266129..fc506ce3d7615511f100e36ff2d84d11209772a2 100644 (file)
--- a/core/locals/parser/parser.factor
+++ b/core/locals/parser/parser.factor
@@ -35,7 +35,9 @@ SINGLETON: lambda-parser
     H{
         { in-lambda? t }
         { quotation-parser lambda-parser }
-    } -rot '[ _ _ with-words ] with-variables ; inline
+    } swap '[
+        [ use-words @ ] [ unuse-words ] bi
+    ] with-variables ; inline
 
 : (parse-lambda) ( assoc -- quot )
     [ \ ] parse-until >quotation ] with-lambda-scope ;