diff options
Diffstat (limited to 'src/clojure/contrib/test_clojure/vars.clj')
| -rw-r--r-- | src/clojure/contrib/test_clojure/vars.clj | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/clojure/contrib/test_clojure/vars.clj b/src/clojure/contrib/test_clojure/vars.clj index 5b76cc43..f3b2e8ff 100644 --- a/src/clojure/contrib/test_clojure/vars.clj +++ b/src/clojure/contrib/test_clojure/vars.clj @@ -16,6 +16,13 @@ ; declare intern binding find-var var +(def a) +(deftest test-binding + (are (= _1 _2) + (eval `(binding [a 4] a)) 4 ; regression in Clojure SVN r1370 + )) + + ; with-local-vars var-get var-set alter-var-root [var? (predicates.clj)] ; with-in-str with-out-str ; with-open |