Set.st
changeset 18466 0359b064feba
parent 18331 521e3c40ea23
child 18473 ff8f0323cadd
child 19080 0f75504d1ce4
equal deleted inserted replaced
18465:e9e4bb62235f 18466:0359b064feba
   813 
   813 
   814     "Modified: 1.3.1996 / 21:41:13 / cg"
   814     "Modified: 1.3.1996 / 21:41:13 / cg"
   815 ! !
   815 ! !
   816 
   816 
   817 
   817 
   818 
       
   819 !Set methodsFor:'obsolete set operations'!
   818 !Set methodsFor:'obsolete set operations'!
   820 
   819 
   821 + aCollection
   820 + aCollection
   822     "Kept for backward compatibility. 
   821     "Kept for backward compatibility. 
   823      Use #union: instead, to isolate arithmethic and set operations"
   822      Use #union: instead, to isolate arithmethic and set operations"
  1241     "return the number of set elements"
  1240     "return the number of set elements"
  1242 
  1241 
  1243     ^ tally
  1242     ^ tally
  1244 ! !
  1243 ! !
  1245 
  1244 
  1246 
       
  1247 !Set methodsFor:'searching'!
  1245 !Set methodsFor:'searching'!
  1248 
  1246 
  1249 findFirst:aBlock ifNone:exceptionValue
  1247 findFirst:aBlock ifNone:exceptionValue
  1250     "find the index of the first element, for which evaluation of the argument, aBlock returns true; 
  1248     "find the index of the first element, for which evaluation of the argument, aBlock returns true; 
  1251      return its index or the value from exceptionValue if none detected.
  1249      return its index or the value from exceptionValue if none detected.
  1284      Arrays and Strings learn how to grow ..."
  1282      Arrays and Strings learn how to grow ..."
  1285 
  1283 
  1286     ^ false
  1284     ^ false
  1287 !
  1285 !
  1288 
  1286 
       
  1287 isOrdered
       
  1288     "return true, if the receiver's elements are ordered.
       
  1289      Redefined to return false here, because the order of keys (and values in dictionaries)
       
  1290      may change due to rehashing, when elements are added/removed"
       
  1291 
       
  1292     ^ false
       
  1293 !
       
  1294 
  1289 notEmpty
  1295 notEmpty
  1290     "return true if the receiver is not empty"
  1296     "return true if the receiver is not empty"
  1291 
  1297 
  1292     ^ tally ~~ 0
  1298     ^ tally ~~ 0
  1293 
  1299 
  1334 ! !
  1340 ! !
  1335 
  1341 
  1336 !Set class methodsFor:'documentation'!
  1342 !Set class methodsFor:'documentation'!
  1337 
  1343 
  1338 version
  1344 version
  1339     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.133 2015-05-09 11:58:00 cg Exp $'
  1345     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.134 2015-06-08 19:22:24 cg Exp $'
  1340 !
  1346 !
  1341 
  1347 
  1342 version_CVS
  1348 version_CVS
  1343     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.133 2015-05-09 11:58:00 cg Exp $'
  1349     ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.134 2015-06-08 19:22:24 cg Exp $'
  1344 ! !
  1350 ! !
  1345 
  1351 
  1346 
  1352 
  1347 Set initialize!
  1353 Set initialize!