unmaintained: New home for misfit Factor vocabularies.

[factor-unmaintained.git] / adsoda / combinators / combinators-tests.factor

diff --git a/adsoda/combinators/combinators-tests.factor b/adsoda/combinators/combinators-tests.factor
new file mode 100644 (file)
index 0000000..d46dc14
--- /dev/null
+++ b/adsoda/combinators/combinators-tests.factor
@@ -0,0 +1,11 @@
+USING: adsoda.combinators
+sequences
+    tools.test 
+ ;
+
+IN: adsoda.combinators.tests
+
+
+[ { "atoto" "b" "ctoto" } ] [ { "a" "b" "c" } 1 [ "toto" append ] map-but ] 
+    unit-test
+