CLJ-1084 tests, update to latest test.generative

Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>

pom.xml

@@ -48,7 +48,7 @@
     <dependency>
       <groupId>org.clojure</groupId>
       <artifactId>test.generative</artifactId>
-      <version>0.1.9</version>
+      <version>0.2.0</version>
       <scope>test</scope>
       <exclusions>
         <exclusion>

test/clojure/test_clojure/data_structures.clj

@@ -10,7 +10,8 @@
 
 
 (ns clojure.test-clojure.data-structures
-  (:use clojure.test))
+  (:use clojure.test
+        [clojure.test.generative :exclude (is)]))
 
 
 ;; *** Helper functions ***
@@ -19,6 +20,16 @@
   (seq (reduce disj (set s1) (set s2))))
 
 
+;; *** Generative ***
+(defspec subcollection-counts-are-consistent
+  identity
+  [^collection coll]
+  (let [n (count coll)]
+    (dotimes [i n]
+      (is (= n
+             (+ i (count (nthnext coll i)))
+             (+ i (count (drop i coll))))))))
+
 ;; *** General ***
 
 (defstruct equality-struct :a :b)