 (declare xpand-form)
 
 (defn xpand-all
-  [form src-map fn-meta path path-chain]
+  [form src-map fn-meta path path-parent]
   (when-not (nil? form)
     (util/back-into form
                     (doall (map-indexed #(xpand-form %2
                                                      src-map
                                                      fn-meta
                                                      (conj path %)
-                                                     path-chain)
+                                                     path-parent)
                                         form)))))
 
 (defn get-form-meta-somehow

        form (if macro?
               (:orig sub-src-map)
               (:x sub-src-map))]
    {:inner-path-chain path-chain
     :name (if (seq? form)
             (first form)
             form)
     :form form
     :macro? macro?
     :inner-path (last path-chain)
     :parent-name (symbol (format "%s/%s"
                                  (-> fn-meta :ns str)
                                  (:name fn-meta)))

  :NOT-IMPLEMENTED)

(defn mk-tree-template
  [src-map frm-meta fn-meta path-parent & {:keys [macro?]}]
  (let [sub-src-map (util/$- -> path-parent
                             last
                             (remove #{:macro} $)
                             path->sym
