The Trunk: Traits-cwp.292.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-cwp.292.mcz

commits-2
Colin Putney uploaded a new version of Traits to project The Trunk:
http://source.squeak.org/trunk/Traits-cwp.292.mcz

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

Name: Traits-cwp.292
Author: cwp
Time: 1 January 2013, 7:05:34.365 pm
UUID: 046dee69-eb88-4abe-b6d8-f0de8dd035a5
Ancestors: Traits-ul.290

Environments bootstrap - stage 3

=============== Diff against Traits-ul.290 ===============

Item was changed:
  ----- Method: Trait>>rename: (in category 'initialize') -----
  rename: aString
  "The new name of the receiver is the argument, aString."
 
  | newName |
  (newName := aString asSymbol) ~= self name
  ifFalse: [^ self].
  (self environment includesKey: newName)
  ifTrue: [^ self error: newName , ' already exists'].
+ (self environment undeclared includesKey: newName)
- (Undeclared includesKey: newName)
  ifTrue: [self inform: 'There are references to, ' , aString printString , '
  from Undeclared. Check them after this change.'].
  self environment renameClass: self as: newName.
  name := newName!