summaryrefslogtreecommitdiff
path: root/src/jvm/clojure
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2007-12-17 14:43:43 +0000
committerRich Hickey <richhickey@gmail.com>2007-12-17 14:43:43 +0000
commit742bf71003d62c9d41881aa7c59740993a749243 (patch)
tree2b424a0156cacb51b114e7d4ca689a1c23e80077 /src/jvm/clojure
parent7e0466d0699b23a6da4557597d3489eb9c54a36b (diff)
fixed pop when count 2
Diffstat (limited to 'src/jvm/clojure')
-rw-r--r--src/jvm/clojure/lang/PersistentVector.java2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/jvm/clojure/lang/PersistentVector.java b/src/jvm/clojure/lang/PersistentVector.java
index 4e93dc9c..3910d118 100644
--- a/src/jvm/clojure/lang/PersistentVector.java
+++ b/src/jvm/clojure/lang/PersistentVector.java
@@ -324,7 +324,7 @@ public PersistentVector pop(){
{
return (PersistentVector) EMPTY.withMeta(meta());
}
- if(newroot.length == 1)
+ if(shift > 0 && newroot.length == 1)
{
newroot = (Object[]) newroot[0];
newshift -= 5;