summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/clj/clojure/core.clj11
1 files changed, 6 insertions, 5 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj
index 0d1eb723..054d3505 100644
--- a/src/clj/clojure/core.clj
+++ b/src/clj/clojure/core.clj
@@ -3352,11 +3352,12 @@
(when *loading-verbosely*
(printf "(clojure.core/load \"%s\")\n" path)
(flush))
- (throw-if (*pending-paths* path)
- "cannot load '%s' again while it is loading"
- path)
- (binding [*pending-paths* (conj *pending-paths* path)]
- (clojure.lang.RT/load (.substring path 1))))))
+; (throw-if (*pending-paths* path)
+; "cannot load '%s' again while it is loading"
+; path)
+ (when-not (*pending-paths* path)
+ (binding [*pending-paths* (conj *pending-paths* path)]
+ (clojure.lang.RT/load (.substring path 1)))))))
(defn compile
"Compiles the namespace named by the symbol lib into a set of