summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2009-02-16 22:48:11 +0000
committerRich Hickey <richhickey@gmail.com>2009-02-16 22:48:11 +0000
commitbe56ab81e88f8001494058a055089e982595c453 (patch)
tree134eb1c3629b3085e1d0b3a9e9ebeed98d1c91a3
parent2000a90e0095d6409b7747c01b1e958088137c66 (diff)
[lazy] smarter ASeq and LazySeq isEmpty()lazy
-rw-r--r--src/jvm/clojure/lang/ASeq.java2
-rw-r--r--src/jvm/clojure/lang/LazySeq.java2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/jvm/clojure/lang/ASeq.java b/src/jvm/clojure/lang/ASeq.java
index 49ff5b6d..044802cf 100644
--- a/src/jvm/clojure/lang/ASeq.java
+++ b/src/jvm/clojure/lang/ASeq.java
@@ -184,7 +184,7 @@ public int size(){
}
public boolean isEmpty(){
- return count() == 0;
+ return seq() == null;
}
public boolean contains(Object o){
diff --git a/src/jvm/clojure/lang/LazySeq.java b/src/jvm/clojure/lang/LazySeq.java
index 64be9ed0..1769d43f 100644
--- a/src/jvm/clojure/lang/LazySeq.java
+++ b/src/jvm/clojure/lang/LazySeq.java
@@ -145,7 +145,7 @@ public class LazySeq extends AFn implements ISeq, List {
}
public boolean isEmpty() {
- return count() == 0;
+ return seq() == null;
}
public boolean contains(Object o) {