- Pharo-dev - lists.pharo.org

Re: [Pharo-project] System package

by StÃ©phane Ducasse

ok I will add an issue. On Jul 29, 2012, at 10:05 PM, Pavel Krivanek wrote: >

July 29, 2012

Re: [Pharo-project] System package

by Pavel Krivanek

(MCWorkingCopy forPackage: (MCPackage named: 'System')) unregister On Sun, Jul 29, 2012 at 9:49 PM, Pavel Krivanek <pavel.krivanek(a)gmail.com> wrote: > Hi, > > in the image we have one Monticello package in the image that should > not be there: System (EstebanLorenzano.7). The working copy should be > removed in the next update. > > -- Pavel

July 29, 2012

[Pharo-project] System package

by Pavel Krivanek

Hi, in the image we have one Monticello package in the image that should not be there: System (EstebanLorenzano.7). The working copy should be removed in the next update. -- Pavel

July 29, 2012

Re: [Pharo-project] [update 2.0] #20236

by StÃ©phane Ducasse

Thanks pavel. stef On Jul 29, 2012, at 3:19 PM, Pavel Krivanek wrote: > Sorry, this was not an issue in the Announcements but in a wrong > automatic line break in the shrinking script. Pharo Kernel 2.0 job is > green now. > > -- Pavel > > On Sun, Jul 29, 2012 at 12:45 PM, Guillermo Polito > <guillermopolito(a)gmail.com> wrote: >> >> >> On Sun, Jul 29, 2012 at 12:34 AM, camille teruel <camille.teruel(a)gmail.com> >> wrote: >>> >>> Yes there is still mess in ChangesLog>>logEvent: . I'll clean up this >>> tomorrow. By the way, does somone knows why ChangesLog only logs classes and >>> methods deletion and nothing more? >>> >> >> But the mess is consistent :/. If I evaluate in a workspace: >> >> (RemovedEvent class: SystemChangeNotifier category: 'aCategoryName') >> asAnnouncement event >> >> It yields to the event and not to nil.... So there is another problem in the >> shrinking maybe... >> >>> >>> >>> 2012/7/28 Pavel Krivanek <pavel.krivanek(a)gmail.com> >>>> >>>> On Fri, Jul 27, 2012 at 9:18 PM, Esteban Lorenzano <estebanlm(a)gmail.com> >>>> wrote: >>>>> 20236 >>>>> ----- >>>>> >>>>> Issue 6467: Remove SystemChangeNotifier 2 - All events using >>>>> SystemAnnouncer >>>>> http://code.google.com/p/pharo/issues/detail?id=6467 >>>>> >>>>> the beast is not dead yet... but almost :) >>>>> >>>> >>>> Hi Esteban, >>>> >>>> the shrinking to the Pharo Kernel now fails with this error: >>>> >>>> PharoKernel shrinking report >>>> Error: >>>> MessageNotUnderstood: receiver of "isRemoved" is nil >>>> 441 [:e | >>>> | rep | >>>> rep := FileStream forceNewFileNamed: 'PharoDebug.log'. >>>> rep nextPutAll: 'PharoKernel shrinking report'; >>>> cr. >>>> rep nextPutAll: 'Error:'; >>>> cr. >>>> rep nextPutAll: e asString; >>>> cr. >>>> rep nextPutAll: thisContext stack size asString. >>>> thisContext stack copy >>>> withIndexDo: [:stck :i | [rep nextPutAll: i asString; >>>> space; >>>> nextPutAll: stck asString; >>>> cr] >>>> ifError: []]. >>>> rep close. >>>> Smalltalk exitFailure] in SmalltalkImage>>privShrinkingProcess >>>> 2 BlockClosure>>cull: >>>> 3 BlockClosure>>cull:cull: >>>> 4 [:ex | errorHandlerBlock cull: ex description cull: ex receiver] in >>>> BlockClosure>>ifError: >>>> 5 BlockClosure>>cull: >>>> 6 [(self tempAt: 2) >>>> cull: exception] in >>>> MethodContext(ContextPart)>>handleSignal: >>>> 7 BlockClosure>>ensure: >>>> 8 MethodContext(ContextPart)>>handleSignal: >>>> 9 MethodContext(ContextPart)>>handleSignal: >>>> 10 MessageNotUnderstood(Exception)>>signal >>>> 11 UndefinedObject(Object)>>doesNotUnderstand: #isRemoved >>>> 12 ChangesLog>>logEvent: >>>> 13 ChangesLog>>logAnnouncement: >>>> 14 MessageSend>>value: >>>> 15 MessageSend>>cull: >>>> 16 MessageSend>>cull:cull: >>>> 17 [action cull: anAnnouncement cull: announcer] in >>>> AnnouncementSubscription>>deliver: >>>> 18 BlockClosure>>on:do: >>>> 19 BlockClosure>>on:fork: >>>> 20 AnnouncementSubscription>>deliver: >>>> 21 [subscription deliver: anAnnouncement] in >>>> SubscriptionRegistry>>deliver:to:startingAt: >>>> 22 BlockClosure>>ifCurtailed: >>>> 23 SubscriptionRegistry>>deliver:to:startingAt: >>>> 24 SubscriptionRegistry>>deliver:to: >>>> 25 SubscriptionRegistry>>deliver: >>>> 26 SystemAnnouncer(Announcer)>>announce: >>>> 27 SystemAnnouncer>>basicAnnounce: >>>> 28 SystemAnnouncer>>announce: >>>> 29 SystemAnnouncer>>trigger: >>>> 30 SystemAnnouncer>>classRemoved:fromCategory: >>>> 31 SystemDictionary>>forgetClass:logged: >>>> 32 ClassRenameFixTest class(Class)>>removeFromSystem: >>>> 33 ClassRenameFixTest class(Class)>>removeFromSystem >>>> 34 [SystemChangeNotifier uniqueInstance noMoreNotificationsFor: class. >>>> SystemAnnouncer unsubscribe: class. >>>> class isTrait >>>> ifFalse: [(class class includesSelector: #unload) >>>> ifTrue: [class removeSelector: #unload]]. >>>> class removeFromSystem] in [:className | >>>> | class | >>>> class := Smalltalk globals classOrTraitNamed: className. >>>> class allSubclasses >>>> ifEmpty: [SystemChangeNotifier uniqueInstance >>>> noMoreNotificationsFor: class. >>>> SystemAnnouncer unsubscribe: class. >>>> class isTrait >>>> ifFalse: [(class class includesSelector: >>>> #unload) >>>> ifTrue: [class >>>> removeSelector: #unload]]. >>>> class removeFromSystem]] in >>>> SystemNavigation>>removeAllButPackages: >>>> 35 OrderedCollection(Collection)>>ifEmpty: >>>> 36 [:className | >>>> | class | >>>> class := Smalltalk globals classOrTraitNamed: className. >>>> class allSubclasses >>>> ifEmpty: [SystemChangeNotifier uniqueInstance >>>> noMoreNotificationsFor: class. >>>> SystemAnnouncer unsubscribe: class. >>>> class isTrait >>>> ifFalse: [(class class includesSelector: >>>> #unload) >>>> ifTrue: [class >>>> removeSelector: #unload]]. >>>> class removeFromSystem]] in >>>> SystemNavigation>>removeAllButPackages: >>>> 37 SortedCollection(OrderedCollection)>>do: >>>> 38 SystemNavigation>>removeAllButPackages: >>>> 39 [| packages | >>>> 10 >>>> timesRepeat: [(Delay forMilliseconds: 100) wait. >>>> Processor yield]. >>>> Author fullName: 'Mr.Shrinker'. >>>> self privCleanMonticello. >>>> UIManager default: DummyUIManager new. >>>> UIManager default progressBarEnabled: false. >>>> self privCleanProcesses. >>>> self privCleanGlobals. >>>> 5 >>>> timesRepeat: [Smalltalk garbageCollect]. >>>> MCDataStream initialize. >>>> Beeper instVarNamed: #default put: nil. >>>> Smalltalk cleanOutUndeclared. >>>> 5 >>>> timesRepeat: [Smalltalk garbageCollect]. >>>> Author reset. >>>> KMPragmaKeymapBuilder release. >>>> self privShrinkUnicodeTables. >>>> Display newDepth: 1. >>>> self privCleanStartUpList. >>>> self privCleanShutDownList. >>>> Object >>>> subclass: #Model >>>> instanceVariableNames: 'dependents' >>>> classVariableNames: '' >>>> poolDictionaries: '' >>>> category: 'Kernel-Objects'. >>>> self privCleanTextConstants. >>>> SoundService default: nil. >>>> SoundService unregister: DummySoundSystem. >>>> ThreadSafeTranscript install. >>>> self privCleanUnloadMethods. >>>> SystemNavigation new removeAllButPackages: self >>>> kernelPackageNames. >>>> Smalltalk flushClassNameCache. >>>> 3 >>>> timesRepeat: [Smalltalk garbageCollect. >>>> Symbol compactSymbolTable]. >>>> Undeclared removeUnreferencedKeys. >>>> self privRecompileAll. >>>> self privCleanChangeSets. >>>> SystemEventManager allInstances >>>> do: [:i | i instVarNamed: #actionMap put: >>>> IdentityDictionary new]. >>>> FileServices removeObsolete. >>>> DebuggerMethodMap voidMapCache. >>>> Object flushEvents. >>>> MCDataStream initialize. >>>> Locale classPool at: #LocaleChangeListeners put: nil. >>>> SmalltalkImage classPool at: #Tools put: nil. >>>> Behavior flushObsoleteSubclasses. >>>> Smalltalk flushClassNameCache. >>>> Smalltalk organization removeEmptyCategories. >>>> WeakArray restartFinalizationProcess. >>>> Smalltalk saveImageInNewContext] in >>>> SmalltalkImage>>privShrinkingProcess >>>> 40 BlockClosure>>on:do: >>>> 41 BlockClosure>>ifError: >>>> 42 SmalltalkImage>>privShrinkingProcess >>>> 43 [self privShrinkingProcess] in SmalltalkImage>>shrinkToKernel >>>> 44 [self value. >>>> Processor terminateActive] in BlockClosure>>newProcess >>>> >>> >> >

July 29, 2012

Re: [Pharo-project] dirty package

by Sean P. DeNigris

Sean P. DeNigris wrote > > The magic invocation of URLTrigger configuration was: > * Inspect URL content > * Monitor a change of the content > I forgot to mention to also specify a cron-style frequency. Here (on Nabble) is a screenshot of a valid/working trigger configuration... http://forum.world.st/file/n4642069/Screen_Shot_2012-07-29_at_11.05.04_AM.p… Cheers, Sean -- View this message in context: http://forum.world.st/dirty-package-tp4641144p4642069.html Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

July 29, 2012

Re: [Pharo-project] dirty package

by Sean P. DeNigris

Marcus Denker-4 wrote > > we really need to get jenkins again to automatically update. > The build triggers should be working again (okay with a test url). I updated the configs for 1.4 and 2.0. The magic invocation of URLTrigger configuration was: * Inspect URL content * Monitor a change of the content I couldn't get it to work with any other combination except only and exactly those two. Whoever integrates the next update, please give Jenkins a minute or two to trigger before you build manually and let me know if everything was okay. Cheers, Sean -- View this message in context: http://forum.world.st/dirty-package-tp4641144p4642060.html Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

July 29, 2012

Re: [Pharo-project] [ENH]: Test Failure Browser

by Sean P. DeNigris

Mariano Martinez Peck wrote > > if you think this is useful It all sounds great; go for it! -- View this message in context: http://forum.world.st/ENH-Test-Failure-Browser-tp4641525p4642057.html Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

July 29, 2012

Re: [Pharo-project] [update 2.0] #20236

by Pavel Krivanek

Sorry, this was not an issue in the Announcements but in a wrong automatic line break in the shrinking script. Pharo Kernel 2.0 job is green now. -- Pavel On Sun, Jul 29, 2012 at 12:45 PM, Guillermo Polito <guillermopolito(a)gmail.com> wrote: > > > On Sun, Jul 29, 2012 at 12:34 AM, camille teruel <camille.teruel(a)gmail.com> > wrote: >> >> Yes there is still mess in ChangesLog>>logEvent: . I'll clean up this >> tomorrow. By the way, does somone knows why ChangesLog only logs classes and >> methods deletion and nothing more? >> > > But the mess is consistent :/. If I evaluate in a workspace: > > (RemovedEvent class: SystemChangeNotifier category: 'aCategoryName') > asAnnouncement event > > It yields to the event and not to nil.... So there is another problem in the > shrinking maybe... > >> >> >> 2012/7/28 Pavel Krivanek <pavel.krivanek(a)gmail.com> >>> >>> On Fri, Jul 27, 2012 at 9:18 PM, Esteban Lorenzano <estebanlm(a)gmail.com> >>> wrote: >>> > 20236 >>> > ----- >>> > >>> > Issue 6467: Remove SystemChangeNotifier 2 - All events using >>> > SystemAnnouncer >>> > http://code.google.com/p/pharo/issues/detail?id=6467 >>> > >>> > the beast is not dead yet... but almost :) >>> > >>> >>> Hi Esteban, >>> >>> the shrinking to the Pharo Kernel now fails with this error: >>> >>> PharoKernel shrinking report >>> Error: >>> MessageNotUnderstood: receiver of "isRemoved" is nil >>> 441 [:e | >>> | rep | >>> rep := FileStream forceNewFileNamed: 'PharoDebug.log'. >>> rep nextPutAll: 'PharoKernel shrinking report'; >>> cr. >>> rep nextPutAll: 'Error:'; >>> cr. >>> rep nextPutAll: e asString; >>> cr. >>> rep nextPutAll: thisContext stack size asString. >>> thisContext stack copy >>> withIndexDo: [:stck :i | [rep nextPutAll: i asString; >>> space; >>> nextPutAll: stck asString; >>> cr] >>> ifError: []]. >>> rep close. >>> Smalltalk exitFailure] in SmalltalkImage>>privShrinkingProcess >>> 2 BlockClosure>>cull: >>> 3 BlockClosure>>cull:cull: >>> 4 [:ex | errorHandlerBlock cull: ex description cull: ex receiver] in >>> BlockClosure>>ifError: >>> 5 BlockClosure>>cull: >>> 6 [(self tempAt: 2) >>> cull: exception] in >>> MethodContext(ContextPart)>>handleSignal: >>> 7 BlockClosure>>ensure: >>> 8 MethodContext(ContextPart)>>handleSignal: >>> 9 MethodContext(ContextPart)>>handleSignal: >>> 10 MessageNotUnderstood(Exception)>>signal >>> 11 UndefinedObject(Object)>>doesNotUnderstand: #isRemoved >>> 12 ChangesLog>>logEvent: >>> 13 ChangesLog>>logAnnouncement: >>> 14 MessageSend>>value: >>> 15 MessageSend>>cull: >>> 16 MessageSend>>cull:cull: >>> 17 [action cull: anAnnouncement cull: announcer] in >>> AnnouncementSubscription>>deliver: >>> 18 BlockClosure>>on:do: >>> 19 BlockClosure>>on:fork: >>> 20 AnnouncementSubscription>>deliver: >>> 21 [subscription deliver: anAnnouncement] in >>> SubscriptionRegistry>>deliver:to:startingAt: >>> 22 BlockClosure>>ifCurtailed: >>> 23 SubscriptionRegistry>>deliver:to:startingAt: >>> 24 SubscriptionRegistry>>deliver:to: >>> 25 SubscriptionRegistry>>deliver: >>> 26 SystemAnnouncer(Announcer)>>announce: >>> 27 SystemAnnouncer>>basicAnnounce: >>> 28 SystemAnnouncer>>announce: >>> 29 SystemAnnouncer>>trigger: >>> 30 SystemAnnouncer>>classRemoved:fromCategory: >>> 31 SystemDictionary>>forgetClass:logged: >>> 32 ClassRenameFixTest class(Class)>>removeFromSystem: >>> 33 ClassRenameFixTest class(Class)>>removeFromSystem >>> 34 [SystemChangeNotifier uniqueInstance noMoreNotificationsFor: class. >>> SystemAnnouncer unsubscribe: class. >>> class isTrait >>> ifFalse: [(class class includesSelector: #unload) >>> ifTrue: [class removeSelector: #unload]]. >>> class removeFromSystem] in [:className | >>> | class | >>> class := Smalltalk globals classOrTraitNamed: className. >>> class allSubclasses >>> ifEmpty: [SystemChangeNotifier uniqueInstance >>> noMoreNotificationsFor: class. >>> SystemAnnouncer unsubscribe: class. >>> class isTrait >>> ifFalse: [(class class includesSelector: >>> #unload) >>> ifTrue: [class >>> removeSelector: #unload]]. >>> class removeFromSystem]] in >>> SystemNavigation>>removeAllButPackages: >>> 35 OrderedCollection(Collection)>>ifEmpty: >>> 36 [:className | >>> | class | >>> class := Smalltalk globals classOrTraitNamed: className. >>> class allSubclasses >>> ifEmpty: [SystemChangeNotifier uniqueInstance >>> noMoreNotificationsFor: class. >>> SystemAnnouncer unsubscribe: class. >>> class isTrait >>> ifFalse: [(class class includesSelector: >>> #unload) >>> ifTrue: [class >>> removeSelector: #unload]]. >>> class removeFromSystem]] in >>> SystemNavigation>>removeAllButPackages: >>> 37 SortedCollection(OrderedCollection)>>do: >>> 38 SystemNavigation>>removeAllButPackages: >>> 39 [| packages | >>> 10 >>> timesRepeat: [(Delay forMilliseconds: 100) wait. >>> Processor yield]. >>> Author fullName: 'Mr.Shrinker'. >>> self privCleanMonticello. >>> UIManager default: DummyUIManager new. >>> UIManager default progressBarEnabled: false. >>> self privCleanProcesses. >>> self privCleanGlobals. >>> 5 >>> timesRepeat: [Smalltalk garbageCollect]. >>> MCDataStream initialize. >>> Beeper instVarNamed: #default put: nil. >>> Smalltalk cleanOutUndeclared. >>> 5 >>> timesRepeat: [Smalltalk garbageCollect]. >>> Author reset. >>> KMPragmaKeymapBuilder release. >>> self privShrinkUnicodeTables. >>> Display newDepth: 1. >>> self privCleanStartUpList. >>> self privCleanShutDownList. >>> Object >>> subclass: #Model >>> instanceVariableNames: 'dependents' >>> classVariableNames: '' >>> poolDictionaries: '' >>> category: 'Kernel-Objects'. >>> self privCleanTextConstants. >>> SoundService default: nil. >>> SoundService unregister: DummySoundSystem. >>> ThreadSafeTranscript install. >>> self privCleanUnloadMethods. >>> SystemNavigation new removeAllButPackages: self >>> kernelPackageNames. >>> Smalltalk flushClassNameCache. >>> 3 >>> timesRepeat: [Smalltalk garbageCollect. >>> Symbol compactSymbolTable]. >>> Undeclared removeUnreferencedKeys. >>> self privRecompileAll. >>> self privCleanChangeSets. >>> SystemEventManager allInstances >>> do: [:i | i instVarNamed: #actionMap put: >>> IdentityDictionary new]. >>> FileServices removeObsolete. >>> DebuggerMethodMap voidMapCache. >>> Object flushEvents. >>> MCDataStream initialize. >>> Locale classPool at: #LocaleChangeListeners put: nil. >>> SmalltalkImage classPool at: #Tools put: nil. >>> Behavior flushObsoleteSubclasses. >>> Smalltalk flushClassNameCache. >>> Smalltalk organization removeEmptyCategories. >>> WeakArray restartFinalizationProcess. >>> Smalltalk saveImageInNewContext] in >>> SmalltalkImage>>privShrinkingProcess >>> 40 BlockClosure>>on:do: >>> 41 BlockClosure>>ifError: >>> 42 SmalltalkImage>>privShrinkingProcess >>> 43 [self privShrinkingProcess] in SmalltalkImage>>shrinkToKernel >>> 44 [self value. >>> Processor terminateActive] in BlockClosure>>newProcess >>> >> >

July 29, 2012

Re: [Pharo-project] could it be possible to have a setting to get the old shortcut for

by Benjamin

Why not :) Ben On Jul 29, 2012, at 12:11 PM, StÃ©phane Ducasse wrote: > so may be a goo trick would be to add > cmd b cmd u for users (since r is taken by reference) > > Stef > > On Jul 29, 2012, at 10:06 AM, StÃ©phane Ducasse wrote: > >> yes but with cmd+B in front this much more painful >> >> On Jul 28, 2012, at 10:28 PM, Benjamin wrote: >> >>> It always has been cmd+shift+N :) >>> >>> Ben >>> >>> On Jul 28, 2012, at 10:26 PM, StÃ©phane Ducasse wrote: >>> >>>> Thanks. >>>> Now b, N in the menu item is not clear >>>> Then this is one of the most frequent query with implementor and senders and now it is quite difficult to do. >>>> especially the Cmd + shift >>>> I really think that we should change it. >>>> >>>> >>>> On Jul 28, 2012, at 10:02 PM, Benjamin wrote: >>>> >>>>> That's why there is a tool in Nautilus which shows all the shortcuts and their description >>>>> >>>>> <Screen shot 2012-07-28 at 9.59.45 PM.png> >>>>> >>>>> >>>>> We shouldn't forgot either that not changing stuff just because are used to it is not a valid argument >>>>> >>>>> Ben >>>>> >>>>> >>>>> >>>>> On Jul 28, 2012, at 9:39 PM, StÃ©phane Ducasse wrote: >>>>> >>>>>> implementor, sender, users? >>>>>> >>>>>> Because I spent 10 minutes and I still cannot find how I get all the references to a class :( >>>>>> >>>>>> I'm I know I'm old and stupid but we should not forget that what makes the success of pharo is happy users. >>>>>> >>>>>> Stef >>>>> >>>> >>>> >>> >>> >> >> > >

July 29, 2012

Re: [Pharo-project] [update 2.0] #20236

by Guillermo Polito

On Sun, Jul 29, 2012 at 12:34 AM, camille teruel <camille.teruel(a)gmail.com>wrote: > Yes there is still mess in ChangesLog>>logEvent: . I'll clean up this > tomorrow. By the way, does somone knows why ChangesLog only logs classes > and methods deletion and nothing more? > > But the mess is consistent :/. If I evaluate in a workspace: (RemovedEvent class: SystemChangeNotifier category: 'aCategoryName') asAnnouncement event It yields to the event and not to nil.... So there is another problem in the shrinking maybe... > > 2012/7/28 Pavel Krivanek <pavel.krivanek(a)gmail.com> > >> On Fri, Jul 27, 2012 at 9:18 PM, Esteban Lorenzano <estebanlm(a)gmail.com> >> wrote: >> > 20236 >> > ----- >> > >> > Issue 6467: Remove SystemChangeNotifier 2 - All events using >> SystemAnnouncer >> > http://code.google.com/p/pharo/issues/detail?id=6467 >> > >> > the beast is not dead yet... but almost :) >> > >> >> Hi Esteban, >> >> the shrinking to the Pharo Kernel now fails with this error: >> >> PharoKernel shrinking report >> Error: >> MessageNotUnderstood: receiver of "isRemoved" is nil >> 441 [:e | >> | rep | >> rep := FileStream forceNewFileNamed: 'PharoDebug.log'. >> rep nextPutAll: 'PharoKernel shrinking report'; >> cr. >> rep nextPutAll: 'Error:'; >> cr. >> rep nextPutAll: e asString; >> cr. >> rep nextPutAll: thisContext stack size asString. >> thisContext stack copy >> withIndexDo: [:stck :i | [rep nextPutAll: i asString; >> space; >> nextPutAll: stck asString; >> cr] >> ifError: []]. >> rep close. >> Smalltalk exitFailure] in SmalltalkImage>>privShrinkingProcess >> 2 BlockClosure>>cull: >> 3 BlockClosure>>cull:cull: >> 4 [:ex | errorHandlerBlock cull: ex description cull: ex receiver] in >> BlockClosure>>ifError: >> 5 BlockClosure>>cull: >> 6 [(self tempAt: 2) >> cull: exception] in >> MethodContext(ContextPart)>>handleSignal: >> 7 BlockClosure>>ensure: >> 8 MethodContext(ContextPart)>>handleSignal: >> 9 MethodContext(ContextPart)>>handleSignal: >> 10 MessageNotUnderstood(Exception)>>signal >> 11 UndefinedObject(Object)>>doesNotUnderstand: #isRemoved >> 12 ChangesLog>>logEvent: >> 13 ChangesLog>>logAnnouncement: >> 14 MessageSend>>value: >> 15 MessageSend>>cull: >> 16 MessageSend>>cull:cull: >> 17 [action cull: anAnnouncement cull: announcer] in >> AnnouncementSubscription>>deliver: >> 18 BlockClosure>>on:do: >> 19 BlockClosure>>on:fork: >> 20 AnnouncementSubscription>>deliver: >> 21 [subscription deliver: anAnnouncement] in >> SubscriptionRegistry>>deliver:to:startingAt: >> 22 BlockClosure>>ifCurtailed: >> 23 SubscriptionRegistry>>deliver:to:startingAt: >> 24 SubscriptionRegistry>>deliver:to: >> 25 SubscriptionRegistry>>deliver: >> 26 SystemAnnouncer(Announcer)>>announce: >> 27 SystemAnnouncer>>basicAnnounce: >> 28 SystemAnnouncer>>announce: >> 29 SystemAnnouncer>>trigger: >> 30 SystemAnnouncer>>classRemoved:fromCategory: >> 31 SystemDictionary>>forgetClass:logged: >> 32 ClassRenameFixTest class(Class)>>removeFromSystem: >> 33 ClassRenameFixTest class(Class)>>removeFromSystem >> 34 [SystemChangeNotifier uniqueInstance noMoreNotificationsFor: class. >> SystemAnnouncer unsubscribe: class. >> class isTrait >> ifFalse: [(class class includesSelector: #unload) >> ifTrue: [class removeSelector: #unload]]. >> class removeFromSystem] in [:className | >> | class | >> class := Smalltalk globals classOrTraitNamed: className. >> class allSubclasses >> ifEmpty: [SystemChangeNotifier uniqueInstance >> noMoreNotificationsFor: class. >> SystemAnnouncer unsubscribe: class. >> class isTrait >> ifFalse: [(class class includesSelector: >> #unload) >> ifTrue: [class >> removeSelector: #unload]]. >> class removeFromSystem]] in >> SystemNavigation>>removeAllButPackages: >> 35 OrderedCollection(Collection)>>ifEmpty: >> 36 [:className | >> | class | >> class := Smalltalk globals classOrTraitNamed: className. >> class allSubclasses >> ifEmpty: [SystemChangeNotifier uniqueInstance >> noMoreNotificationsFor: class. >> SystemAnnouncer unsubscribe: class. >> class isTrait >> ifFalse: [(class class includesSelector: >> #unload) >> ifTrue: [class >> removeSelector: #unload]]. >> class removeFromSystem]] in >> SystemNavigation>>removeAllButPackages: >> 37 SortedCollection(OrderedCollection)>>do: >> 38 SystemNavigation>>removeAllButPackages: >> 39 [| packages | >> 10 >> timesRepeat: [(Delay forMilliseconds: 100) wait. >> Processor yield]. >> Author fullName: 'Mr.Shrinker'. >> self privCleanMonticello. >> UIManager default: DummyUIManager new. >> UIManager default progressBarEnabled: false. >> self privCleanProcesses. >> self privCleanGlobals. >> 5 >> timesRepeat: [Smalltalk garbageCollect]. >> MCDataStream initialize. >> Beeper instVarNamed: #default put: nil. >> Smalltalk cleanOutUndeclared. >> 5 >> timesRepeat: [Smalltalk garbageCollect]. >> Author reset. >> KMPragmaKeymapBuilder release. >> self privShrinkUnicodeTables. >> Display newDepth: 1. >> self privCleanStartUpList. >> self privCleanShutDownList. >> Object >> subclass: #Model >> instanceVariableNames: 'dependents' >> classVariableNames: '' >> poolDictionaries: '' >> category: 'Kernel-Objects'. >> self privCleanTextConstants. >> SoundService default: nil. >> SoundService unregister: DummySoundSystem. >> ThreadSafeTranscript install. >> self privCleanUnloadMethods. >> SystemNavigation new removeAllButPackages: self >> kernelPackageNames. >> Smalltalk flushClassNameCache. >> 3 >> timesRepeat: [Smalltalk garbageCollect. >> Symbol compactSymbolTable]. >> Undeclared removeUnreferencedKeys. >> self privRecompileAll. >> self privCleanChangeSets. >> SystemEventManager allInstances >> do: [:i | i instVarNamed: #actionMap put: >> IdentityDictionary new]. >> FileServices removeObsolete. >> DebuggerMethodMap voidMapCache. >> Object flushEvents. >> MCDataStream initialize. >> Locale classPool at: #LocaleChangeListeners put: nil. >> SmalltalkImage classPool at: #Tools put: nil. >> Behavior flushObsoleteSubclasses. >> Smalltalk flushClassNameCache. >> Smalltalk organization removeEmptyCategories. >> WeakArray restartFinalizationProcess. >> Smalltalk saveImageInNewContext] in >> SmalltalkImage>>privShrinkingProcess >> 40 BlockClosure>>on:do: >> 41 BlockClosure>>ifError: >> 42 SmalltalkImage>>privShrinkingProcess >> 43 [self privShrinkingProcess] in SmalltalkImage>>shrinkToKernel >> 44 [self value. >> Processor terminateActive] in BlockClosure>>newProcess >> >> >

July 29, 2012