         sig-fn    (:signal-fn ctx)
         max-iter  (:max-iter ctx)
         watch-id  (keyword (gensym))
-        ->result  (fn [type iter colls sigs t0]
+        ->result  (fn [type iter sigs colls t0]
                     (remove-watch! g :remove-vertex watch-id)
-                    (execution-result type colls sigs t0 {:iterations iter}))]
+                    (execution-result type sigs colls t0 {:iterations iter}))]
     (reify
       #?@(:clj
            [clojure.lang.IDeref

        max-ops   (:max-ops ctx)
        processor ((:processor ctx) s-thresh c-thresh)
        threads   (:threads ctx)
        watch-id  (keyword (gensym))]
    (reify
      #?@(:clj
           [clojure.lang.IDeref

(defn- now [] #?(:clj (System/nanoTime) :cljs (.getTime (js/Date.))))

(defn execution-result
  [type sigs colls t0 & [opts]]
  (->> {:collections colls
        :signals     sigs
        :type        type
