]> gitweb.factorcode.org Git - factor.git/commitdiff
fuel.eval.tests: fixing the test by wrapping it in a manifest
authorBjörn Lindqvist <bjourne@gmail.com>
Sun, 8 Jan 2017 12:41:43 +0000 (13:41 +0100)
committerBjörn Lindqvist <bjourne@gmail.com>
Sun, 8 Jan 2017 12:41:43 +0000 (13:41 +0100)
extra/fuel/eval/eval-tests.factor

index 8c8da511d1fa53857094b687343dca1a88b25b32..c6d149aee61d1afa5f6903fb1383f0718ef6e534 100644 (file)
@@ -1,7 +1,7 @@
 ! Copyright (C) 2009 Jose Antonio Ortega Ruiz.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: continuations fuel fuel.eval io.streams.string kernel math
-namespaces random.data sequences strings tools.test ;
+namespaces random.data sequences strings tools.test vocabs.parser ;
 IN: fuel.eval.tests
 
 ! pop-restarts
@@ -20,7 +20,6 @@ IN: fuel.eval.tests
 ] unit-test
 
 ! Make sure prettyprint doesn't limit output.
-
 { t } [
     1000 random-string eval-result set-global
     [ send-retort ] with-string-writer length 1000 >
@@ -31,7 +30,10 @@ IN: fuel.eval.tests
     "(nil \"IN: kernel PRIMITIVE: dup ( x -- x x )\" \"\")\n<~FUEL~>\n"
 } [
     [
-        V{ "\"dup\"" "fuel-word-synopsis" } "scratchpad" V{ } fuel-eval-in-context
-    ] with-string-writer
-    f eval-result set-global
+        [
+            V{ "\"dup\"" "fuel-word-synopsis" } "scratchpad"
+            V{ "fuel" "kernel" "syntax" } eval-in-context
+        ] with-string-writer
+        f eval-result set-global
+    ] with-manifest
 ] unit-test