Set.st
changeset 16717 ce1544557168
parent 16515 6641d9cd92a6
child 16810 f6b1aa12bd5f
equal deleted inserted replaced
16716:70eb42ffc1b4 16717:ce1544557168
   801 
   801 
   802     "Modified: 1.3.1996 / 21:41:13 / cg"
   802     "Modified: 1.3.1996 / 21:41:13 / cg"
   803 ! !
   803 ! !
   804 
   804 
   805 
   805 
   806 
       
   807 !Set methodsFor:'obsolete set operations'!
   806 !Set methodsFor:'obsolete set operations'!
   808 
   807 
   809 + aCollection
   808 + aCollection
   810     "Kept for backward compatibility. 
   809     "Kept for backward compatibility. 
   811      Use #union: instead, to isolate arithmethic and set operations"
   810      Use #union: instead, to isolate arithmethic and set operations"
  1229     "return the number of set elements"
  1228     "return the number of set elements"
  1230 
  1229 
  1231     ^ tally
  1230     ^ tally
  1232 ! !
  1231 ! !
  1233 
  1232 
  1234 
       
  1235 !Set methodsFor:'testing'!
  1233 !Set methodsFor:'testing'!
  1236 
  1234 
  1237 capacity 
  1235 capacity 
  1238     "return the number of elements, that the receiver is
  1236     "return the number of elements, that the receiver is
  1239      prepared to take.
  1237      prepared to take.
  1280 ! !
  1278 ! !
  1281 
  1279 
  1282 !Set methodsFor:'visiting'!
  1280 !Set methodsFor:'visiting'!
  1283 
  1281 
  1284 acceptVisitor:aVisitor with:aParameter
  1282 acceptVisitor:aVisitor with:aParameter
       
  1283     "dispatch for visitor pattern; send #visitSet:with: to aVisitor."
  1285 
  1284 
  1286     ^ aVisitor visitSet:self with:aParameter
  1285     ^ aVisitor visitSet:self with:aParameter
  1287 ! !
  1286 ! !
  1288 
  1287 
  1289 !Set::EmptySlot class methodsFor:'instance creation'!
  1288 !Set::EmptySlot class methodsFor:'instance creation'!
  1308 ! !
  1307 ! !
  1309 
  1308 
  1310 !Set class methodsFor:'documentation'!
  1309 !Set class methodsFor:'documentation'!
  1311 
  1310 
  1312 version
  1311 version
  1313     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.124 2014-06-03 05:38:32 stefan Exp $'
  1312     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.125 2014-07-09 16:20:21 cg Exp $'
  1314 !
  1313 !
  1315 
  1314 
  1316 version_CVS
  1315 version_CVS
  1317     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.124 2014-06-03 05:38:32 stefan Exp $'
  1316     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.125 2014-07-09 16:20:21 cg Exp $'
  1318 ! !
  1317 ! !
  1319 
  1318 
  1320 
  1319 
  1321 Set initialize!
  1320 Set initialize!