               :foo_7 7
               :foo_8 8
               :foo_9 9
-              (str res arg)))]
-    (cc/with-progress-reporting
-      (cc/quick-bench
-        (f "bar")
+              (+ res arg)))]
+    (cc/with-progress-reporting
+      (cc/quick-bench
+        (f 2)
         :verbose))))
 
 (deftest condp-benchmark-3
   (println "\nRunning: condp-benchmark-3")
-  (let [res "foo"
+  (let [res 1
         f (fn [arg]
             (condp = arg
               :foo_0 0

              :foo_37 37
              :foo_38 38
              :foo_39 39
              (str res arg)))]
    (cc/with-progress-reporting
      (cc/quick-bench
        (f "bar")
        :verbose))))

(deftest if-condp-benchmark-0
  (println "\nRunning: if-condp-benchmark-0")
  (let [res "foo"
        f (fn [arg]
            (if (not (keyword? arg))
              (str res arg)
              (condp = arg
                :foo_0 0
                :foo_1 1

           :foo_37 37
           :foo_38 38
           :foo_39 39
           :bar (fn [arg] (+ res arg))}
        f (m :bar)]
    (cc/with-progress-reporting
      (cc/quick-bench
        (f 2)
        :verbose))))

(deftest map-rev-benchmark-0
  (println "\nRunning: map-rev-benchmark-0")
  (let [res 1
        m {:bar (fn [arg] (+ res arg))}]
    (cc/with-progress-reporting
      (cc/quick-bench
        ((:bar m) 2)
        :verbose))))

(deftest map-rev-benchmark-1
  (println "\nRunning: map-rev-benchmark-1")
  (let [res 1
        m {:foo_0 0
           :bar (fn [arg] (+ res arg))}]
    (cc/with-progress-reporting
      (cc/quick-bench
        ((:bar m) 2)
        :verbose))))

(deftest map-rev-benchmark-2
  (println "\nRunning: map-rev-benchmark-2")
  (let [res 1
        m {:foo_0 0
           :foo_1 1
           :foo_2 2
           :foo_3 3
           :foo_4 4
           :foo_5 5
           :foo_6 6
           :foo_7 7
           :foo_8 8
           :foo_9 9
           :bar (fn [arg] (+ res arg))}]
    (cc/with-progress-reporting
      (cc/quick-bench
        ((:bar m) 2)
        :verbose))))

(deftest map-rev-benchmark-3
  (println "\nRunning: map-rev-benchmark-3")
  (let [res 1
        m {:foo_0 0
           :foo_1 1
           :foo_2 2
