[squeak-dev] The Trunk: Monticello-ar.362.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Feb 6 19:36:28 UTC 2010


Andreas Raab uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-ar.362.mcz

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

Name: Monticello-ar.362
Author: ar
Time: 6 February 2010, 11:36:01.659 am
UUID: 7bb8ca1c-32a8-7c47-8ee1-57063f0be03c
Ancestors: Monticello-nice.361

Suppress interactive warnings from ClassBuilder while installing MC packages automatically.

=============== Diff against Monticello-nice.361 ===============

Item was changed:
  ----- Method: MCClassDefinition>>createClass (in category 'installing') -----
  createClass
  	| superClass class composition |
  	superClass := Smalltalk at: superclassName.
+ 	[class := (ClassBuilder new)
- 	class := (ClassBuilder new)
  			name: name 
  			inEnvironment: superClass environment 
  			subclassOf: superClass
  			type: type 
  			instanceVariableNames: self instanceVariablesString 
  			classVariableNames: self classVariablesString 
  			poolDictionaries: self sharedPoolsString
+ 			category: category] on: Warning do:[:ex| ex resume].
- 			category: category.
  
  	"The following is written to support traits unloading"
  	composition := Compiler evaluate: (self traitComposition ifNil:['{}']).
  	(composition isEmpty and:[class traitComposition isEmpty]) ifFalse:[
  		class setTraitComposition: composition asTraitComposition.
  	].
  
  	composition := Compiler evaluate: (self classTraitComposition ifNil:['{}']).
  	(composition isEmpty and:[class class traitComposition isEmpty]) ifFalse:[
  		class class setTraitComposition: composition asTraitComposition.
  	].
  
  	^class!




More information about the Squeak-dev mailing list