diff options
| -rw-r--r-- | src/jvm/clojure/lang/PersistentStructMap.java | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/jvm/clojure/lang/PersistentStructMap.java b/src/jvm/clojure/lang/PersistentStructMap.java index 2206e6b4..3ceba52c 100644 --- a/src/jvm/clojure/lang/PersistentStructMap.java +++ b/src/jvm/clojure/lang/PersistentStructMap.java @@ -78,6 +78,13 @@ PersistentStructMap(IPersistentMap meta, IPersistentMap keys, Object[] vals, IPe this.vals = vals; } + +public Obj withMeta(IPersistentMap meta){ + if(meta == _meta) + return this; + return new PersistentStructMap(meta, keyslots, vals, ext); +} + public boolean containsKey(Object key){ return keyslots.containsKey(key) || ext.containsKey(key); } |