Collection.st
changeset 16778 554ad879a1c9
parent 16777 6be6dfd33ec6
child 16789 840f00e590c7
equal deleted inserted replaced
16777:6be6dfd33ec6 16778:554ad879a1c9
   265      Kludges around the stupid definition of OrderedCollection>>new:"
   265      Kludges around the stupid definition of OrderedCollection>>new:"
   266 
   266 
   267     ^ self newWithSize:n
   267     ^ self newWithSize:n
   268 ! !
   268 ! !
   269 
   269 
       
   270 
   270 !Collection class methodsFor:'Signal constants'!
   271 !Collection class methodsFor:'Signal constants'!
   271 
   272 
   272 emptyCollectionSignal
   273 emptyCollectionSignal
   273     "return the signal used to report non-allowed operation on empty collections"
   274     "return the signal used to report non-allowed operation on empty collections"
   274 
   275 
   547 
   548 
   548     ^ self keysAndValuesDo:[:key :index |
   549     ^ self keysAndValuesDo:[:key :index |
   549         aTwoArgBlock value:index value:key
   550         aTwoArgBlock value:index value:key
   550     ].
   551     ].
   551 ! !
   552 ! !
       
   553 
   552 
   554 
   553 !Collection methodsFor:'accessing'!
   555 !Collection methodsFor:'accessing'!
   554 
   556 
   555 anElement
   557 anElement
   556     "return any element from the collection, 
   558     "return any element from the collection, 
  4144 
  4146 
  4145 !Collection methodsFor:'queries'!
  4147 !Collection methodsFor:'queries'!
  4146 
  4148 
  4147 defaultElement
  4149 defaultElement
  4148     ^  nil
  4150     ^  nil
       
  4151 !
       
  4152 
       
  4153 isReadOnly
       
  4154     ^ false
       
  4155 !
       
  4156 
       
  4157 isWritable
       
  4158     ^ self isReadOnly not
  4149 !
  4159 !
  4150 
  4160 
  4151 size
  4161 size
  4152     "return the number of elements in the receiver.
  4162     "return the number of elements in the receiver.
  4153      This is usually redefined in subclasses for more performance."
  4163      This is usually redefined in subclasses for more performance."
  5599 ! !
  5609 ! !
  5600 
  5610 
  5601 !Collection class methodsFor:'documentation'!
  5611 !Collection class methodsFor:'documentation'!
  5602 
  5612 
  5603 version
  5613 version
  5604     ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.345 2014-07-15 09:47:43 cg Exp $'
  5614     ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.346 2014-07-16 13:08:37 cg Exp $'
  5605 !
  5615 !
  5606 
  5616 
  5607 version_CVS
  5617 version_CVS
  5608     ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.345 2014-07-15 09:47:43 cg Exp $'
  5618     ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.346 2014-07-16 13:08:37 cg Exp $'
  5609 ! !
  5619 ! !
  5610 
  5620 
  5611 
  5621 
  5612 Collection initialize!
  5622 Collection initialize!