summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChouser <chouser@n01se.net>2009-12-19 16:54:12 -0500
committerRich Hickey <richhickey@gmail.com>2009-12-23 08:56:21 -0500
commit89ad4ab4265299327001e2717aa73c8f87f11346 (patch)
tree897b65d30f3b2a36c93d65790c3d90a8b453b8aa
parent2160745a52a3b557c2adaa37673d0c2b9326e3a8 (diff)
empty for sorted-map and sorted-set now maintain comparator. Fixes #128
Signed-off-by: Rich Hickey <richhickey@gmail.com>
-rw-r--r--src/jvm/clojure/lang/PersistentTreeMap.java2
-rw-r--r--src/jvm/clojure/lang/PersistentTreeSet.java2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/jvm/clojure/lang/PersistentTreeMap.java b/src/jvm/clojure/lang/PersistentTreeMap.java
index 5a5a9bee..d69952b9 100644
--- a/src/jvm/clojure/lang/PersistentTreeMap.java
+++ b/src/jvm/clojure/lang/PersistentTreeMap.java
@@ -137,7 +137,7 @@ public ISeq seq(){
}
public IPersistentCollection empty(){
- return EMPTY.withMeta(meta());
+ return new PersistentTreeMap(meta(), comp);
}
public ISeq rseq() throws Exception{
diff --git a/src/jvm/clojure/lang/PersistentTreeSet.java b/src/jvm/clojure/lang/PersistentTreeSet.java
index d0f15d57..22979f11 100644
--- a/src/jvm/clojure/lang/PersistentTreeSet.java
+++ b/src/jvm/clojure/lang/PersistentTreeSet.java
@@ -53,7 +53,7 @@ public IPersistentSet cons(Object o){
}
public IPersistentCollection empty(){
- return EMPTY.withMeta(meta());
+ return new PersistentTreeSet(meta(),(PersistentTreeMap)impl.empty());
}
public ISeq rseq() throws Exception{