MappedCollection.st
changeset 2990 cf16ba07221c
parent 2967 9ebb5e9a705a
child 3018 8abd4a4fdf06
equal deleted inserted replaced
2989:4b2ec07a1de6 2990:cf16ba07221c
   102 
   102 
   103 contents
   103 contents
   104     "return the contents as a bag"
   104     "return the contents as a bag"
   105 
   105 
   106     |contents|
   106     |contents|
       
   107 
   107     contents := Bag new.
   108     contents := Bag new.
   108     map do:[:key | contents add:(domain at:key)].
   109     map do:[:key | contents add:(domain at:key)].
   109     ^ contents
   110     ^ contents
   110 
   111 
   111     "Modified: 2.8.1996 / 21:04:10 / cg"
   112     "Modified: 2.8.1996 / 21:04:10 / cg"
   184 ! !
   185 ! !
   185 
   186 
   186 !MappedCollection class methodsFor:'documentation'!
   187 !MappedCollection class methodsFor:'documentation'!
   187 
   188 
   188 version
   189 version
   189     ^ '$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.19 2013-04-02 12:35:42 stefan Exp $'
   190     ^ '$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.20 2013-04-26 09:46:00 cg Exp $'
   190 ! !
   191 ! !
   191 
   192