Browse files

Testing.

  • Loading branch information...
1 parent 22df72e commit e2fc5c484af4d0fafea79a718bacc2f0454b92d9 @drewr drewr committed Sep 8, 2011
Showing with 8 additions and 4 deletions.
  1. +8 −4 src/esperanto/stress.clj
View
12 src/esperanto/stress.clj
@@ -3,6 +3,7 @@
[clojure.string :as s]
[esperanto.search :as search])
(:use [esperanto.index :only [index-bulk]]
+ [esperanto.admin.indices :only [refresh]]
[esperanto.node :only [make-client-node]]))
(defn take-rand [n xs]
@@ -28,9 +29,12 @@
"cluster.name" "foo"})
.start))
- (dotimes [_ 10]
- (index-rand (.client foo) "test" words 100 1000)
+ (time
+ (let [c (.client foo)]
+ (dotimes [_ 1000]
+ (index-rand c "test" words 100 100)
+ (refresh c "test"))))
- )
- )
+
+)

0 comments on commit e2fc5c4

Please sign in to comment.