Dict.st
changeset 302 1f76060d58a4
parent 293 31df3850e98c
child 345 cf2301210c47
equal deleted inserted replaced
301:35e40a6fc72b 302:1f76060d58a4
    19 
    19 
    20 Dictionary comment:'
    20 Dictionary comment:'
    21 COPYRIGHT (c) 1991 by Claus Gittinger
    21 COPYRIGHT (c) 1991 by Claus Gittinger
    22 	      All Rights Reserved
    22 	      All Rights Reserved
    23 
    23 
    24 $Header: /cvs/stx/stx/libbasic/Attic/Dict.st,v 1.18 1995-03-06 19:15:52 claus Exp $
    24 $Header: /cvs/stx/stx/libbasic/Attic/Dict.st,v 1.19 1995-03-08 23:37:55 claus Exp $
    25 '!
    25 '!
    26 
    26 
    27 !Dictionary class methodsFor:'documentation'!
    27 !Dictionary class methodsFor:'documentation'!
    28 
    28 
    29 copyright
    29 copyright
    40 "
    40 "
    41 !
    41 !
    42 
    42 
    43 version
    43 version
    44 "
    44 "
    45 $Header: /cvs/stx/stx/libbasic/Attic/Dict.st,v 1.18 1995-03-06 19:15:52 claus Exp $
    45 $Header: /cvs/stx/stx/libbasic/Attic/Dict.st,v 1.19 1995-03-08 23:37:55 claus Exp $
    46 "
    46 "
    47 !
    47 !
    48 
    48 
    49 documentation
    49 documentation
    50 "
    50 "
   370     valueArray := valueArray shallowCopy
   370     valueArray := valueArray shallowCopy
   371 ! !
   371 ! !
   372 
   372 
   373 !Dictionary methodsFor:'enumerating'!
   373 !Dictionary methodsFor:'enumerating'!
   374 
   374 
       
   375 keysDo:aBlock
       
   376     "perform the block for all keys in the collection."
       
   377 
       
   378     ^ super do:aBlock
       
   379 !
       
   380 
   375 allKeysDo:aBlock
   381 allKeysDo:aBlock
   376     "perform the block for all keys in the collection."
   382     "perform the block for all keys in the collection.
       
   383      Obsolete: use keysDo: for ST-80 compatibility."
   377 
   384 
   378     ^ super do:aBlock
   385     ^ super do:aBlock
   379 !
   386 !
   380 
   387 
   381 associationsDo:aBlock
   388 associationsDo:aBlock