                        (str "Could not analyze dep " dep) cause))))))
          (cb {:value nil}))))))
 
-(defn load-macros [bound-vars k macros reload reloads opts cb]
+(defn- load-macros [bound-vars k macros reload reloads opts cb]
   (if (seq macros)
     (let [nsym (first (vals macros))
           k    (or (k reload)

                         (recur ast)))))
                 (cb {:value last-ast}))))))) nil)))

(defn analyze
  "Analyze ClojureScript source. The compiler state will be populated with
   the results of analyzes. The parameters:


    (fn [res]
      (println res)))

  (cljs/compile-str st "(defprotocol IFoo (foo [this]))"
    (fn [{:keys [value]}]
      (println "Source:")
      (println value)))
