 
 (declare compute-run-graph* compute-root-and)
 
-(defn base-out []
+(defn base-graph []
   {::nodes             {}
    ::index-syms        {}
    ::unreachable-syms  #{}

  (swap! id-counter inc))

(defn get-node
  [out node-id]
  (get-in out [::nodes node-id]))

(defn get-root-node [{::keys [root] :as out}]
  (get-node out root))

(defn node-kind [node]
  (cond

                       {attribute (compute-nested-requires env)}
                       {attribute {}})
        sym-provides (or (resolver-provides env) requires)
        next-node    (get-node graph run-next)]
    (if (and false (dynamic-resolver? env sym)
             (= sym (pc-sym next-node)))
      (-> next-node
