Allow specifying vocabulary roots on the command line

[factor.git] / basis / command-line / command-line-tests.factor

diff --git a/basis/command-line/command-line-tests.factor b/basis/command-line/command-line-tests.factor
index 36943a2a58e1c3f98af0de8dc16dad50b1cb2401..4652c1d066d347f8fb6d73d34d46aed328668c5b 100644 (file)
--- a/basis/command-line/command-line-tests.factor
+++ b/basis/command-line/command-line-tests.factor
@@ -30,3 +30,7 @@ IN: command-line
     { "factor" "-foo" "a" "b" "c" } parse-command-line
     executable get script get command-line get
 ] unit-test
+
+{ "a:b:c" } [ { "factor" "-roots=a:b:c" } parse-command-line
+    "roots" get-global
+] unit-test