summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/jvm/clojure/lang/PersistentTreeMap.java8
1 files changed, 8 insertions, 0 deletions
diff --git a/src/jvm/clojure/lang/PersistentTreeMap.java b/src/jvm/clojure/lang/PersistentTreeMap.java
index 8383f4b4..4326a8e4 100644
--- a/src/jvm/clojure/lang/PersistentTreeMap.java
+++ b/src/jvm/clojure/lang/PersistentTreeMap.java
@@ -682,6 +682,12 @@ static public class Seq extends ASeq{
final boolean asc;
final int cnt;
+ public Seq(ISeq stack, boolean asc){
+ this.stack = stack;
+ this.asc = asc;
+ this.cnt = -1;
+ }
+
public Seq(ISeq stack, boolean asc, int cnt){
this.stack = stack;
this.asc = asc;
@@ -723,6 +729,8 @@ static public class Seq extends ASeq{
}
public int count(){
+ if(cnt < 0)
+ return super.count();
return cnt;
}