                    (assoc entity-key %)
                    (update ::path conj %2))) coll (range)))
 
-;; old names for join and join-seq
-(def continue join)
-(def continue-seq join-seq)
-
 (defn ident-key [{:keys [ast]}]
   (let [key (some-> ast :key)]
     (if (vector? key) (first key))))

    (if (= ns (namespace (:dispatch-key ast)))
      (join env)
      ::continue)))

; keep old name for compatibility
(def placeholder-node placeholder-reader)

;; BUILT-IN READERS



;;;; DEPRECATED

;; old names for join and join-seq
(def continue join)
(def continue-seq join-seq)

; keep old name for compatibility
(def placeholder-node placeholder-reader)

(defn pathom-read
  "DEPRECATED: use p/parser to create your parser"
  [{::keys [reader process-reader] :as env} _ _]
