equal
deleted
inserted
replaced
20 |
20 |
21 Behavior comment:' |
21 Behavior comment:' |
22 COPYRIGHT (c) 1988 by Claus Gittinger |
22 COPYRIGHT (c) 1988 by Claus Gittinger |
23 All Rights Reserved |
23 All Rights Reserved |
24 |
24 |
25 $Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.49 1995-10-23 16:50:42 cg Exp $ |
25 $Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.50 1995-10-29 19:26:10 cg Exp $ |
26 '! |
26 '! |
27 |
27 |
28 !Behavior class methodsFor:'documentation'! |
28 !Behavior class methodsFor:'documentation'! |
29 |
29 |
30 copyright |
30 copyright |
41 " |
41 " |
42 ! |
42 ! |
43 |
43 |
44 version |
44 version |
45 " |
45 " |
46 $Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.49 1995-10-23 16:50:42 cg Exp $ |
46 $Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.50 1995-10-29 19:26:10 cg Exp $ |
47 " |
47 " |
48 ! |
48 ! |
49 |
49 |
50 documentation |
50 documentation |
51 " |
51 " |
413 |
413 |
414 !Behavior methodsFor:'creating an instance of myself'! |
414 !Behavior methodsFor:'creating an instance of myself'! |
415 |
415 |
416 uninitializedNew |
416 uninitializedNew |
417 "create an instance of myself with uninitialized contents. |
417 "create an instance of myself with uninitialized contents. |
418 For all classes except ByteArray, this is the same as new." |
418 For all classes except ByteArray, this is the same as #basicNew." |
419 |
419 |
420 ^ self basicNew |
420 ^ self basicNew |
421 ! |
421 ! |
422 |
422 |
423 uninitializedNew:anInteger |
423 uninitializedNew:anInteger |
424 "create an instance of myself with uninitialized contents. |
424 "create an instance of myself with uninitialized contents. |
425 For all classes except ByteArray, this is the same as new." |
425 For all classes except ByteArray, this is the same as #basicNew:." |
426 |
426 |
427 ^ self basicNew:anInteger |
427 ^ self basicNew:anInteger |
428 ! |
428 ! |
429 |
429 |
430 niceBasicNew:anInteger |
430 niceBasicNew:anInteger |
1440 |
1440 |
1441 ^ selectorArray |
1441 ^ selectorArray |
1442 ! |
1442 ! |
1443 |
1443 |
1444 selectors |
1444 selectors |
1445 "return the receivers selector array. |
1445 "return the receivers selector array as an orderedCollection. |
1446 Notice: this may not compatible with ST-80. |
1446 Notice: this may not be compatible with ST-80. |
1447 (should we return a Set ?)" |
1447 (should we return a Set ?)" |
1448 |
1448 |
1449 ^ selectorArray asOrderedCollection |
1449 ^ selectorArray asOrderedCollection |
1450 ! |
1450 ! |
1451 |
1451 |