 
 ; region reader3
 
+(defn reader3-node-log! [{::keys [run-plan*] :as env} {::pcp/keys [node-id]} event]
+  (if run-plan*
+    (swap! run-plan* pcp/update-node node-id ::run-trace #(p.misc/vconj % (assoc event ::pt/timestamp (pt/now)))))
+  env)
+
 (defn reader3-run-next-node [env plan {::pcp/keys [run-next]}]
   (if run-next
     (reader3-run-node env plan (pcp/get-node plan run-next))))

    ::pcp/keys [input params]
    :as        node}]
  (if (reader3-all-requires-ready? env node)
    (reader3-run-next-node env plan node)
    (let [input'     (into #{} (keys input))
          {::keys [cache?] :or {cache? true} :as resolver}
          (cond-> (get-in indexes [::index-resolvers sym])

                       (if async-parser?
                         (async-read-cache-read env e trace-data input')
                         (serial-cache-resolver-call env e))
                       (try
                         (let [r (call-resolver env e)]
                           (reader3-node-log! env node {::pt/event ::node-resolver-success})
                           r)
                         (catch #?(:clj Throwable :cljs :default) e
                           (reader3-node-log! env node {::pt/event       ::node-resolver-error
                                                        ::resolver-error e})
                           (throw e))))]
      (if async-parser?
        (go-promise
          (let [response (try
                           (let [r (<?maybe response)]
                             (reader3-node-log! env node {::pt/event ::node-resolver-success})
                             r)
                           (catch #?(:clj Throwable :cljs :default) e
                             (reader3-node-log! env node {::pt/event       ::node-resolver-error
                                                          ::resolver-error e})
                             (throw e)))]
            (if (reader3-merge-resolver-response env sym response)
              (<?maybe (reader3-run-next-node env plan node)))))
        (if (reader3-merge-resolver-response env sym response)
