diff options
| author | Konrad Hinsen <konrad.hinsen@fastmail.net> | 2010-10-24 09:05:47 +0200 |
|---|---|---|
| committer | Konrad Hinsen <konrad.hinsen@fastmail.net> | 2010-10-24 09:05:47 +0200 |
| commit | 31248059f60cc0f1308525896a8deb8b3e773198 (patch) | |
| tree | 2317d6d5cede254e1be059cd111e1515dba8e9cb | |
| parent | d46ae8fb344a941b95dd40cd599b43f1c584c0d3 (diff) | |
macro-utils: declared rebound vars as :dynamic
| -rw-r--r-- | modules/macro-utils/src/main/clojure/clojure/contrib/macro_utils.clj | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/modules/macro-utils/src/main/clojure/clojure/contrib/macro_utils.clj b/modules/macro-utils/src/main/clojure/clojure/contrib/macro_utils.clj index 98180b3e..ef030bb0 100644 --- a/modules/macro-utils/src/main/clojure/clojure/contrib/macro_utils.clj +++ b/modules/macro-utils/src/main/clojure/clojure/contrib/macro_utils.clj @@ -1,7 +1,7 @@ ;; Macrolet and symbol-macrolet ;; by Konrad Hinsen -;; last updated September 3, 2010 +;; last updated October 23, 2010 ;; Copyright (c) Konrad Hinsen, 2009-2010. All rights reserved. The use ;; and distribution terms for this software are covered by the Eclipse @@ -41,11 +41,11 @@ ; form, imitating dynamic scoping. ; ; Local macros. -(defvar- macro-fns {}) +(defvar- ^:dynamic macro-fns {}) ; Local symbol macros. -(defvar- macro-symbols {}) +(defvar- ^:dynamic macro-symbols {}) ; Symbols defined inside let forms or function arguments. -(defvar- protected-symbols #{}) +(defvar- ^:dynamic protected-symbols #{}) (defn- protected? [symbol] |