Packages October 2009

packages@lists.squeakfoundation.org

1 participants
150 discussions

The Trunk: Kernel-nice.286.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

Nicolas Cellier uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-nice.286.mcz ==================== Summary ==================== Name: Kernel-nice.286 Author: nice Time: 31 October 2009, 11:49:19 am UUID: 8990ba20-7244-49e7-b79e-12e397b4a962 Ancestors: Kernel-nice.285 My last fix conflicted with http://bugs.squeak.org/view.php?id=6695 Float storeStringBase: does not store the radix Merge the two fixes =============== Diff against Kernel-nice.285 =============== Item was changed: ----- Method: Float>>storeOn:base: (in category 'printing') ----- storeOn: aStream base: base "Print the Number exactly so it can be interpreted back unchanged" self isFinite + ifTrue: [self sign = -1 ifTrue: [aStream nextPutAll: '-']. + base = 10 ifFalse: [aStream print: base; nextPut: $r]. + self = 0.0 + ifTrue: [aStream nextPutAll: '0.0'] + ifFalse: [self abs absPrintExactlyOn: aStream base: base]] - ifTrue: [self > 0 - ifTrue: [self absPrintExactlyOn: aStream base: base] - ifFalse: [self sign = -1 - ifTrue: [aStream nextPutAll: '-']. - self = 0.0 - ifTrue: [aStream nextPutAll: '0.0'] - ifFalse: [self negated absPrintExactlyOn: aStream base: base]]] ifFalse: [self isNaN ifTrue: [aStream nextPutAll: 'Float nan'] ifFalse: [self > 0.0 ifTrue: [aStream nextPutAll: 'Float infinity'] ifFalse: [aStream nextPutAll: 'Float infinity negated']]]!

1 0

The Trunk: Kernel-nice.286.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

1 0

The Trunk: Kernel-nice.286.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

1 0

The Trunk: Morphic-ar.221.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

Andreas Raab uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-ar.221.mcz ==================== Summary ==================== Name: Morphic-ar.221 Author: ar Time: 31 October 2009, 1:49:25 am UUID: 76bd9f2c-a50d-3b4d-9f34-5e02e3a9a6ef Ancestors: Morphic-ar.220, Morphic-dtl.220 Merging Morphic-dtl.220: Add #defaultBackgroundColor (moved from Project to MorphicProject). Move #initMorphic and #InstallPasteUpAsWorld: from Project. Flag #initMorphic for removal (but check if Etoys uses it). =============== Diff against Morphic-ar.220 =============== Item was added: + ----- Method: MorphicProject>>initMorphic (in category 'initialize') ----- + initMorphic + "Written so that Morphic can still be removed. Note that #initialize is never actually called for a morphic project -- see the senders of this method." + + self flag: #toRemove. "check if this method still used by Etoys" + Smalltalk verifyMorphicAvailability ifFalse: [^ nil]. + changeSet := ChangeSet new. + transcript := TranscriptStream new. + displayDepth := Display depth. + parentProject := CurrentProject. + isolatedHead := false. + world := PasteUpMorph newWorldForProject: self. + Locale switchToID: CurrentProject localeID. + self initializeProjectPreferences. "Do this *after* a world is installed so that the project will be recognized as a morphic one." + Preferences useVectorVocabulary ifTrue: [world installVectorVocabulary]! Item was added: + ----- Method: MorphicProject>>defaultBackgroundColor (in category 'initialize') ----- + defaultBackgroundColor + ^ Preferences defaultWorldColor! Item was added: + ----- Method: MorphicProject>>installPasteUpAsWorld: (in category 'initialize') ----- + installPasteUpAsWorld: pasteUpMorph + "(ProjectViewMorph newMorphicProjectOn: aPasteUpMorph) openInWorld." + + world := pasteUpMorph beWorldForProject: self!

1 0

The Trunk: Morphic-ar.221.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

1 0

The Trunk: Morphic-ar.221.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

1 0

The Trunk: System-dtl.161.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

David T. Lewis uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-dtl.161.mcz ==================== Summary ==================== Name: System-dtl.161 Author: dtl Time: 31 October 2009, 4:11:28 am UUID: b2ac36a5-cfa1-47d7-b4fb-d87231823876 Ancestors: System-dtl.160 Move 5 methods from Project (initialization category) to MVCProject and MorphicProject. =============== Diff against System-dtl.160 =============== Item was changed: ----- Method: Project>>defaultBackgroundColor (in category 'initialization') ----- defaultBackgroundColor + ^ self subclassResponsibility! - ^ self isMorphic - ifTrue: [self backgroundColorForMorphicProject] - ifFalse: [self backgroundColorForMvcProject]! Item was removed: - ----- Method: Project>>installPasteUpAsWorld: (in category 'initialization') ----- - installPasteUpAsWorld: pasteUpMorph - "(ProjectViewMorph newMorphicProjectOn: aPasteUpMorph) openInWorld." - - world := pasteUpMorph beWorldForProject: self! Item was removed: - ----- Method: Project>>initMorphic (in category 'initialization') ----- - initMorphic - "Written so that Morphic can still be removed. Note that #initialize is never actually called for a morphic project -- see the senders of this method." - - Smalltalk verifyMorphicAvailability ifFalse: [^ nil]. - changeSet := ChangeSet new. - transcript := TranscriptStream new. - displayDepth := Display depth. - parentProject := CurrentProject. - isolatedHead := false. - world := PasteUpMorph newWorldForProject: self. - Locale switchToID: CurrentProject localeID. - self initializeProjectPreferences. "Do this *after* a world is installed so that the project will be recognized as a morphic one." - Preferences useVectorVocabulary ifTrue: [world installVectorVocabulary]! Item was removed: - ----- Method: Project>>backgroundColorForMorphicProject (in category 'initialization') ----- - backgroundColorForMorphicProject - ^ Preferences defaultWorldColor! Item was removed: - ----- Method: Project>>backgroundColorForMvcProject (in category 'initialization') ----- - backgroundColorForMvcProject - ^ Color r: 1.0 g: 1.0 b: 0.065!

1 0

The Trunk: System-dtl.161.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

1 0

The Trunk: System-dtl.161.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

1 0

The Trunk: Nebraska-ar.22.mcz
by commits＠source.squeak.org 31 Oct '09

31 Oct '09

Andreas Raab uploaded a new version of Nebraska to project The Trunk: http://source.squeak.org/trunk/Nebraska-ar.22.mcz ==================== Summary ==================== Name: Nebraska-ar.22 Author: ar Time: 31 October 2009, 1:10:28 am UUID: cc21cf2c-b7ac-d948-ab7e-b8e856347873 Ancestors: Nebraska-ul.21 Companion change to Morphic-ar.220: Check all morphs of the world to be shared whether it's safe to serve them or not. =============== Diff against Nebraska-ul.21 =============== Item was changed: ----- Method: NebraskaServerMorph class>>serveWorld: (in category 'as yet unclassified') ----- serveWorld: aWorld "Check to make sure things won't crash. See Mantis #0000519" + aWorld allMorphsDo:[:m| + m isSafeToServe ifFalse:[ + ^self inform: 'Can not share world if a ', m class, ' is present. Close the mprph and try again']]. + ^self serveWorld: aWorld onPort: NebraskaServer defaultPort! - aWorld isSafeToServe ifTrue:[ - ^self serveWorld: aWorld onPort: NebraskaServer defaultPort] - !

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 October 2009