Define #species, so that #collect: and #select return OrderedCollection
authorStefan Vogel <sv@exept.de>
Mon, 25 May 2009 13:12:55 +0200
changeset 2148 5fe0c7beef0c
parent 2147 b2f5a09a6174
child 2149 329461c02e84
Define #species, so that #collect: and #select return OrderedCollection
Queue.st
--- a/Queue.st	Mon May 18 16:48:39 2009 +0200
+++ b/Queue.st	Mon May 25 13:12:55 2009 +0200
@@ -432,6 +432,12 @@
     "return the number of elements in the queue"
 
     ^ tally
+!
+
+species
+    "return the type of collection to be returned by collect, select etc."
+
+    ^ OrderedCollection
 ! !
 
 !Queue methodsFor:'testing'!
@@ -452,5 +458,5 @@
 !Queue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Queue.st,v 1.31 2007-11-21 17:24:10 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Queue.st,v 1.32 2009-05-25 11:12:55 stefan Exp $'
 ! !