Packages December 2010

packages@lists.squeakfoundation.org

2 participants
359 discussions

The Trunk: Morphic-mtf.501.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

Matthew Fulmer uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mtf.501.mcz ==================== Summary ==================== Name: Morphic-mtf.501 Author: mtf Time: 28 December 2010, 8:43:55.314 pm UUID: 58aeefd2-fb62-1a45-aa60-92515490433b Ancestors: Morphic-mtf.500 import from Croquet Name: Morphic-ar.9 Author: ar Time: 13 March 2006, 4:26:31 pm UUID: 071f4e22-280e-1044-bf61-112022984c8c Ancestors: Morphic-ar.8 - add a fix for transparent backgrounds in Morphic worlds =============== Diff against Morphic-mtf.500 =============== Item was changed: ----- Method: WorldState>>drawWorld:submorphs:invalidAreasOn: (in category 'update cycle') ----- drawWorld: aWorld submorphs: submorphs invalidAreasOn: aCanvas "Redraw the damaged areas of the given canvas and clear the damage list. Return a collection of the areas that were redrawn." | rectList n morphs rects validList | rectList := damageRecorder invalidRectsFullBounds: aWorld viewBox. "sort by areas to draw largest portions first" rectList := rectList asArray sort: [:r1 :r2 | r1 area > r2 area]. damageRecorder reset. n := submorphs size. morphs := OrderedCollection new: n * 2. rects := OrderedCollection new: n * 2. validList := OrderedCollection new: n * 2. + + "This is added in case we are drawing to a form that is to be used as a texture, and we want the background to be translucent." + aWorld color isTranslucent ifTrue: + [rectList do: [:r | aCanvas form fill: r fillColor: aWorld color]]. + rectList do: [:dirtyRect | dirtyRect allAreasOutsideList: validList do: [:r | | mm rectToFill remnants c rect i | "Experimental top-down drawing -- Traverses top to bottom, stopping if the entire area is filled. If only a single rectangle remains, then continue with the reduced rectangle." rectToFill := r. i := 1. [rectToFill isNil or: [i > n]] whileFalse: [mm := submorphs at: i. ((mm fullBounds intersects: r) and: [mm visible]) ifTrue: [morphs addLast: mm. rects addLast: rectToFill. remnants := mm areasRemainingToFill: rectToFill. remnants size = 1 ifTrue: [rectToFill := remnants first]. remnants isEmpty ifTrue: [rectToFill := nil]]. i := i + 1]. "Now paint from bottom to top, but using the reduced rectangles." rectToFill ifNotNil: [aWorld drawOn: (c := aCanvas copyClipRect: rectToFill)]. [morphs isEmpty] whileFalse: [(rect := rects removeLast) == rectToFill ifFalse: [c := aCanvas copyClipRect: (rectToFill := rect)]. c fullDrawMorph: morphs removeLast]. morphs reset. rects reset. validList add: r]]. ^validList!

1 0

The Trunk: Morphic-mtf.501.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

1 0

The Trunk: Morphic-mtf.500.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

Matthew Fulmer uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mtf.500.mcz ==================== Summary ==================== Name: Morphic-mtf.500 Author: mtf Time: 28 December 2010, 7:58:47.008 pm UUID: 7702a744-49a7-da43-9b78-327ca3ebb44d Ancestors: Morphic-mtf.499 import from croquet: Name: Morphic-ar.17 Author: ar Time: 12 July 2006, 5:15:21 pm UUID: 9c5d68d2-b8bc-4940-816e-6e136c040ec7 Ancestors: Morphic-ar.16 - keep mouse button information in keyboard events =============== Diff against Morphic-mtf.499 =============== Item was changed: ----- Method: HandMorph>>generateKeyboardEvent: (in category 'private events') ----- generateKeyboardEvent: evtBuf "Generate the appropriate mouse event for the given raw event buffer" | buttons modifiers type pressType stamp char | stamp := evtBuf second. stamp = 0 ifTrue: [stamp := Time millisecondClockValue]. pressType := evtBuf fourth. pressType = EventKeyDown ifTrue: [type := #keyDown]. pressType = EventKeyUp ifTrue: [type := #keyUp]. pressType = EventKeyChar ifTrue: [type := #keystroke]. modifiers := evtBuf fifth. + buttons := (modifiers bitShift: 3) bitOr: (lastMouseEvent buttons bitAnd: 7). - buttons := modifiers bitShift: 3. char := self keyboardInterpreter nextCharFrom: Sensor firstEvt: evtBuf. ^ KeyboardEvent new setType: type buttons: buttons position: self position keyValue: char asciiValue hand: self stamp: stamp. !

1 0

The Trunk: Morphic-mtf.500.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

1 0

The Trunk: Morphic-mtf.500.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

1 0

The Trunk: Morphic-mtf.499.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

Matthew Fulmer uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mtf.499.mcz ==================== Summary ==================== Name: Morphic-mtf.499 Author: mtf Time: 28 December 2010, 7:44:35.089 pm UUID: 5654782d-30d7-0f40-8c4e-36c106e68ca1 Ancestors: Morphic-ar.498 Import from Cobalt: Name: Morphic-mka.24 Author: mka Time: 21 February 2009, 8:39:30 pm UUID: 087e4594-961d-fc4b-a216-e43a0286f63c Ancestors: Morphic-jrd.23 HandMorph supports now mouse states where two mouse buttons are pressed simultaneously =============== Diff against Morphic-ar.498 =============== Item was changed: ----- Method: HandMorph>>generateMouseEvent: (in category 'private events') ----- generateMouseEvent: evtBuf "Generate the appropriate mouse event for the given raw event buffer" | position buttons modifiers type trail stamp oldButtons evtChanged | evtBuf first = lastEventBuffer first ifTrue: ["Workaround for Mac VM bug, *always* generating 3 events on clicks" evtChanged := false. 3 to: evtBuf size do: [:i | (lastEventBuffer at: i) = (evtBuf at: i) ifFalse: [evtChanged := true]]. evtChanged ifFalse: [^nil]]. stamp := evtBuf second. stamp = 0 ifTrue: [stamp := Time millisecondClockValue]. position := evtBuf third @ evtBuf fourth. buttons := evtBuf fifth. modifiers := evtBuf sixth. + type := buttons = 0 + ifTrue:[ + lastEventBuffer fifth = 0 + ifTrue: [#mouseMove] "this time no button and previously no button .. just mouse move" + ifFalse: [#mouseUp] "this time no button but previously some button ... therefore button was released" + ] + ifFalse:[ + buttons = lastEventBuffer fifth + ifTrue: [#mouseMove] "button states are the same .. now and past .. therfore a mouse movement" + ifFalse: [ "button states are different .. button was pressed or released" + buttons > lastEventBuffer fifth + ifTrue: [#mouseDown] + ifFalse:[#mouseUp]. + ]. + ]. - ifTrue: - [lastEventBuffer fifth = 0 ifTrue: [#mouseMove] ifFalse: [#mouseUp]] - ifFalse: - [lastEventBuffer fifth = 0 - ifTrue: [#mouseDown] - ifFalse: [#mouseMove]]. buttons := buttons bitOr: (modifiers bitShift: 3). oldButtons := lastEventBuffer fifth bitOr: (lastEventBuffer sixth bitShift: 3). lastEventBuffer := evtBuf. type == #mouseMove ifTrue: [trail := self mouseTrailFrom: evtBuf. ^MouseMoveEvent new setType: type startPoint: (self position) endPoint: trail last trail: trail buttons: buttons hand: self stamp: stamp]. ^MouseButtonEvent new setType: type position: position which: (oldButtons bitXor: buttons) buttons: buttons hand: self stamp: stamp!

1 0

The Trunk: Morphic-mtf.499.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

1 0

The Trunk: Morphic-mtf.499.mcz
by commits＠source.squeak.org 29 Dec '10

29 Dec '10

1 0

The Trunk: Files-mtf.93.mcz
by commits＠source.squeak.org 28 Dec '10

28 Dec '10

Matthew Fulmer uploaded a new version of Files to project The Trunk: http://source.squeak.org/trunk/Files-mtf.93.mcz ==================== Summary ==================== Name: Files-mtf.93 Author: mtf Time: 28 December 2010, 1:31:40.137 am UUID: a972b845-c252-0643-896b-a0491ec6730f Ancestors: Files-cmm.92 add << to StandardFileStream; the version inherited from WriteStream is not appropriate =============== Diff against Files-cmm.92 =============== Item was added: + ----- Method: StandardFileStream>><< (in category 'printing') ----- + << aCollection + aCollection putOn: self!

1 0

The Trunk: Files-mtf.93.mcz
by commits＠source.squeak.org 28 Dec '10

28 Dec '10

1 0

← Newer
1
...
7
8
9
10
11
12
13
...
36
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages December 2010