Add a toggle word to namespaces and update docs, tests, and usages. Document with...

[factor.git] / core / namespaces / namespaces-tests.factor

diff --git a/core/namespaces/namespaces-tests.factor b/core/namespaces/namespaces-tests.factor
index a7b1e508807893b6492aa0581f78b34b889be838..1397028f24aad7989bafea5a8e8a93b87d50e538 100644 (file)
--- a/core/namespaces/namespaces-tests.factor
+++ b/core/namespaces/namespaces-tests.factor
@@ -26,3 +26,12 @@ f test-initialize set-global
 test-initialize [ 5 ] initialize
 
 [ 5 ] [ test-initialize get-global ] unit-test
+
+SYMBOL: toggle-test
+[ f ] [ toggle-test get ] unit-test
+[ t ] [ toggle-test [ toggle ] [ get ] bi ] unit-test
+[ f ] [ toggle-test [ toggle ] [ get ] bi ] unit-test
+
+[ t ] [ toggle-test [ on ] [ get ] bi ] unit-test
+[ f ] [ toggle-test [ off ] [ get ] bi ] unit-test
+