Squeak-dev December 2009

squeak-dev@lists.squeakfoundation.org

97 participants
553 discussions

The Trunk: System-dtl.210.mcz
by commits＠source.squeak.org 29 Dec '09

29 Dec '09

David T. Lewis uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-dtl.210.mcz ==================== Summary ==================== Name: System-dtl.210 Author: dtl Time: 28 December 2009, 8:30:32 am UUID: 5168fb07-568b-4740-9ea1-d2735d078dec Ancestors: System-dtl.209 Move #restoreDisplay implementation from ScreenController to Project to eliminate #isMorphic sends. Eliminate #isMorphic from #snapshot:andQuit:embedded: by adding #startUpComplete to Project and MorphicProject. Move #offerMenuFrom:shifted: from StringHolder to Project to eliminate #isMorphic send. =============== Diff against System-dtl.209 =============== Item was added: + ----- Method: Project>>restoreDisplay (in category 'displaying') ----- + restoreDisplay + "Clear the screen to gray and then redisplay all the scheduled views." + + self subclassResponsibility! 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. 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 startUpComplete. - Smalltalk isMorphic ifTrue: [SystemWindow wakeUpTopWindowUponStartup]. "Now it's time to raise an error" resuming == nil ifTrue: [self error:'Failed to write image file (disk full?)']. ^ resuming! Item was added: + ----- Method: Project>>offerMenuFrom:shifted: (in category 'utilities') ----- + offerMenuFrom: menuRetriever shifted: aBoolean + "Pop up a menu whose target is the receiver and whose contents are provided + by sending the menuRetriever to the receiver. The menuRetriever takes two + arguments: a menu, and a boolean representing the shift state." + + self subclassResponsibility! Item was added: + ----- Method: Project>>startUpComplete (in category 'enter') ----- + startUpComplete + "Image has been restarted, and the startUp list has been processed. Perform + any additional actions needed to restart the user interface." + + ^ self!

1 0

The Trunk: ST80-dtl.80.mcz
by commits＠source.squeak.org 29 Dec '09

29 Dec '09

David T. Lewis uploaded a new version of ST80 to project The Trunk: http://source.squeak.org/trunk/ST80-dtl.80.mcz ==================== Summary ==================== Name: ST80-dtl.80 Author: dtl Time: 28 December 2009, 8:29:01 am UUID: 8878a8a3-abe2-441f-b102-a57397d4bc0d Ancestors: ST80-nice.79 Move #restoreDisplay implementation from ScreenController to Project to eliminate #isMorphic sends. Move #offerMenuFrom:shifted: from StringHolder to Project to eliminate #isMorphic send. =============== Diff against ST80-nice.79 =============== Item was changed: ----- Method: ScreenController>>restoreDisplay (in category 'menu messages') ----- restoreDisplay "Clear the screen to gray and then redisplay all the scheduled views." + Project current restoreDisplay + ! - Smalltalk isMorphic ifTrue: [^ World restoreMorphicDisplay]. - - Display extent = DisplayScreen actualScreenSize - ifFalse: - [DisplayScreen startUp. - ScheduledControllers unCacheWindows]. - ScheduledControllers restore! Item was added: + ----- Method: MVCProject>>restoreDisplay (in category 'display') ----- + restoreDisplay + "Clear the screen to gray and then redisplay all the scheduled views." + + Display extent = DisplayScreen actualScreenSize + ifFalse: + [DisplayScreen startUp. + ScheduledControllers unCacheWindows]. + ScheduledControllers restore! Item was added: + ----- Method: MVCProject>>offerMenuFrom:shifted: (in category 'utilities') ----- + offerMenuFrom: menuRetriever shifted: aBoolean + "Pop up a menu whose target is the receiver and whose contents are provided + by sending the menuRetriever to the receiver. The menuRetriever takes two + arguments: a menu, and a boolean representing the shift state." + + | aMenu | + aMenu := CustomMenu new. + self perform: menuRetriever with: aMenu with: aBoolean. + aMenu invokeOn: self!

1 0

The Trunk: Morphic-dtl.278.mcz
by commits＠source.squeak.org 29 Dec '09

29 Dec '09

David T. Lewis uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-dtl.278.mcz ==================== Summary ==================== Name: Morphic-dtl.278 Author: dtl Time: 28 December 2009, 8:27:10 am UUID: d3866b4d-177a-4cc5-86f5-e8f7231cf369 Ancestors: Morphic-dtl.277 Move #restoreDisplay implementation from ScreenController to Project to eliminate #isMorphic sends. Eliminate #isMorphic from #snapshot:andQuit:embedded: by adding #startUpComplete to Project and MorphicProject. Move #offerMenuFrom:shifted: from StringHolder to Project to eliminate #isMorphic send. =============== Diff against Morphic-dtl.277 =============== Item was added: + ----- Method: MorphicProject>>startUpComplete (in category 'enter') ----- + startUpComplete + "Image has been restarted, and the startUp list has been processed. Perform + any additional actions needed to restart the user interface." + + SystemWindow wakeUpTopWindowUponStartup! Item was added: + ----- Method: MorphicProject>>restoreDisplay (in category 'display') ----- + restoreDisplay + "Clear the screen to gray and then redisplay all the scheduled views." + + ^ World restoreMorphicDisplay + ! Item was added: + ----- Method: MorphicProject>>offerMenuFrom:shifted: (in category 'utilities') ----- + offerMenuFrom: menuRetriever shifted: aBoolean + "Pop up a menu whose target is the receiver and whose contents are provided + by sending the menuRetriever to the receiver. The menuRetriever takes two + arguments: a menu, and a boolean representing the shift state." + + | aMenu | + aMenu := MenuMorph new defaultTarget: self. + self perform: menuRetriever with: aMenu with: aBoolean. + aMenu popUpInWorld!

1 0

fromString: default method
by Ralph Boland 29 Dec '09

29 Dec '09

Squeak has half a dozen methods with the name fromString: with the exact same code and I am about to add another for my project. The code is: fromString: aString ^ self readFrom: (ReadStream on: aString) Should not this method be in Object and all classes with the exact same code remove the code and inherit this method instead? Regards, Ralph Boland -- Volume * Density = Mass. Volume / Density = Intelligence. The latter equation explains the essentially equal intelligence of men and woman and the capabilities of some commonly used operating systems.

2 1

Daily Commit Log
by commits＠source.squeak.org 29 Dec '09

29 Dec '09

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2009-December/002203.h… Name: Kernel-ar.348 Ancestors: Kernel-dtl.347 NanoTrait preparations: Vector all traits dependencies through a protocol in ClassDescription so that we can have alternative trait versions be the default. Provide CompiledMethod>>methodHome to ask for the original place a particular method was defined (methodHome == methodClass for all 'normal' methods). Additional guards for Berne trait idiosynchracies (updateOrganizationSelector: etc) that simply do not apply for alternative traits. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002204.h… Name: Monticello-ar.343 Ancestors: Monticello-nice.342 NanoTraits preparations: Vector traits creation through ClassDescription protocol so that we can replace Berne traits. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002205.h… Name: System-ar.206 Ancestors: System-dtl.205 Preparations for NanoTraits: Make sure traits are treated like superclasses when filing out class categories; Smalltalk>>traitNames uses #isTrait instead of isKindOf: Trait and SystemNavigation>>allBehaviorsDo: delegates to ClassDescription to vector through the current traits implementation. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002206.h… Name: Tools-ar.152 Ancestors: Tools-nice.151 NanoTraits preparations: Remove several unnecessary direct dependencies between tools package and traits package. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002207.h… Name: Traits-ar.251 Ancestors: Traits-nice.250 Preparations for NanoTraits: Vector traits creation through ClassDescription. Some utility methods to make interactions between Nano and Berne traits easier. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002208.h… Name: Collections-ul.267 Ancestors: Collections-ar.266 - improved SequenceableCollection >> #shuffledBy: ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002209.h… Name: System-ul.207 Ancestors: System-ar.206 - added TextDiffBuilderTest ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002210.h… Name: System-ul.208 Ancestors: System-ul.207 - new tests and a fix ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002211.h… Name: Kernel-ar.349 Ancestors: Kernel-ar.348 Strange, somehow a class var was dropped during last check-in. Put it back. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002212.h… Name: System-dtl.209 Ancestors: System-ul.208 Remove #isMorphic sends from Rectangle, supported by #pointerMoved in Project and MorphicProject. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002213.h… Name: Morphic-dtl.277 Ancestors: Morphic-nice.276 Remove #isMorphic sends from Rectangle, supported by #pointerMoved in Project and MorphicProject. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2009-December/002214.h… Name: Graphics-dtl.96 Ancestors: Graphics-nice.95 Remove #isMorphic sends from Rectangle, supported by #pointerMoved in Project and MorphicProject. =============================================

1 0

Rectangle swallow:
by Nicolas Cellier 28 Dec '09

28 Dec '09

I put an experimental SLICE in the inbox: let a Rectangle merge in place (I called this swallow:) This has two advantages: - avoid repeated Object creation when we just want the gross result - avoid closures writing to outer temps IMHO, generalizing this kind of policy could have a measurable impact on GUI speed. However, this is against current policy to never change a Point nor rectangle in place, so I let gurus judge if worth or not. cheers Nicolas

5 5

Last update broke browsers...
by Casimiro de Almeida Barreto 28 Dec '09

28 Dec '09

Ok, I started with a fresh image (Squeak3.10.2-Trunk-091128.zip) and updated. Then I reinstalled some packages (FFI, OSProcess, OSProcessIO, CommandShell, Balloon3D) and the problem disapeared. Last image had installed VMMaker, Speech and other packages. I'll try to reinstall everything in order to see where the problem arises).

4 6

The Trunk: Graphics-dtl.96.mcz
by commits＠source.squeak.org 28 Dec '09

28 Dec '09

David T. Lewis uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-dtl.96.mcz ==================== Summary ==================== Name: Graphics-dtl.96 Author: dtl Time: 28 December 2009, 1:59:32 am UUID: 0929fe05-6f03-4429-a5fb-4c0c17f836e7 Ancestors: Graphics-nice.95 Remove #isMorphic sends from Rectangle, supported by #pointerMoved in Project and MorphicProject. =============== Diff against Graphics-nice.95 =============== Item was changed: ----- Method: Rectangle>>newRectFrom: (in category 'transforming') ----- newRectFrom: newRectBlock "Track the outline of a new rectangle until mouse button changes. newFrameBlock produces each new rectangle from the previous" + | rect newRect buttonStart buttonNow delay | - | rect newRect buttonStart buttonNow aHand delay | delay := Delay forMilliseconds: 10. buttonStart := buttonNow := Sensor anyButtonPressed. rect := self. Display border: rect width: 2 rule: Form reverse fillColor: Color gray. [buttonNow == buttonStart] whileTrue: [delay wait. buttonNow := Sensor anyButtonPressed. newRect := newRectBlock value: rect. newRect = rect ifFalse: [Display border: rect width: 2 rule: Form reverse fillColor: Color gray. Display border: newRect width: 2 rule: Form reverse fillColor: Color gray. rect := newRect]]. Display border: rect width: 2 rule: Form reverse fillColor: Color gray. + Project current pointerMoved. - " pay the price for reading the sensor directly ; get this party started " - Smalltalk isMorphic - ifTrue: [aHand := World activeHand. - aHand newMouseFocus: nil; - showTemporaryCursor: nil; - flushEvents]. Sensor processEvent: Sensor createMouseEvent. ^ rect! Item was changed: ----- Method: Rectangle>>newRectButtonPressedDo: (in category 'transforming') ----- newRectButtonPressedDo: newRectBlock "Track the outline of a new rectangle until mouse button changes. newFrameBlock produces each new rectangle from the previous. Only tracks while mouse is down." + | rect newRect buttonNow delay | - | rect newRect buttonNow aHand delay | delay := Delay forMilliseconds: 10. buttonNow := Sensor anyButtonPressed. rect := self. Display border: rect width: 2 rule: Form reverse fillColor: Color gray. [buttonNow] whileTrue: [delay wait. buttonNow := Sensor anyButtonPressed. newRect := newRectBlock value: rect. newRect = rect ifFalse: [Display border: rect width: 2 rule: Form reverse fillColor: Color gray. Display border: newRect width: 2 rule: Form reverse fillColor: Color gray. rect := newRect]]. Display border: rect width: 2 rule: Form reverse fillColor: Color gray. + Project current pointerMoved. - " pay the price for reading the sensor directly ; get this party started " - Smalltalk isMorphic - ifTrue: [aHand := World activeHand. - aHand newMouseFocus: nil; - showTemporaryCursor: nil; - flushEvents]. Sensor processEvent: Sensor createMouseEvent. ^ rect!

1 0

The Trunk: Morphic-dtl.277.mcz
by commits＠source.squeak.org 28 Dec '09

28 Dec '09

David T. Lewis uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-dtl.277.mcz ==================== Summary ==================== Name: Morphic-dtl.277 Author: dtl Time: 28 December 2009, 1:57:45 am UUID: aca3a78e-b94a-4165-b8fb-13d4f9d5e41a Ancestors: Morphic-nice.276 Remove #isMorphic sends from Rectangle, supported by #pointerMoved in Project and MorphicProject. =============== Diff against Morphic-nice.276 =============== Item was added: + ----- Method: MorphicProject>>pointerMoved (in category 'utilities') ----- + pointerMoved + "Pointer has moved during a drag operation. Perform any necessary updates. + In Morphic, pay the price for reading the sensor directly." + + World activeHand + newMouseFocus: nil; + showTemporaryCursor: nil; + flushEvents!

1 0

The Trunk: System-dtl.209.mcz
by commits＠source.squeak.org 28 Dec '09

28 Dec '09

David T. Lewis uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-dtl.209.mcz ==================== Summary ==================== Name: System-dtl.209 Author: dtl Time: 28 December 2009, 1:56:20 am UUID: 3a236c81-ac13-476f-9506-ec52da531275 Ancestors: System-ul.208 Remove #isMorphic sends from Rectangle, supported by #pointerMoved in Project and MorphicProject. =============== Diff against System-ul.208 =============== Item was added: + ----- Method: Project>>pointerMoved (in category 'utilities') ----- + pointerMoved + "Pointer has moved during a drag operation. Perform any necessary updates." + + ^ self!

1 0

← Newer
1
...
5
6
7
8
9
10
11
...
56
Older →

Jump to page: