equal
deleted
inserted
replaced
429 ! |
429 ! |
430 |
430 |
431 asImmutableArray |
431 asImmutableArray |
432 "return a write-protected copy of myself" |
432 "return a write-protected copy of myself" |
433 |
433 |
434 self assert:(ImmutableArray notNil). |
434 "/ self assert:(ImmutableArray notNil). |
435 ^ self copy changeClassTo:ImmutableArray |
435 ^ self copy beImmutable |
|
436 |
|
437 "Modified: / 07-06-2012 / 11:06:48 / cg" |
|
438 ! |
|
439 |
|
440 beImmutable |
|
441 "make myself write-protected" |
|
442 |
|
443 "/ self assert:(ImmutableArray notNil). |
|
444 self changeClassTo:ImmutableArray |
|
445 |
|
446 "Created: / 07-06-2012 / 11:06:33 / cg" |
436 ! ! |
447 ! ! |
437 |
448 |
438 !Array methodsFor:'copying'! |
449 !Array methodsFor:'copying'! |
439 |
450 |
440 copyWith:something |
451 copyWith:something |
2525 ! ! |
2536 ! ! |
2526 |
2537 |
2527 !Array class methodsFor:'documentation'! |
2538 !Array class methodsFor:'documentation'! |
2528 |
2539 |
2529 version |
2540 version |
2530 ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.149 2010-09-21 06:57:51 stefan Exp $' |
2541 ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.150 2012-06-07 09:08:32 cg Exp $' |
2531 ! |
2542 ! |
2532 |
2543 |
2533 version_CVS |
2544 version_CVS |
2534 ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.149 2010-09-21 06:57:51 stefan Exp $' |
2545 ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.150 2012-06-07 09:08:32 cg Exp $' |
2535 ! ! |
2546 ! ! |