locals.parser: use parse-time compilation to make tests run properly.

diff --git a/core/locals/parser/parser-tests.factor b/core/locals/parser/parser-tests.factor
index 7aee612ebe4edde271199e046c6fecb873ddd4a5..f844c80276e284c71e38b9d1d461527025d52231 100644 (file)
--- a/core/locals/parser/parser-tests.factor
+++ b/core/locals/parser/parser-tests.factor
@@ -4,6 +4,7 @@ tools.test vocabs.parser ;
 IN: locals.parser.tests
 
 ! (::)
+<<
 {
     "dobiedoo"
     [ load-local 1 drop-locals ]
@@ -34,6 +35,7 @@ IN: locals.parser.tests
         qualified-vocabs last words>> keys "um" swap member?
     ] with-compilation-unit
 ] unit-test
+>>
 
 ! check-local-name
 { "hello" } [
@@ -65,6 +67,7 @@ IN: locals.parser.tests
     [ locals>> [ name>> ] map ] [ keys ] bi*
 ] unit-test
 
+<<
 {
     "V{ 99 :> kkk kkk }"
 } [
@@ -74,3 +77,4 @@ IN: locals.parser.tests
         ] with-lexer
     ] with-compilation-unit unparse
 ] unit-test
+>>