diff options
| author | Rich Hickey <richhickey@gmail.com> | 2010-03-19 12:10:46 -0400 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2010-03-19 12:10:46 -0400 |
| commit | 67864eb0d91867ff03b87d6874be28f1476d27df (patch) | |
| tree | 76f8c1ec54f39fbc58584e7530e056d81751204f /src/clj | |
| parent | 109b015af4a0ca873412875b6e7705bec067640e (diff) | |
added IObj and metadata propagation support for reify, so #^{:my :meta} (reify ...) works
Diffstat (limited to 'src/clj')
| -rw-r--r-- | src/clj/clojure/core_deftype.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clj/clojure/core_deftype.clj b/src/clj/clojure/core_deftype.clj index 0e721361..1297119a 100644 --- a/src/clj/clojure/core_deftype.clj +++ b/src/clj/clojure/core_deftype.clj @@ -100,7 +100,7 @@ [& opts+specs] (let [[interfaces methods] (parse-opts+specs opts+specs)] - `(reify* ~interfaces ~@methods))) + (with-meta `(reify* ~interfaces ~@methods) (meta &form)))) (defn hash-combine [x y] (clojure.lang.Util/hashCombine x (clojure.lang.Util/hash y))) |