The Trunk: ReleaseBuilder-ar.46.mcz

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

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

Name: ReleaseBuilder-ar.46
Author: ar
Time: 13 February 2010, 5:05:03.957 pm
UUID: 3da78e29-b374-a14a-8ace-8b156d363aea
Ancestors: ReleaseBuilder-ul.45

Add a ReleaseBuilderTrunk script to clean up before making a new build.

=============== Diff against ReleaseBuilder-ul.45 ===============

Item was added:
+ ----- Method: ReleaseBuilderTrunk classSide>>prepareNewBuild (in category 'scripts') -----
+ prepareNewBuild "ReleaseBuilderTrunk prepareNewBuild"
+ "Prepare everything that should be done for a new image build"
+ Smalltalk cleanUpUndoCommands.
+ Undeclared removeUnreferencedKeys.
+ StandardScriptingSystem initialize.
+ GradientFillStyle initPixelRampCache.
+ (NaturalLanguageFormTranslator bindingOf: #CachedTranslations) value: nil.
+ (NaturalLanguageTranslator bindingOf: #CachedTranslations) value: nil.
+ (NaturalLanguageTranslator bindingOf: #AllKnownPhrases) value: nil.
+ PaintBoxMorph classPool at: #ColorChart put: nil.
+ (Utilities bindingOf: #ScrapsBook) value: nil.
+ CommandHistory resetAllHistory.
+ Smalltalk at: #Browser ifPresent:[:br| br initialize].
+ DataStream initialize.
+ ListParagraph initialize.
+ PopUpMenu initialize.
+ Smalltalk forgetDoIts.
+ Smalltalk flushClassNameCache.
+ ScrollBar initializeImagesCache.
+ Behavior flushObsoleteSubclasses.
+ AppRegistry withAllSubclassesDo:[:reg| reg removeObsolete].
+ FileServices removeObsolete.
+ ExternalDropHandler resetRegisteredHandlers.
+ SystemOrganization removeEmptyCategories.
+ MCFileBasedRepository flushAllCaches.
+ MCMethodDefinition shutDown.
+ MCDefinition clearInstances.
+ HashedCollection rehashAll.
+ ChangeSet removeChangeSetsNamedSuchThat:
+ [:cs| cs name ~= ChangeSet current name].
+ ChangeSet current clear.
+ ChangeSet current name: 'Unnamed1'.
+ Smalltalk garbageCollect.
+ 3 timesRepeat: [
+ Smalltalk garbageCollect.
+ Symbol compactSymbolTable.
+ ].!

Item was added:
+ ReleaseBuilder subclass: #ReleaseBuilderTrunk
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'ReleaseBuilder'!

Andreas,

about 3 years ago we announced a convention for cleaning up that put  
an end to this kind of script.

Classes implementing #freeSomeSpace would clean up caches, and  
#cleanUp prepared for a release. I added SmalltalkImage-c-
#cleanUpExcept: which was also useful for making a release when for  
example you didn't want to wipe out the ChangeSets.

Keith

keith wrote:
> about 3 years ago we announced a convention for cleaning up that put an
> end to this kind of script.
>
> Classes implementing #freeSomeSpace would clean up caches, and #cleanUp
> prepared for a release. I added SmalltalkImage-c-#cleanUpExcept: which
> was also useful for making a release when for example you didn't want to
> wipe out the ChangeSets.

I must have missed that. Where is the corresponding code?

Cheers,
   - Andreas