equal
deleted
inserted
replaced
254 (You dont have to understand this.)" |
254 (You dont have to understand this.)" |
255 |
255 |
256 ^ self basicAt:index |
256 ^ self basicAt:index |
257 |
257 |
258 "Modified: 25.1.1997 / 13:41:25 / cg" |
258 "Modified: 25.1.1997 / 13:41:25 / cg" |
|
259 ! |
|
260 |
|
261 at:index ifAbsent:exceptionValue |
|
262 "return the indexed instance variable with index, anInteger, |
|
263 or exceptionValue if the index is invalid. |
|
264 Reimplemented here for IGC readBarrier. |
|
265 (You dont have to understand this.)" |
|
266 |
|
267 (index < 0 or:[index > self size]) ifTrue:[^ exceptionValue]. |
|
268 ^ self at:index |
259 ! |
269 ! |
260 |
270 |
261 at:index ifInvalid:exeptionalValue |
271 at:index ifInvalid:exeptionalValue |
262 "return the indexed instance variable with index, anInteger, |
272 "return the indexed instance variable with index, anInteger, |
263 but only if still valid; otherwise return the value from exceptionalValue" |
273 but only if still valid; otherwise return the value from exceptionalValue" |
1015 ! ! |
1025 ! ! |
1016 |
1026 |
1017 !WeakArray class methodsFor:'documentation'! |
1027 !WeakArray class methodsFor:'documentation'! |
1018 |
1028 |
1019 version |
1029 version |
1020 ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.69 2013-04-16 12:46:35 cg Exp $' |
1030 ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.70 2014-05-06 14:45:50 cg Exp $' |
1021 ! |
1031 ! |
1022 |
1032 |
1023 version_CVS |
1033 version_CVS |
1024 ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.69 2013-04-16 12:46:35 cg Exp $' |
1034 ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.70 2014-05-06 14:45:50 cg Exp $' |
1025 ! ! |
1035 ! ! |
1026 |
1036 |
1027 |
1037 |
1028 WeakArray initialize! |
1038 WeakArray initialize! |