> Object subclass: #Collection
> 	instanceVariableNames: ''
> 	classVariableNames: 'RandomForPicking '
> 	poolDictionaries: ''
> 	category: 'Collections-Abstract'
> 
> Change 'Object' to other class and accept-it.

:-)
I know that.
But if I want to do that manually ?
The ideal way would be to have a msg such as :
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
cls := Smalltalk at: #MyTerrificClass.
cls changeSuperclassFor: (Smalltalk at: #MyFabulousSuperClass).
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

Alexandre

-- 
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._
Bergel Alexandre  http://www.iam.unibe.ch/~bergel
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^