Packages June 2013

packages@lists.squeakfoundation.org

1 participants
276 discussions

The Trunk: System-fbs.555.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

Frank Shearar uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-fbs.555.mcz ==================== Summary ==================== Name: System-fbs.555 Author: fbs Time: 30 June 2013, 11:11:36.602 am UUID: b0c9ac36-e757-e34b-b569-37a32412ce51 Ancestors: System-fbs.554 More consolidation of the "System-Object Events" pieces. Note the removal of indirection through Object class >> #flushEvents. At some point we might want to deprecate this method because it doesn't do anything useful. =============== Diff against System-fbs.554 =============== Item was changed: ----- Method: EventManager class>>flushEvents (in category 'initialize-release') ----- flushEvents + "EventManager flushEvents" - "Object flushEvents" self actionMaps keysAndValuesDo:[:rcvr :evtDict| rcvr ifNotNil:[ "make sure we don't modify evtDict while enumerating" evtDict keys do:[:evtName| | msgSet | msgSet := evtDict at: evtName ifAbsent:[nil]. (msgSet == nil) ifTrue:[rcvr removeActionsForEvent: evtName]]]]. EventManager actionMaps finalizeValues. ! Item was added: + ----- Method: Object class>>flushEvents (in category '*System-Object Events-class initialization') ----- + flushEvents + "Object flushEvents" + + EventManager flushEvents. ! Item was changed: ----- Method: SmalltalkImage>>garbageCollect (in category 'memory space') ----- garbageCollect "Primitive. Reclaims all garbage and answers the number of bytes of available space." Object flushDependents. + EventManager flushEvents. - Object flushEvents. ^self primitiveGarbageCollect! Item was changed: ----- Method: SmalltalkImage>>snapshot:andQuit:embedded: (in category 'snapshot and quit') ----- snapshot: save andQuit: quit embedded: embeddedFlag "Mark the changes file and close all files as part of #processShutdownList. If save is true, save the current state of this Smalltalk in the image file. If quit is true, then exit to the outer OS shell. The latter part of this method runs when resuming a previously saved image. This resume logic checks for a document file to process when starting up." | resuming msg | Object flushDependents. + EventManager flushEvents. - Object flushEvents. (SourceFiles at: 2) ifNotNil:[ msg := String streamContents: [ :s | s nextPutAll: '----'; nextPutAll: (save ifTrue: [ quit ifTrue: [ 'QUIT' ] ifFalse: [ 'SNAPSHOT' ] ] ifFalse: [quit ifTrue: [ 'QUIT/NOSAVE' ] ifFalse: [ 'NOP' ]]); nextPutAll: '----'; print: Date dateAndTimeNow; space; nextPutAll: (FileDirectory default localNameFor: self imageName); nextPutAll: ' priorSource: '; print: LastQuitLogPosition ]. self assureStartupStampLogged. save ifTrue: [ LastQuitLogPosition := (SourceFiles at: 2) setToEnd; position ]. self logChange: msg. Transcript cr; show: msg ]. Smalltalk processShutDownList: quit. Cursor write show. save ifTrue: [resuming := embeddedFlag ifTrue: [self snapshotEmbeddedPrimitive] ifFalse: [self snapshotPrimitive]. "<-- PC frozen here on image file" resuming == false "guard against failure" ifTrue: ["Time to reclaim segment files is immediately after a save" Smalltalk at: #ImageSegment ifPresent: [:theClass | theClass reclaimObsoleteSegmentFiles]]] ifFalse: [resuming := false]. quit & (resuming == false) ifTrue: [self quitPrimitive]. Cursor normal show. Smalltalk setGCParameters. resuming == true ifTrue: [Smalltalk clearExternalObjects]. Smalltalk processStartUpList: resuming == true. resuming == true ifTrue:[ self setPlatformPreferences. self recordStartupStamp]. Project current wakeUpTopWindow. "Now it's time to raise an error" resuming == nil ifTrue: [self error:'Failed to write image file (disk full?)']. ^ resuming!

1 0

The Trunk: System-fbs.554.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

Frank Shearar uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-fbs.554.mcz ==================== Summary ==================== Name: System-fbs.554 Author: fbs Time: 29 June 2013, 11:19:45.934 pm UUID: ba7e24d3-e69a-ad47-b349-4b380a17519e Ancestors: System-fbs.553 * #traitComposition and friends aren't Kernel methods, they're means of dealing with changes in traits. * #printOn: belongs to ModifiedClassDefinitionEvent's package, not Kernel. =============== Diff against System-fbs.553 =============== Item was added: + ----- Method: ModifiedClassDefinitionEvent>>anyChanges (in category 'change logging') ----- + anyChanges + ^ self isSuperclassModified or: [self areInstVarsModified or: [self areClassVarsModified or: [self areSharedPoolsModified or: [self isTraitCompositionModified]]]]! Item was added: + ----- Method: ModifiedClassDefinitionEvent>>isTraitCompositionModified (in category 'trait composition') ----- + isTraitCompositionModified + ^self traitComposition printString ~= self oldTraitComposition printString! Item was added: + ----- Method: ModifiedClassDefinitionEvent>>oldTraitComposition (in category 'trait composition') ----- + oldTraitComposition + ^ oldItem traitComposition! Item was added: + ----- Method: ModifiedClassDefinitionEvent>>printOn: (in category 'printing') ----- + printOn: aStream + super printOn: aStream. + aStream + nextPutAll: ' Super: '; + print: self isSuperclassModified; + nextPutAll: ' TraitComposition: '; + print: self isTraitCompositionModified; + nextPutAll: ' InstVars: '; + print: self areInstVarsModified; + nextPutAll: ' ClassVars: '; + print: self areClassVarsModified; + nextPutAll: ' SharedPools: '; + print: self areSharedPoolsModified.! Item was added: + ----- Method: ModifiedClassDefinitionEvent>>traitComposition (in category 'trait composition') ----- + traitComposition + ^ item traitComposition!

1 0

The Trunk: System-fbs.554.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

1 0

The Trunk: System-fbs.554.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

1 0

The Trunk: Kernel-fbs.777.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

Frank Shearar uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-fbs.777.mcz ==================== Summary ==================== Name: Kernel-fbs.777 Author: fbs Time: 29 June 2013, 11:18:55.634 pm UUID: 41439d77-d04a-004c-94e2-68e5385d0915 Ancestors: Kernel-fbs.776 * #traitComposition and friends aren't Kernel methods, they're means of dealing with changes in traits. * #printOn: belongs to ModifiedClassDefinitionEvent's package, not Kernel. =============== Diff against Kernel-fbs.776 =============== Item was removed: - ----- Method: ModifiedClassDefinitionEvent>>anyChanges (in category '*Kernel-Classes') ----- - anyChanges - ^ self isSuperclassModified or: [self areInstVarsModified or: [self areClassVarsModified or: [self areSharedPoolsModified or: [self isTraitCompositionModified]]]]! Item was removed: - ----- Method: ModifiedClassDefinitionEvent>>isTraitCompositionModified (in category '*Kernel-Classes') ----- - isTraitCompositionModified - ^self traitComposition printString ~= self oldTraitComposition printString! Item was removed: - ----- Method: ModifiedClassDefinitionEvent>>oldTraitComposition (in category '*Kernel-Classes') ----- - oldTraitComposition - ^ oldItem traitComposition! Item was removed: - ----- Method: ModifiedClassDefinitionEvent>>printOn: (in category '*Kernel-Classes') ----- - printOn: aStream - super printOn: aStream. - aStream - nextPutAll: ' Super: '; - print: self isSuperclassModified; - nextPutAll: ' TraitComposition: '; - print: self isTraitCompositionModified; - nextPutAll: ' InstVars: '; - print: self areInstVarsModified; - nextPutAll: ' ClassVars: '; - print: self areClassVarsModified; - nextPutAll: ' SharedPools: '; - print: self areSharedPoolsModified.! Item was removed: - ----- Method: ModifiedClassDefinitionEvent>>traitComposition (in category '*Kernel-Classes') ----- - traitComposition - ^ item traitComposition!

1 0

The Trunk: Kernel-fbs.777.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

1 0

The Trunk: Kernel-fbs.777.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

1 0

The Trunk: System-fbs.553.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

Frank Shearar uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-fbs.553.mcz ==================== Summary ==================== Name: System-fbs.553 Author: fbs Time: 29 June 2013, 11:08:56.514 pm UUID: cb5e883b-80ed-6b41-9af2-37ce08368b33 Ancestors: System-fbs.552 System-Support isn't the most natural place for this method, but it's a vast improvement over Kernel. =============== Diff against System-fbs.552 =============== Item was added: + ----- Method: Object>>initialExtent (in category '*System-Support-user interface') ----- + initialExtent + "Answer the desired extent for the receiver when a view on it is first opened on the screen. + 5/22/96 sw: in the absence of any override, obtain from RealEstateAgent" + + ^ RealEstateAgent standardWindowExtent!

1 0

The Trunk: System-fbs.553.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

1 0

The Trunk: System-fbs.553.mcz
by commits＠source.squeak.org 30 Jun '13

30 Jun '13

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages June 2013