 
 
 (defn load
+  "λ String → nil
+   λ String → config-map → nil
+
+  Loads a resource on the classpath identified by a string path as
+  clojure code via eval for side-effects against the invoking Clojure
+  runtime.
+
+  config-map:
+    If config-map is not provided, it will default to the value of
+    *load-configuration* or {:debug? false}.
+
+    If config contains a :debug? key, then printing of the generated
+    class bytecode and other development information is enabled.
+
+    If config contains an atom at [:ast :defs] the ASTs of all def
+    symbols will be assoc'd into that atom keyed on the symbol they
+    define. Multiple definitions will overwrite each other.
+
+    If config contains an atom at [:ast :forms] the ASTs of all read
+    forms will be conj'd to it in reading & evaluation order."
+
   ([res]
      (load res
            (or *load-configuration*

  @#'clojure.core/root-directory)

(def ^:dynamic *load-configuration*
  nil)

(defn atom? [x]
  (instance? clojure.lang.Atom x))

(defn eval
  ([form] 
     (eval form {:debug? false}))


           reader (readers/indexing-push-back-reader file 1 p)]
       (binding [*ns*                 *ns*
                 *file*               p
                 *load-configuration* options
                 clojure.core/load    oxcart/load]
         (loop []
           (let [form (r/read reader false eof)]
             (when (not= eof form)
