     (if (= ns (namespace (:dispatch-key ast)))
       (join env)
       ::continue)))
-
-; keep old name for compatibility
-(def placeholder-node placeholder-reader)
 
 ;; BUILT-IN READERS
 

                   (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))))


;;;; 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} _ _]
