aboutsummaryrefslogtreecommitdiff
path: root/src/clojure/contrib/test_contrib/seq_utils_test.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/clojure/contrib/test_contrib/seq_utils_test.clj')
-rw-r--r--src/clojure/contrib/test_contrib/seq_utils_test.clj11
1 files changed, 11 insertions, 0 deletions
diff --git a/src/clojure/contrib/test_contrib/seq_utils_test.clj b/src/clojure/contrib/test_contrib/seq_utils_test.clj
new file mode 100644
index 00000000..f8815041
--- /dev/null
+++ b/src/clojure/contrib/test_contrib/seq_utils_test.clj
@@ -0,0 +1,11 @@
+(ns clojure.contrib.test-contrib.seq-utils-test
+ (:use clojure.test
+ clojure.contrib.seq-utils))
+
+
+(deftest test-positions
+ (are [expected pred coll] (= expected (positions pred coll))
+ [2] string? [:a :b "c"]
+ () :d [:a :b :c]
+ [0 2] #{:d} [:d :a :d :a]))
+ \ No newline at end of file