Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Already on GitHub? Sign in to your account

clojure 1.3 compatibility #3

Merged
merged 1 commit into from Apr 14, 2012
Jump to file or symbol
Failed to load files and symbols.
+11 −3
Split
View
@@ -0,0 +1,8 @@
+/pom.xml
+*jar
+/lib
+/classes
+/native
+/.lein-failures
+/checkouts
+/.lein-deps-sum
@@ -54,7 +54,7 @@
(let [symbols (keys &env)]
(zipmap (map (fn [sym] `(quote ~sym)) symbols) symbols)))
-(declare *locals*)
+(declare ^:dynamic *locals*)
(defn view-locals []
*locals*)
@@ -75,7 +75,7 @@ values."
request-exit
input)))
-(def level 0)
+(def ^:dynamic level 0)
(def counter (atom 1000))
(defn inc-counter []
(swap! counter inc))
@@ -90,7 +90,7 @@ values."
(reset! element (first form))
(throw quit-dr-exception))
-(def exit-dr-exception
+(def ^:dynamic exit-dr-exception
(Throwable. "Exiting back to main repl from debug-repl"))
(defn exit-dr []