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 -~----------~----~----~----~------~----~------~--~---