vocabs.loader: fix tests.

diff --git a/core/vocabs/loader/loader-tests.factor b/core/vocabs/loader/loader-tests.factor
index c153ff229f62e45fb5c59d85001afb088dbaeff4..6ae6743f26b8dc76eb547533e6f5289b5b3d17a4 100644 (file)
--- a/core/vocabs/loader/loader-tests.factor
+++ b/core/vocabs/loader/loader-tests.factor
@@ -84,7 +84,8 @@ IN: vocabs.loader.tests
 
 { } [
     [
-        "bob" "vocabs.loader.test.b" create-word [ ] define
+        "bob" "vocabs.loader.test.b" create-word
+        [ ] ( -- ) define-declared
     ] with-compilation-unit
 ] unit-test
 

diff --git a/core/vocabs/loader/test/b/b.factor b/core/vocabs/loader/test/b/b.factor
index 8a1830029575793ea1c10e998534129600a5732e..27f66132f24b3570e57d7f28564b0e3b6b589591 100644 (file)
--- a/core/vocabs/loader/test/b/b.factor
+++ b/core/vocabs/loader/test/b/b.factor
@@ -3,4 +3,4 @@ IN: vocabs.loader.test.b
 
 << global [ "count-me" inc ] with-variables >>
 
-: fred bob ;
\ No newline at end of file
+: fred ( -- ) bob ;

diff --git a/core/vocabs/loader/test/d/d.factor b/core/vocabs/loader/test/d/d.factor
index 7f81bb821ec543cff7a65ce728f9dd7135e5e9c2..12b5f7cb0ec257d72fedb2b35085064dacf51919 100644 (file)
--- a/core/vocabs/loader/test/d/d.factor
+++ b/core/vocabs/loader/test/d/d.factor
@@ -1,3 +1,4 @@
+USING: math.private ;
 IN: vocabs.loader.test.d
 
 : foo ( -- ) iterate-next ;

diff --git a/core/vocabs/loader/test/j/j.factor b/core/vocabs/loader/test/j/j.factor
index 6d545483a3e1479c14b87eea5df174193e1c3eca..d6aaf06a5edd06ea2424430b33145bf2ec162787 100644 (file)
--- a/core/vocabs/loader/test/j/j.factor
+++ b/core/vocabs/loader/test/j/j.factor
@@ -1,2 +1,3 @@
+USING: vocabs ;
 IN: vocabs.loader.test.j
 "vocabs.loader.test.k" require