File tree Expand file tree Collapse file tree
src/main/clojure/clojure/test/generative Expand file tree Collapse file tree Original file line number Diff line number Diff line change 5151 </repositories >
5252
5353 <dependencies >
54+ <!-- <dependency> -->
55+ <!-- <groupId>org.clojure</groupId> -->
56+ <!-- <artifactId>clojure</artifactId> -->
57+ <!-- <version>1.5.0-beta12</version> -->
58+ <!-- </dependency> -->
5459 <dependency >
5560 <groupId >org.clojure</groupId >
5661 <artifactId >tools.namespace</artifactId >
5964 <dependency >
6065 <groupId >org.clojure</groupId >
6166 <artifactId >data.generators</artifactId >
62- <version >0.1.0 </version >
67+ <version >0.1.2 </version >
6368 </dependency >
6469 <dependency >
6570 <groupId >ch.qos.logback</groupId >
Original file line number Diff line number Diff line change 124124 (let [seed (+ % 42 )
125125 name (:name test)
126126 f (:fn test)]
127- (binding [gen/*seed* seed
128- gen/*rnd* (java.util.Random. seed)
127+ (binding [gen/*rnd* (java.util.Random. seed)
129128 *failed* (promise )]
130- (event/report :test/test :tags #{:begin } :test/seed gen/* seed* :name name)
129+ (event/report :test/test :tags #{:begin } :test/seed seed :name name)
131130 (loop [iter 0
132131 [input & more] ((:inputs test))]
133132 (let [now (System/currentTimeMillis )
191190 :fn fn to test
192191 :inputs fn returning a (possibly infinite!) sequence of inputs
193192
194- All input generation should use gen/*seed* and gen/*rnd*
193+ All input generation should use and gen/*rnd*
195194 if a source of pseudo-randomness is needed." ))
196195
197196(extend-protocol TestContainer
You can’t perform that action at this time.
0 commit comments