Queue.st
changeset 5155 2f28067db22c
parent 4976 0f047710f65c
child 5170 125d0cc824ff
equal deleted inserted replaced
5154:026063819510 5155:2f28067db22c
   542 
   542 
   543     "Modified: / 22-02-2017 / 16:33:22 / stefan"
   543     "Modified: / 22-02-2017 / 16:33:22 / stefan"
   544 !
   544 !
   545 
   545 
   546 nextPutAll:aCollection
   546 nextPutAll:aCollection
   547     "enter all elements from aCollection into the queue."
   547     "enter all elements from aCollection into the queue.
       
   548      Answer the receiver"
   548 
   549 
   549     aCollection do:[:element | self nextPut:element].
   550     aCollection do:[:element | self nextPut:element].
   550     ^ self
   551     ^ self
   551 !
   552 !
   552 
   553