Squeak-dev August 2014

squeak-dev@lists.squeakfoundation.org

38 participants
130 discussions

Start a nNew thread

squeak.org back to normal
by Chris Cunnington 14 Aug '14

14 Aug '14

Jesus, that was an unpleasant tour of my own mind. The link to squeaksource.com is updated. Chris

3 2

The Inbox: Kernel-fm.869.mcz
by commits＠source.squeak.org 14 Aug '14

14 Aug '14

A new version of Kernel was added to project The Inbox: http://source.squeak.org/inbox/Kernel-fm.869.mcz ==================== Summary ==================== Name: Kernel-fm.869 Author: fm Time: 13 August 2014, 10:09:37.399 pm UUID: 99e3d4c1-4ffb-5343-af3e-313683e5bf1e Ancestors: Kernel-fm.867, Kernel-mt.868 merged with mt.868 one more fix to RelativeInstructionPointer (absolute positions were leaking in inherited pushClosureCopyNumCopiedValue:numArgs:blockSize:) added a new utility method in CompiledMethod to return the original source from wherever it is stored (not just file) but without decompilation, since it would be used in decompiler tests =============== Diff against Kernel-fm.867 =============== Item was added: + ----- Method: CompiledMethod>>getSourceNoDecompile (in category 'source code management') ----- + getSourceNoDecompile + "Retrieve the source code for this method." + | trailer | + (self properties includesKey: #source) ifTrue: + [^self properties at: #source]. + trailer := self trailer. + + trailer sourceCode ifNotNil: [:code | ^ code ]. + + trailer hasSourcePointer ifFalse: [ + ^nil]. + + "Situation normal; read the sourceCode from the file" + ^[self getSourceFromFileAt: trailer sourcePointer] + on: Error + do: [ :ex | ex return: nil] + ! Item was changed: Object subclass: #Model instanceVariableNames: 'dependents' + classVariableNames: 'WindowActiveOnFirstClick' - classVariableNames: '' poolDictionaries: '' category: 'Kernel-Models'! !Model commentStamp: '<historical>' prior: 0! Provides a superclass for classes that function as models. The only behavior provided is fast dependents maintenance, which bypasses the generic DependentsFields mechanism. 1/23/96 sw! Item was added: + ----- Method: Model class>>windowActiveOnFirstClick (in category 'preferences') ----- + windowActiveOnFirstClick + <preference: 'Window Active On First Click' + category: 'windows' + description: 'Whether or not you want to directly interact with a widget (e.g. button) in a not-yet-active window' + type: #Boolean> + ^ WindowActiveOnFirstClick ifNil: [ false ]! Item was added: + ----- Method: Model class>>windowActiveOnFirstClick: (in category 'preferences') ----- + windowActiveOnFirstClick: aBoolean + + WindowActiveOnFirstClick := aBoolean.! Item was added: + ----- Method: Model>>windowActiveOnFirstClick (in category 'user interface') ----- + windowActiveOnFirstClick + + ^ self class windowActiveOnFirstClick! Item was changed: + ----- Method: Object>>isKindOf: (in category 'class membership') ----- - ----- Method: Object>>isKindOf: (in category '-- all --') ----- isKindOf: aClass "Answer whether the class, aClass, is a superclass or class of the receiver." ^ self class == aClass or: [ self class inheritsFrom: aClass ]! Item was added: + ----- Method: RelativeInstructionPrinter>>pushClosureCopyNumCopiedValues:numArgs:blockSize: (in category 'instruction decoding') ----- + pushClosureCopyNumCopiedValues: numCopied numArgs: numArgs blockSize: blockSize + self print: 'closureNumCopied: ', numCopied printString + , ' numArgs: ', numArgs printString. + innerIndents + atAll: (scanner pc to: scanner pc + blockSize - 1) + put: (innerIndents at: scanner pc - 1) + 1!

1 0

Re: [squeak-dev] [OSProcess] #safeToForkSqueak when running headless
by Max Leske 14 Aug '14

14 Aug '14

On 13.08.2014, at 14:00, squeak-dev-request(a)lists.squeakfoundation.org wrote: > Date: Wed, 13 Aug 2014 07:45:08 -0400 > From: "David T. Lewis" <lewis(a)mail.msen.com> > Subject: Re: [squeak-dev] [OSProcess] #safeToForkSqueak when running > headless > To: The general-purpose Squeak developers list > <squeak-dev(a)lists.squeakfoundation.org> > Message-ID: <20140813114508.GA5949(a)shell.msen.com> > Content-Type: text/plain; charset=us-ascii > > On Wed, Aug 13, 2014 at 09:42:50AM +0200, Max Leske wrote: >> Hi folks. >> >> I?m running into an issue when forking images with OSProcess in headless images. In older versions of OSProcess #forkSqueak would try to fork in any case, independent of the presence of or the connection state to XDisplayControlPlugin. >> In dtl.57 #forkSqueak was changed to explicitly check if XDisplayControlPlugin is present and can be controlled. This is obviously a good thing for when the image runs headful. In my case however I can no longer fork my headless image, even though I don?t need an X session. >> >> Important: apparently #safeToForkSqueak answers true if the XDisplayControlPlugin is available, even in a headless image. But since we don?t need windows, we don?t install X libraries on our server and so #safeToForkSqueak answers false. So the whole thing boils down to a situation where Squeak / Pharo is run in an environment where the XDisplayPlugin can?t be loaded but where forking is still possible. >> >> I don?t know how to do this in a cross platform way but for Pharo we could extend #safeToForkSqueak with a headless check like this: >> >> safeToForkSqueak >> "The forkSqueak method is currently supported only for X11 displays with >> XDisplayControlPlugin available. If the plugin is not available, the child Squeak >> VM will continue interacting with the X display, which leads to errors in the >> parent Squeak, including VM crashes." >> >> ^self canControlXDisplay >> or: [ Smalltalk isHeadless ] >> >> >> I?m going to dirty patch this for my images because I really need it but I think some version of this patch would be a good thing to integrate into OSProcess. >> > > Hi Max, > > Thanks for this fix. I'll add it to the OSP repository as soon as I have a > chance (but maybe not until Sunday). > > As a side note, I have also found that an active RFB (VNC) connection presents > a similar issue. If I have a headless image (such as a SqueakSource server), and > if I have a VNC session connected to that image, then a forkSqueak does bad things > because it results in two instances of the VM/image connected to the same socket. > This is the same kind of issue as with the X11 server socket connection, so I should > probably find a way to handle this in the safeToForkSqueak checks. We explicitly check for that and forbid forking if there’s an RFB session. We also do a couple of other things before forking to make sure we don’t run into problems. One of the most important things for us is to stop WAKom before the fork and restart it afterwards. Otherwise the child would sometimes steal the socket or would crash etc. Forking is realy a bit of a can of worms and I’m really happy that it still works so reliably. So thanks for that :) Max > > Dave >

3 2

Daily Commit Log
by commits＠source.squeak.org 14 Aug '14

14 Aug '14

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2014-August/007254.html Name: ToolBuilder-Kernel-mt.62 Ancestors: ToolBuilder-Kernel-mt.61 Added support for pluggable scroll panes to tool builder as introduced in Morphic-mt.742 ============================================= http://lists.squeakfoundation.org/pipermail/packages/2014-August/007255.html Name: Morphic-mt.742 Ancestors: Morphic-mt.741, Morphic-mt.722 Added pluggable version of scroll pane to be used in tool builder. (merged from inbox) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2014-August/007256.html Name: ToolBuilder-Morphic-mt.93 Ancestors: ToolBuilder-Morphic-mt.92 Added support for pluggable scroll panes as introduced in ToolBuilder-Kernel-mt.62 (merged from inbox) =============================================

1 0

The Trunk: ToolBuilder-Morphic-mt.93.mcz
by commits＠source.squeak.org 13 Aug '14

13 Aug '14

Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk: http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.93.mcz ==================== Summary ==================== Name: ToolBuilder-Morphic-mt.93 Author: mt Time: 13 August 2014, 10:55:11.88 am UUID: b0f4fa7e-d60a-e944-98b3-341e5df2fb91 Ancestors: ToolBuilder-Morphic-mt.92 Added support for pluggable scroll panes as introduced in ToolBuilder-Kernel-mt.62 (merged from inbox) =============== Diff against ToolBuilder-Morphic-fbs.91 =============== Item was added: + ----- Method: MorphicToolBuilder>>buildPluggableScrollPane: (in category 'widgets optional') ----- + buildPluggableScrollPane: spec + + | widget | + widget := self scrollPaneClass new. + widget model: spec model. + self register: widget id: spec name. + + spec children + ifNotNil: [:obj | + "Create panel morph to scroll it." + widget morph: (self pluggablePanelSpec new + children: obj; + layout: spec layout; + frame: (0@0 corner: 1@1); + buildWith: self). + spec layout ~~ #proportional ifTrue: [ + "Fix #spaceFill resizing because it does not make sense in scroll pane." + widget morph + hResizing: #shrinkWrap; + vResizing: #shrinkWrap. + widget morph submorphsDo: [:m | + m + extent: 100@100; + flag: #refactor; "mt: Restore orginial properties?" + hResizing: #rigid; + vResizing: #rigid] + ]] + ifNil: [spec morph + ifNotNil: [:m | widget morph: m] + ifNil: [widget morphClass: spec morphClass]]. + + self setFrame: spec frame in: widget. + parent ifNotNil: [self add: widget to: parent]. + + widget borderWidth: spec borderWidth. + + spec hScrollBarPolicy caseOf: { + [#always] -> [widget alwaysShowHScrollBar: true]. + [#never] -> [widget hideHScrollBarIndefinitely: true]. + [#whenNeeded] -> [widget showHScrollBarOnlyWhenNeeded: true]}. + spec vScrollBarPolicy caseOf: { + [#always] -> [widget alwaysShowVScrollBar: true]. + [#never] -> [widget hideVScrollBarIndefinitely: true]. + [#whenNeeded] -> [widget showVScrollBarOnlyWhenNeeded: true]}. + + ^ widget! Item was added: + ----- Method: MorphicToolBuilder>>scrollPaneClass (in category 'widget classes') ----- + scrollPaneClass + ^ PluggableScrollPane!

1 0

The Trunk: Morphic-mt.742.mcz
by commits＠source.squeak.org 13 Aug '14

13 Aug '14

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.742.mcz ==================== Summary ==================== Name: Morphic-mt.742 Author: mt Time: 13 August 2014, 10:52:41.575 am UUID: 4d1aee22-7d2f-aa4d-84d6-a7aa96fd3307 Ancestors: Morphic-mt.741, Morphic-mt.722 Added pluggable version of scroll pane to be used in tool builder. (merged from inbox) =============== Diff against Morphic-mt.741 =============== Item was added: + ScrollPane subclass: #PluggableScrollPane + instanceVariableNames: 'morph morphClass' + classVariableNames: '' + poolDictionaries: '' + category: 'Morphic-Pluggable Widgets'! Item was added: + ----- Method: PluggableScrollPane class>>on: (in category 'instance creation') ----- + on: morph + + ^ self new + morph: morph; + yourself! Item was added: + ----- Method: PluggableScrollPane class>>onClass: (in category 'instance creation') ----- + onClass: morphClass + + ^ self new + morphClass: morphClass; + updateMorph; + yourself! Item was added: + ----- Method: PluggableScrollPane>>morph (in category 'accessing') ----- + morph + + ^ morph ifNil: [ + self morph: self morphClass new. + morph]! Item was added: + ----- Method: PluggableScrollPane>>morph: (in category 'accessing') ----- + morph: morphToScroll + + morphToScroll topLeft: 0@0. + morph := morphToScroll. + morphClass := morphToScroll class. + + self scroller + removeAllMorphs; + addMorph: morph. + + self updateMorph.! Item was added: + ----- Method: PluggableScrollPane>>morphClass (in category 'accessing') ----- + morphClass + + ^ morphClass ifNil: [Morph]! Item was added: + ----- Method: PluggableScrollPane>>morphClass: (in category 'accessing') ----- + morphClass: aMorphClass + + morphClass := aMorphClass.! Item was added: + ----- Method: PluggableScrollPane>>updateMorph (in category 'updating') ----- + updateMorph + + self morph fullBounds. + self setScrollDeltas. + + scrollBar setValue: 0.0. + hScrollBar setValue: 0.0.!

1 0

The Trunk: ToolBuilder-Kernel-mt.62.mcz
by commits＠source.squeak.org 13 Aug '14

13 Aug '14

Marcel Taeumel uploaded a new version of ToolBuilder-Kernel to project The Trunk: http://source.squeak.org/trunk/ToolBuilder-Kernel-mt.62.mcz ==================== Summary ==================== Name: ToolBuilder-Kernel-mt.62 Author: mt Time: 13 August 2014, 10:54:11.149 am UUID: 668e67af-7a18-5448-bd8c-4a02243e4ec4 Ancestors: ToolBuilder-Kernel-mt.61 Added support for pluggable scroll panes to tool builder as introduced in Morphic-mt.742 =============== Diff against ToolBuilder-Kernel-nice.60 =============== Item was added: + PluggableCompositeSpec subclass: #PluggableScrollPaneSpec + instanceVariableNames: 'morph morphClass borderWidth vScrollBarPolicy hScrollBarPolicy' + classVariableNames: '' + poolDictionaries: '' + category: 'ToolBuilder-Kernel'! Item was added: + ----- Method: PluggableScrollPaneSpec>>borderWidth (in category 'accessing') ----- + borderWidth + + ^ borderWidth ifNil: [1]! Item was added: + ----- Method: PluggableScrollPaneSpec>>borderWidth: (in category 'accessing') ----- + borderWidth: anObject + + borderWidth := anObject! Item was added: + ----- Method: PluggableScrollPaneSpec>>buildWith: (in category 'building') ----- + buildWith: builder + + ^ builder buildPluggableScrollPane: self! Item was added: + ----- Method: PluggableScrollPaneSpec>>hScrollBarPolicy (in category 'accessing') ----- + hScrollBarPolicy + + ^ hScrollBarPolicy ifNil: [#always]! Item was added: + ----- Method: PluggableScrollPaneSpec>>hScrollBarPolicy: (in category 'accessing') ----- + hScrollBarPolicy: anObject + "#always, #never, #whenNeeded" + + hScrollBarPolicy := anObject! Item was added: + ----- Method: PluggableScrollPaneSpec>>morph (in category 'accessing') ----- + morph + + ^ morph! Item was added: + ----- Method: PluggableScrollPaneSpec>>morph: (in category 'accessing') ----- + morph: anObject + + morph := anObject! Item was added: + ----- Method: PluggableScrollPaneSpec>>morphClass (in category 'accessing') ----- + morphClass + + ^ morphClass! Item was added: + ----- Method: PluggableScrollPaneSpec>>morphClass: (in category 'accessing') ----- + morphClass: anObject + + morphClass := anObject! Item was added: + ----- Method: PluggableScrollPaneSpec>>vScrollBarPolicy (in category 'accessing') ----- + vScrollBarPolicy + + ^ vScrollBarPolicy ifNil: [#always]! Item was added: + ----- Method: PluggableScrollPaneSpec>>vScrollBarPolicy: (in category 'accessing') ----- + vScrollBarPolicy: anObject + "#always, #never, #whenNeeded" + + vScrollBarPolicy := anObject! Item was added: + ----- Method: ToolBuilder>>buildPluggableScrollPane: (in category 'widgets optional') ----- + buildPluggableScrollPane: spec + + ^ spec children + ifNotNil: [self buildPluggablePanel: spec] + ifNil: [spec morph ifNil: [spec morphClass new]]! Item was added: + ----- Method: ToolBuilder>>pluggableScrollPaneSpec (in category 'defaults') ----- + pluggableScrollPaneSpec + ^ PluggableScrollPaneSpec!

1 0

Re: [squeak-dev] The Trunk: Kernel-mt.867.mcz
by Chris Muller 13 Aug '14

13 Aug '14

The idea of this preference is you can click buttons or other list-selections which might be visible in background windows and they will be immediately activated (and the window topped) even though the window wasn't already on top. So it can save you a click and its the way traditional MS Windows has behaved. In a pure sense, it is even somewhat less "modal". The trade-off is that you can no longer just sloppily Top-A-Window. Now you have to pay attention to ^where-in-the-background^ you're clicking, to make sure you don't accidentally activate something you don't want to activate. For example, if the code-pane of a background Browser is dirty, look for a spot in the text pane itself. You'll lose any prior text-selection and cursor position, but at least it might be less-cumbersome than hitting one of the lists, because doing that would invoke a selection change, which will cause Squeak to prompt you whether you want to discard your changes. So, maybe best to just aim for the very edge of the window to top it... Oh, what was the benefit again? I believe the user should "drive" the UI, but this creates more of a two-way interaction between Squeak and the user. Window-switching is very frequent, the user will have to "decide" where the safest spot to click every single switch. It's a bit more like being driven, than driving, and all just to save one click except, ror what has to be given up over the long run, it will actually add required clicks.. On Tue, Aug 12, 2014 at 2:30 AM, <commits(a)source.squeak.org> wrote: > Marcel Taeumel uploaded a new version of Kernel to project The Trunk: > http://source.squeak.org/trunk/Kernel-mt.867.mcz > > ==================== Summary ==================== > > Name: Kernel-mt.867 > Author: mt > Time: 12 August 2014, 9:29:37.682 am > UUID: f469a687-9e68-6542-b0ae-01fde30002a8 > Ancestors: Kernel-eem.866 > > New preference added for activating system windows on first mouse click. > Works for all standard tools that subclass Model for their model. > > =============== Diff against Kernel-eem.866 =============== > > Item was changed: > Object subclass: #Model > instanceVariableNames: 'dependents' > + classVariableNames: 'WindowActiveOnFirstClick' > - classVariableNames: '' > poolDictionaries: '' > category: 'Kernel-Models'! > > !Model commentStamp: '<historical>' prior: 0! > Provides a superclass for classes that function as models. The only > behavior provided is fast dependents maintenance, which bypasses the > generic DependentsFields mechanism. 1/23/96 sw! > > Item was added: > + ----- Method: Model class>>windowActiveOnFirstClick (in category > 'preferences') ----- > + windowActiveOnFirstClick > + <preference: 'Window Active On First Click' > + category: 'windows' > + description: 'Whether or not you want to directly interact > with a widget (e.g. button) in a not-yet-active window' > + type: #Boolean> > + ^ WindowActiveOnFirstClick ifNil: [ false ]! > > Item was added: > + ----- Method: Model class>>windowActiveOnFirstClick: (in category > 'preferences') ----- > + windowActiveOnFirstClick: aBoolean > + > + WindowActiveOnFirstClick := aBoolean.! > > Item was added: > + ----- Method: Model>>windowActiveOnFirstClick (in category 'user > interface') ----- > + windowActiveOnFirstClick > + > + ^ self class windowActiveOnFirstClick! > > >

2 1

Cursor position finding
by tim Rowledge 13 Aug '14

13 Aug '14

I’m having some ‘fun’ working out why Scratch on the Pi misses a ot of clicks and double-clicks. I’ve run event debugging and discovered that all the events seem to get into the vm and then into the image ok, but right now it looks a lot like the legacy io code still in the system is flushing a lot of events when it (mis)uses Sensor cursorPoint etc. I *think* I need to change the code to use ‘ActiveHand cursorPoint’ etc. Is that the proper api? I’d go for passing events around more of the time but that looks like a huge change I can’t do any time soon. There’s also a problem with uses of 'Sensor shiftPressed’ sending a flush, but I don’t see anything like a ‘ActiveHand shiftPressed’ method. Surely we have a non-destructive way of finding current state on the cursor position, modifier state etc somewhere in there? tim -- tim Rowledge; tim(a)rowledge.org; http://www.rowledge.org/tim Brain fried; core dumped.

3 8

Daily Commit Log
by commits＠source.squeak.org 13 Aug '14

13 Aug '14

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2014-August/007249.html Name: Kernel-mt.867 Ancestors: Kernel-eem.866 New preference added for activating system windows on first mouse click. Works for all standard tools that subclass Model for their model. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2014-August/007250.html Name: Kernel-mt.868 Ancestors: Kernel-mt.867 restored method category of #isKindOf: to "class membership" ============================================= http://lists.squeakfoundation.org/pipermail/packages/2014-August/007251.html Name: Morphic-mt.741 Ancestors: Morphic-eem.740, Morphic-mt.721 Fixed implementation for adding multiple morphs at once. Made API of addMorph* and addAllMorphs* more consistent w.r.t. index handling. (merged from inbox Morphic-mt.721) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2014-August/007252.html Name: MorphicTests-mt.26 Ancestors: MorphicTests-mt.25 Tests added for Morphic-mt.741 ============================================= http://lists.squeakfoundation.org/pipermail/packages/2014-August/007253.html Name: Graphics-mt.300 Ancestors: Graphics-nice.299 fixed image reading: stream was not correctly reset for each reader/writer test =============================================

1 0

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