Permalink
Browse files

Allow for docstrings in ns forms (just discard for now)

  • Loading branch information...
1 parent e22b854 commit 2e46d194dfa9df1527aa87b693da28d56e972117 @michalmarczyk michalmarczyk committed with David Nolen May 1, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 src/clj/cljs/compiler.clj
@@ -1061,7 +1061,9 @@
(defmethod parse 'ns
[_ env [_ name & args :as form] _]
- (let [excludes
+ (let [docstring (if (string? (first args)) (first args) nil)
+ args (if docstring (next args) args)
+ excludes
(reduce (fn [s [k exclude xs]]
(if (= k :refer-clojure)
(do

0 comments on commit 2e46d19

Please sign in to comment.