   {:name "Test scenario"
    :requests [{:name "Request1" :fn successful-request}
               {:name "Request2" :fn failing-request}]})
+
+(def counting-scenario
+  {:name "Counting scenario"
+   :requests [{:name "Request1" :fn counting-request}]})
 
 (def scenario2
   {:name "Test scenario2"

    (is (= 2 (-> result second :requests count)))))

(deftest with-multiple-number-of-requests
  (let [result (simulation/run-simulation [scenario] 10 {:requests 100})]
    (is (= 100 (->> result (map :requests) count)))))

(deftest duration-given
  (let [result (simulation/run-simulation [scenario] 1 {:duration (time/millis 50)})]

  (:use clojure.test)
  (:require [clj-gatling.simulation :as simulation]
            [clj-time.core :as time]))

(def request-count (atom 0))

(defn counting-request [id cb] (do (swap! request-count inc) (cb true)))

(defn successful-request [id cb] (cb true))

