 
 
 (defn make-event-handler-factory
-  "Given factory fn (accepts event as argument, returns EventHandler), create and return an EventHandlerFactory object."
+  "Given (fn [event]) -> EventHandler, create and return a preflex.instrument.EventHandlerFactory object."
   [f]
   (reify EventHandlerFactory
     (createHandler [_ event] (f event))))
 
 
 (defmacro wrap-proxy
-  "Given an instrumenting caller f (that accepts context and no-arg fn as args), a target object and proxy
-  class/interfaces and constructor args, return an instrumented proxy."
+  "Given an instrumenting caller (fn [context (fn task [])), a target object and proxy class/interfaces and
+  constructor args, return an instrumented proxy."
   [f object class-and-interfaces args {:keys [method-pred]
                                        :or {method-pred i/public-method?}
                                        :as options}]



(defn make-event-handler
  [{:keys [before
           on-return
           on-throw



(defn make-wrapper
  "Given an instrumenting caller (fn [context (fn task [])]), return a preflex.instrument.task.Wrapper instance."
  [f]
  (reify Wrapper
    (run  [_ context task]         (f context #(.run  task)))
