Permalink
Browse files

Merge pull request #3 from DrTom/master

clojure 1.3 compatibility
  • Loading branch information...
2 parents e1e74b8 + 4c1c8e2 commit 6c148a0cd28a10cf69879665e770d6631810e8aa @GeorgeJahad committed Apr 14, 2012
Showing with 11 additions and 3 deletions.
  1. +8 −0 .gitignore
  2. +3 −3 src/alex_and_georges/debug_repl.clj
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 []

0 comments on commit 6c148a0

Please sign in to comment.