The Trunk: Traits-ar.266.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Traits-ar.266.mcz

commits-2
Andreas Raab uploaded a new version of Traits to project The Trunk:
http://source.squeak.org/trunk/Traits-ar.266.mcz

==================== Summary ====================

Name: Traits-ar.266
Author: ar
Time: 30 December 2009, 3:31:24 am
UUID: c7cb8d8d-6e4b-9e48-92e4-7f5276214983
Ancestors: Traits-ar.265

Also remove Trait class>>initialize.

=============== Diff against Traits-ar.264 ===============

Item was changed:
  ----- Method: ClassDescription>>traitComposition: (in category '*Traits-NanoKernel') -----
  traitComposition: aTraitComposition
  "Install my trait composition"
+ aTraitComposition isEmptyOrNil ifTrue:[
- aTraitComposition isEmpty ifTrue:[
  self organization isTraitOrganizer
  ifTrue:[self organization: (ClassOrganizer newFrom: self organization)].
  ] ifFalse:[
  self organization isTraitOrganizer
  ifFalse:[self organization: (TraitOrganizer newFrom: self organization)].
  self organization traitComposition: aTraitComposition.
  ].
  !

Item was removed:
- ----- Method: TraitDescription>>traitComposition (in category 'accessing') -----
- traitComposition
- ^traitComposition ifNil:[traitComposition := TraitComposition new]
- !

Item was removed:
- ----- Method: TraitDescription>>traitComposition: (in category 'accessing') -----
- traitComposition: aTraitComposition
- super traitComposition: aTraitComposition.
- traitComposition := aTraitComposition.
- !

Item was removed:
- ----- Method: Trait class>>initialize (in category 'class initialization') -----
- initialize
- "Push traitsComposition down into organizer"
- Smalltalk allClassesAndTraits do:[:aClass|
- aClass traitComposition: aClass traitComposition.
- aClass classSide traitComposition: aClass classSide traitComposition.
- ].!