equal
deleted
inserted
replaced
19 |
19 |
20 SortedCollection comment:' |
20 SortedCollection comment:' |
21 COPYRIGHT (c) 1993 by Claus Gittinger |
21 COPYRIGHT (c) 1993 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libbasic/Attic/SortColl.st,v 1.16 1995-05-16 17:09:05 claus Exp $ |
24 $Header: /cvs/stx/stx/libbasic/Attic/SortColl.st,v 1.17 1995-05-18 15:10:23 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !SortedCollection class methodsFor:'documentation'! |
27 !SortedCollection 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/SortColl.st,v 1.16 1995-05-16 17:09:05 claus Exp $ |
45 $Header: /cvs/stx/stx/libbasic/Attic/SortColl.st,v 1.17 1995-05-18 15:10:23 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
302 |
302 |
303 before:anObject |
303 before:anObject |
304 "return the element before the argument, anObject; or nil if there is none. |
304 "return the element before the argument, anObject; or nil if there is none. |
305 If the receiver does not contain anObject, report an error" |
305 If the receiver does not contain anObject, report an error" |
306 |
306 |
307 ^ self before:anObject ifAbsent:[self errorNotFound:anObject] |
307 ^ self before:anObject ifAbsent:[self errorValueNotFound:anObject] |
308 |
308 |
309 " |
309 " |
310 #(7 3 9 10 99) asSortedCollection before:50 |
310 #(7 3 9 10 99) asSortedCollection before:50 |
311 #(7 3 9 10 99) asSortedCollection before:1 |
311 #(7 3 9 10 99) asSortedCollection before:1 |
312 #(7 3 9 10 99) asSortedCollection before:1000 |
312 #(7 3 9 10 99) asSortedCollection before:1000 |
344 |
344 |
345 after:anObject |
345 after:anObject |
346 "return the element after the argument, anObject; or nil if there is none. |
346 "return the element after the argument, anObject; or nil if there is none. |
347 If the receiver does not contain anObject, report an error" |
347 If the receiver does not contain anObject, report an error" |
348 |
348 |
349 ^ self after:anObject ifAbsent:[self errorNotFound:anObject] |
349 ^ self after:anObject ifAbsent:[self errorValueNotFound:anObject] |
350 |
350 |
351 " |
351 " |
352 #(7 3 9 10 99) asSortedCollection after:50 |
352 #(7 3 9 10 99) asSortedCollection after:50 |
353 #(7 3 9 10 99) asSortedCollection after:1 |
353 #(7 3 9 10 99) asSortedCollection after:1 |
354 #(7 3 9 10 99) asSortedCollection after:10 |
354 #(7 3 9 10 99) asSortedCollection after:10 |