The Trunk: ReleaseBuilder-ar.49.mcz

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

The Trunk: ReleaseBuilder-ar.49.mcz

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

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

Name: ReleaseBuilder-ar.49
Author: ar
Time: 26 February 2010, 7:46:51.849 pm
UUID: 1b12e28f-4315-7d40-9c4f-cd9f2fd5d06d
Ancestors: ReleaseBuilder-edc.48

More cleanup in prepareNewBuild.

=============== Diff against ReleaseBuilder-edc.48 ===============

Item was changed:
  ----- 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.
  Smalltalk at: #ListParagraph ifPresent: [:lp | lp 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'.
+ BitBlt recreateColorMaps.
+ TextOnCurve reset.
+ StrikeFont allInstancesDo:[:sf| sf reset].
  Smalltalk garbageCollect.
+ MethodDictionary compactAllInstances.
  3 timesRepeat: [
  Smalltalk garbageCollect.
  Symbol compactSymbolTable.
  ].!