   2. on each call returns the next value from `coll`, cyclically."
   [coll]
   (let [vals (atom (cycle coll))]
-    (fn cyclical-fn [& _args_]
+    (fn cyclical-fn [& _args]
       (let [result (first @vals)]
         (swap! vals next)
         result))))
any
  (reify
    ArgsMatcher
    (args-match? [_ _args_] true)
    (args-matcher->str [_] "<any>")

    ImplicitArgMatcher
    (arg-matches-implicitly? [_ _arg_] true)
    (arg-matcher->str [_] "<any>")))

(defn ^:no-doc -arg-matches?

(defn unpatch-all!
  "Restores original values for all the variables patched in the specified context."
  [ctx]
  (doseq [[_var unpatch-fn] (:unpatches @ctx)]
    (unpatch-fn)))

;;;;;;;;;;;;;;;;;;;;;;;; Utils
