Index: src/jvm/clojure/lang/PersistentQueue.java
===================================================================
--- src/jvm/clojure/lang/PersistentQueue.java   (revision 1185)
+++ src/jvm/clojure/lang/PersistentQueue.java   (working copy)
@@ -181,10 +181,10 @@
 public boolean containsAll(Collection c){
        for(Object o : c)
                {
-               if(contains(o))
-                       return true;
+               if(!contains(o))
+                       return false;
                }
-       return false;
+       return true;
 }

 public Object[] toArray(Object[] a){
Index: src/jvm/clojure/lang/PersistentList.java
===================================================================
--- src/jvm/clojure/lang/PersistentList.java    (revision 1185)
+++ src/jvm/clojure/lang/PersistentList.java    (working copy)
@@ -207,7 +207,12 @@
        }

        public boolean containsAll(Collection collection){
-               return collection.isEmpty();
+               for(Object o : collection)
+                       {
+                       if(!contains(o))
+                               return false;
+                       }
+               return true;
        }

        public Object[] toArray(Object[] objects){


--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to 
clojure+unsubscr...@googlegroups.com
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to