Squeak-dev December 2019

squeak-dev@lists.squeakfoundation.org

32 participants
256 discussions

The Trunk: Morphic-mt.1604.mcz
by commits＠source.squeak.org 06 Dec '19

06 Dec '19

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.1604.mcz ==================== Summary ==================== Name: Morphic-mt.1604 Author: mt Time: 6 December 2019, 6:08:09.19933 pm UUID: 4cd546eb-f09b-564a-9583-67eeed51a27c Ancestors: Morphic-mt.1603 Partially revert that last commit. Sorry! All these different preferences around system windows make my head ache. :-) If there is no current keyboard focus, this can mean you are dragging a window by its label. Especially when "keyboard focus on mouse over" is enabled. In that case, we do not want the window to suddenly look unfocused. =============== Diff against Morphic-mt.1603 =============== Item was changed: ----- Method: SystemWindow>>updateFocusLookForKeyboardFocus (in category 'focus') ----- updateFocusLookForKeyboardFocus "Ensure that the window holding the current keyboard focus looks focused. Note that the focus window is not necessarily the receiver of this message." | f w | (((f := self activeHand keyboardFocus) notNil and: [(w := f containingWindow) notNil]) and: [w isActive]) ifTrue: [ (self class windowsIn: self world) do: [:window | w ~~ window ifTrue: [window lookUnfocused]]. + w lookFocused]! - w lookFocused] - ifFalse: [ - "If there is no valid focus holder, we must not look focused even if we are the key window." - self lookUnfocused]!

1 0

Debug It doesn't show context selection...
by Eliot Miranda 06 Dec '19

06 Dec '19

Hi Marcel, forgive me but I must ask for an urgent fizz. I've spent a halff hour playing around and have no idea what I'm doing, hence I'm going to ask you... If one does "debug it" then the debugger that opens doesn't show the context selection (the selection in the method text that shows where execution is). I have tried adding #changed: contentsSelection and other hacks in various places ut so far have got no where. Hence, please, can this be fixed? The issue is that when one needs to do into immediately, if there's no selection my instinct is to step, which will step past the point. I can't make myself remember to deselect and select the method to update the selection to be visible (nor should one have to). So please... _,,,^..^,,,_ best, Eliot

2 2

The Trunk: Morphic-mt.1603.mcz
by commits＠source.squeak.org 06 Dec '19

06 Dec '19

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.1603.mcz ==================== Summary ==================== Name: Morphic-mt.1603 Author: mt Time: 6 December 2019, 6:00:07.36633 pm UUID: 17d97c9d-3396-5648-bf6c-48edf00bf7fd Ancestors: Morphic-mt.1600 Fixes some visual glitches regarding initial text selection in windows and a window's focus look. Note that the instVar 'selectionInterval' in PluggableTextMorph is a cache because paragraphs and editors get replaced very frequently. The message #selectionInterval points to the editor, not that instVar. There are no senders of #selectionInterval: either. I will make that more clear in the future. There is a lot of inconsistent stuff lying around in our text-morph infrastructure. Note that this is Morphic-mt.1603 because I have 1601 and 1602 in the inbox. :-) =============== Diff against Morphic-mt.1600 =============== Item was changed: ----- Method: Morph>>containingWindow (in category 'structure') ----- containingWindow "Answer a window that contains the receiver. Try to use the model to find the right window. If I do not have a model, use the model of one of my owners. We could also just use #isSystemWindow. This, however, gives system windows the chance to refrain from taking ownership of this morph." | component | component := self. component model isNil ifTrue: [component := self firstOwnerSuchThat: [:m| m model notNil]]. ^(component isNil or: [component isWindowForModel: component model]) ifTrue: [component] + ifFalse: [(component firstOwnerSuchThat: [:m | m isWindowForModel: component model]) + "For models composed of models, we have to use #isSystemWindow." + ifNil: [component firstOwnerSuchThat: [:m | m isSystemWindow]]]! - ifFalse: [component firstOwnerSuchThat:[:m| m isWindowForModel: component model]]! Item was added: + ----- Method: PluggableTextMorph>>restoreSelectionInterval (in category 'editor access') ----- + restoreSelectionInterval + + selectionInterval ifNotNil: [ + self selectionInterval: selectionInterval].! Item was changed: + ----- Method: PluggableTextMorph>>selectionInterval (in category 'editor access') ----- - ----- Method: PluggableTextMorph>>selectionInterval (in category 'interactive error protocol') ----- selectionInterval ^ textMorph editor selectionInterval! Item was changed: + ----- Method: PluggableTextMorph>>selectionInterval: (in category 'editor access') ----- - ----- Method: PluggableTextMorph>>selectionInterval: (in category 'model access') ----- selectionInterval: sel + textMorph editor selectInterval: sel.! - selectionInterval := sel! Item was changed: ----- Method: SystemWindow>>updateFocusLookForKeyboardFocus (in category 'focus') ----- updateFocusLookForKeyboardFocus + "Ensure that the window holding the current keyboard focus looks focused. Note that the focus window is not necessarily the receiver of this message." | f w | (((f := self activeHand keyboardFocus) notNil and: [(w := f containingWindow) notNil]) and: [w isActive]) ifTrue: [ (self class windowsIn: self world) do: [:window | w ~~ window ifTrue: [window lookUnfocused]]. + w lookFocused] + ifFalse: [ + "If there is no valid focus holder, we must not look focused even if we are the key window." + self lookUnfocused]! - w lookFocused]! Item was added: + ----- Method: TextMorphForEditView>>doLayoutIn: (in category 'layout') ----- + doLayoutIn: layoutBounds + + | shouldRestoreSelection | + self flag: #workaround. "mt: The combination of 'releaseParagraph; paragraph' resets the selection. We should find a better way for this in the future. Sigh...." + + shouldRestoreSelection := paragraph isNil. + + super doLayoutIn: layoutBounds. + + shouldRestoreSelection ifTrue: [ + self editView ifNotNil: [:view | + view restoreSelectionInterval]].!

1 0

Squeak and the SoundPlugin in cog VM
by Christian Kellermann 06 Dec '19

06 Dec '19

Dear Lists! I have written a VM SoundPlugin for OpenBSD's native sound system sndio. Which means that now I have sound in Squeak on this platform. However I am a bit struggling with the sound quality of SampledSound's like in the eToys SoundLibrary. Those produce an echo effect when played and I have been unable to determine the cause. However the Bach fugue Tests sound perfect so I am suspecting some miscalculations in sample data somewhere on the way. As I have been trying to confirm the 'normal' behaviour on Linux I stumbled over issues with the sound plugins on my ArchLinux box: None of them work. ALSA, OSS or Pulse Audio plugins error out in different stages of the drivers. Am I the only one? What's the last known good state of those? What's the last known good state of sound output for the SoundLibrary SampledSounds? I have tried with latest master and trunk of both opensmalltalk-vm and Squeak. I am grateful for any hints. Once that works I will propose patches to the opensmalltalk-vm code base. Thanks, Christian -- May you be peaceful, may you live in safety, may you be free from suffering, and may you live with ease.

6 9

[ANN] Feature Freeze on Sunday, December 8, 2019
by Marcel Taeumel 06 Dec '19

06 Dec '19

Hi, all! :-) On behalf of Hannes Hirzel, who is our release manager for Squeak 5.3 ( [http://wiki.squeak.org/squeak/275]http://wiki.squeak.org/squeak/275 [http://wiki.squeak.org/squeak/275]), I am happy to announce the next feature freeze. It will be this Sunday, December 8, 2019. (Hannes is quite busy these days. During the past months, we exchanged many thoughts on this release. So let us make it happen! I am sure he will pop up on the squeak-dev list soon again.) During that freeze (aka. beta phase), we want to focus on bug hunting; new features will be collected in the inbox only ( [http://source.squeak.org/inbox/]http://source.squeak.org/inbox/ [http://source.squeak.org/inbox/]). We are eager to push out this release until Christmas. 2019! ;-) So the freeze will hopefully be over on December 24. Maybe earlier. So, if you update you local Trunk image on Monday morning, it should show "Squeak 5.3beta" instead of: Where do you get a fresh Squeak Trunk image to test? -> Via [https://squeak.org/downloads/]https://squeak.org/downloads/ [https://squeak.org/downloads/] -> or [http://files.squeak.org/trunk/]http://files.squeak.org/trunk/ [http://files.squeak.org/trunk/] (the latest ones at the bottom) -> or [http://files.squeak.org/5.3beta/]http://files.squeak.org/5.3beta/ [http://files.squeak.org/5.3beta/] (soon) Which virtual machine (VM) should you use? -> The version from Nov 28, 2019: [https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/201911282316… [https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/201911282316] -> That version will be already in all 5.3beta bundles that have a VM bundled within. -> Double check via Help > About Squeak: What should you test? -> Both 32-bit and 64-bit versions. If possible on macOS, Windows, and Linux operating systems. -> Hannes suggested a focus on Squeak's Etoys features. Here are some pointers: * [http://forum.world.st/Etoys-infested-by-deprecation-warnings-td5104215.htm]… [http://forum.world.st/Etoys-infested-by-deprecation-warnings-td5104215.htm] * [http://wiki.squeak.org/squeak/1183]http://wiki.squeak.org/squeak/1183 [http://wiki.squeak.org/squeak/1183] * [http://wiki.squeak.org/squeak/3815]http://wiki.squeak.org/squeak/3815 [http://wiki.squeak.org/squeak/3815] * [http://wiki.squeak.org/squeak/1174]http://wiki.squeak.org/squeak/1174 [http://wiki.squeak.org/squeak/1174] * [http://wiki.squeak.org/squeak/6601]http://wiki.squeak.org/squeak/6601 [http://wiki.squeak.org/squeak/6601] -> The preference wizard that pops up at the beginning in a fresh image. -> Bugs listed in Mantis ( [http://bugs.squeak.org/view_all_bug_page.php]http://bugs.squeak.org/view_al… [http://bugs.squeak.org/view_all_bug_page.php]) that are still there and really annoying. -> Grammar/spelling issues in all kinds of texts such as in buttons, menus, help topics, release notes, tutorials (http://wiki.squeak.org/squeak/792 [http://wiki.squeak.org/squeak/792]) etc. Where should you report the bugs? -> First, make sure you are working on the latest Trunk version! (Squeak > Update) -> Please post any bugs directly on the squeak-dev list. What about SistaV1; is it ready? -> No, it will not be enabled by default in Squeak 5.3. After the release, we plan to immediately switch the regular Trunk from V3 to SistaV1 to do more tests. Please do all tests using the default V3-with-closures bytecode set. Meaning, just use the ones from files.squeak.org as described above. How can I dive into Etoys; where is it? -> It is already available in the form of any morph's tile halo. However, the following code snippet will turn your image into an Etoys station: ReleaseBuilderSqueakland intermediatePrepareForUsers. Preferences disable: #noviceMode; enable: #generalizedYellowButtonMenu; enable: #showAdvancedNavigatorButtons; disable: #eToyFriendly. TheWorldMainDockingBar showWorldMainDockingBar: true. Have fun and thank you all for your support! :-) Best, Marcel P.S.: This mail will arrive again several times soon because of some hick-up in our mail infrastructure. ;-)

2 1

[ANN] Feature Freeze on Sunday, December 8, 2019
by Marcel Taeumel 05 Dec '19

05 Dec '19

Hi, all! :-) On behalf of Hannes Hirzel, who is our release manager for Squeak 5.3 (http://wiki.squeak.org/squeak/275 [http://wiki.squeak.org/squeak/275]), I am happy to announce the next feature freeze. It will be this Sunday, December 8, 2019. (Hannes is quite busy these days. During the past months, we exchanged many thoughts on this release. So let us make it happen! I am sure he will pop up on the squeak-dev list soon again.) During that freeze (aka. beta phase), we want to focus on bug hunting; new features will be collected in the inbox only (http://source.squeak.org/inbox/ [http://source.squeak.org/inbox/]). We are eager to push out this release until Christmas. 2019! ;-) So the freeze will hopefully be over on December 24. Maybe earlier. So, if you update you local Trunk image on Monday morning, it should show "Squeak 5.3beta". Where do you get a fresh Squeak Trunk image to test? -> Via https://squeak.org/downloads/ [https://squeak.org/downloads/] -> or http://files.squeak.org/trunk/ [http://files.squeak.org/trunk/] (the latest ones at the bottom) -> or http://files.squeak.org/5.3beta/ [http://files.squeak.org/5.3beta/] (soon) Which virtual machine (VM) should you use? -> The version from Nov 28, 2019: https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/201911282316 [https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/201911282316] -> That version will be already in all 5.3beta bundles that have a VM bundled within. -> Double check via Help > About Squeak. What should you test? -> Both 32-bit and 64-bit versions. If possible on macOS, Windows, and Linux operating systems. -> Hannes suggested a focus on Squeak's Etoys features. Here are some pointers: * http://forum.world.st/Etoys-infested-by-deprecation-warnings-td5104215.htm [http://forum.world.st/Etoys-infested-by-deprecation-warnings-td5104215.htm] * http://wiki.squeak.org/squeak/1183 [http://wiki.squeak.org/squeak/1183] * http://wiki.squeak.org/squeak/3815 [http://wiki.squeak.org/squeak/3815] * http://wiki.squeak.org/squeak/1174 [http://wiki.squeak.org/squeak/1174] * http://wiki.squeak.org/squeak/6601 [http://wiki.squeak.org/squeak/6601] -> The preference wizard that pops up at the beginning in a fresh image. -> Bugs listed in Mantis (http://bugs.squeak.org/view_all_bug_page.php [http://bugs.squeak.org/view_all_bug_page.php]) that are still there and really annoying. -> Grammar/spelling issues in all kinds of texts such as in buttons, menus, help topics, release notes, tutorials (http://wiki.squeak.org/squeak/792) etc. Where should you report the bugs? -> First, make sure you are working on the latest Trunk version! (Squeak > Update) -> Please post any bugs directly on the squeak-dev list. What about SistaV1; is it ready? -> No, it will not be enabled by default in Squeak 5.3. After the release, we plan to immediately switch the regular Trunk from V3 to SistaV1 to do more tests. Please do all tests using the default V3-with-closures bytecode set. Meaning, just use the ones from files.squeak.org as described above. How can I dive into Etoys; where is it? -> It is already available in the form of any morph's tile halo. However, the following code snippet will turn your image into an Etoys station: ReleaseBuilderSqueakland intermediatePrepareForUsers. Preferences disable: #noviceMode; enable: #generalizedYellowButtonMenu; enable: #showAdvancedNavigatorButtons; disable: #eToyFriendly. TheWorldMainDockingBar showWorldMainDockingBar: true. Have fun and thank you all for your support! :-) Best, Marcel

1 0

[ANN] Feature Freeze on Sunday, December 8, 2019
by marcel.taeumel 05 Dec '19

05 Dec '19

Hi, all! :-) On behalf of Hannes Hirzel, who is our release manager for Squeak 5.3 (http://wiki.squeak.org/squeak/275), I am happy to announce the next feature freeze. It will be this Sunday, December 8, 2019. (Hannes is quite busy these days. During the past months, we exchanged many thoughts on this release. So let us make it happen! I am sure he will pop up on the squeak-dev list soon again.) During that freeze (aka. beta phase), we want to focus on bug hunting; new features will be collected in the inbox only (http://source.squeak.org/inbox/). We are eager to push out this release until Christmas. 2019! ;-) So the freeze will hopefully be over on December 24. Maybe earlier. So, if you update you local Trunk image on Monday morning, it should show "Squeak 5.3beta" instead of: <http://forum.world.st/file/t370078/image275.png> Where do you get a fresh Squeak Trunk image to test? -> Via https://squeak.org/downloads/ -> or http://files.squeak.org/trunk/ (the latest ones at the bottom) -> or http://files.squeak.org/5.3beta/ (soon) Which virtual machine (VM) should you use? -> The version from Nov 28, 2019: https://github.com/OpenSmalltalk/opensmalltalk-vm/releases/tag/201911282316 -> That version will be already in all 5.3beta bundles that have a VM bundled within. -> Double check via Help > About Squeak: <http://forum.world.st/file/t370078/image2.png> What should you test? -> Both 32-bit and 64-bit versions. If possible on macOS, Windows, and Linux operating systems. -> Hannes suggested a focus on Squeak's Etoys features. Here are some pointers: * http://forum.world.st/Etoys-infested-by-deprecation-warnings-td5104215.htm * http://wiki.squeak.org/squeak/1183 * http://wiki.squeak.org/squeak/3815 * http://wiki.squeak.org/squeak/1174 * http://wiki.squeak.org/squeak/6601 -> The preference wizard that pops up at the beginning in a fresh image. -> Bugs listed in Mantis (http://bugs.squeak.org/view_all_bug_page.php) that are still there and really annoying. -> Grammar/spelling issues in all kinds of texts such as in buttons, menus, help topics, release notes, tutorials (http://wiki.squeak.org/squeak/792) etc. Where should you report the bugs? -> First, make sure you are working on the latest Trunk version! (Squeak > Update) -> Please post any bugs directly on the squeak-dev list. What about SistaV1; is it ready? -> No, it will not be enabled by default in Squeak 5.3. After the release, we plan to immediately switch the regular Trunk from V3 to SistaV1 to do more tests. Please do all tests using the default V3-with-closures bytecode set. Meaning, just use the ones from files.squeak.org as described above. How can I dive into Etoys; where is it? -> It is already available in the form of any morph's tile halo. However, the following code snippet will turn your image into an Etoys station: ReleaseBuilderSqueakland intermediatePrepareForUsers. Preferences disable: #noviceMode; enable: #generalizedYellowButtonMenu; enable: #showAdvancedNavigatorButtons; disable: #eToyFriendly. TheWorldMainDockingBar showWorldMainDockingBar: true. <http://forum.world.st/file/t370078/image3.png> Have fun and thank you all for your support! :-) Best, Marcel -- Sent from: http://forum.world.st/Squeak-Dev-f45488.html

1 0

The Inbox: Morphic-mt.1602.mcz
by commits＠source.squeak.org 05 Dec '19

05 Dec '19

A new version of Morphic was added to project The Inbox: http://source.squeak.org/inbox/Morphic-mt.1602.mcz ==================== Summary ==================== Name: Morphic-mt.1602 Author: mt Time: 5 December 2019, 3:11:57.060176 pm UUID: d86de487-98af-4640-bdc1-3c51bfa4cc06 Ancestors: Morphic-mt.1601 Refine that proposal Morphic-mt.1601: - Let browse-it also browse calls for shared variables. - Let implementors-of-it explore bindings of class pools and shared pools. Note that a class/shared pool is selected if one of the pool's variables is selected. For shared pools, that very pool can be selected, too, through the class definition's "... poolDictionaries: ...". Not sure whether class-pool exploration is usefull because that binding is artificial. Maybe browse the class instead? =============== Diff against Morphic-mt.1601 =============== Item was added: + ----- Method: SmalltalkEditor>>selectedBinding (in category 'selection - bindings') ----- + selectedBinding + "Try to make a binding out of the current text selection. That binding can be a global or class." + + ^ self selectedSymbol ifNotNil: + [ :symbol | + ((model respondsTo: #selectedClassOrMetaClass) + ifTrue: [ model selectedClassOrMetaClass ifNil: [ model environment ] ] + ifFalse: [ model environment ]) ifNotNil: + [ :environment | environment bindingOf: symbol ] ]! Item was added: + ----- Method: SmalltalkEditor>>selectedClassVariable (in category 'selection - bindings') ----- + selectedClassVariable + "Try to make a class-variable binding out of the current text selection." + + ^ self selectedClassVariablePool ifNotNil: + [ :classToPool | + self selectedSymbol ifNotNil: + [ :symbol | classToPool value bindingOf: symbol ] ]! Item was added: + ----- Method: SmalltalkEditor>>selectedClassVariablePool (in category 'selection - bindings') ----- + selectedClassVariablePool + "Try to make an association from a class to its pool out of the current text selection. NOTE THAT this does not return the default class pool if there is a class selected but no symbol. That way, #selectedSharedVariablePool and this one can be used in a similar fashion." + + (model respondsTo: #selectedClass) ifFalse: [ ^ nil ]. + + self flag: #fakeBinding. "mt: This might be confusing in client code..." + + model selectedClass ifNotNil: + [ :currentClass | + self selectedSymbol ifNotNil: + [ :symbol | + currentClass withAllSuperclassesDo: + [ :class | + (class classPool includesKey: symbol) + ifTrue: [ ^ class name -> class classPool ] ] ]. + ^ nil ]. + ^ nil! Item was added: + ----- Method: SmalltalkEditor>>selectedInstanceVariable (in category 'selection - bindings') ----- + selectedInstanceVariable + "Try to make an association from an instance-variable name to the class where this variable is defined. Make the implementation robust for models that do not know about classes. + + Note that inst-var names might not have symbol a representation, only via their accessors." + + (model respondsTo: #selectedClassOrMetaClass) ifFalse: [ ^ nil ]. + + self flag: #fakeBinding. "mt: This might be confusing in client code..." + + ^ self selection string ifNotNil: + [ :token | model selectedClassOrMetaClass ifNotNil: + [ :behavior | + (behavior instVarIndexFor: token ifAbsent: [ 0 ]) ~= 0 + ifTrue: [ token -> behavior ] + ifFalse: [ nil ] ] ]! Item was added: + ----- Method: SmalltalkEditor>>selectedLiteral (in category 'selection') ----- + selectedLiteral + "Try to make a Smalltalk literal out of the current text selection." + + ^ self selection string findLiteral! Item was added: + ----- Method: SmalltalkEditor>>selectedSelector (in category 'selection') ----- + selectedSelector + "Try to make a selector out of the current text selection." + + ^ self selection string findSelector! Item was added: + ----- Method: SmalltalkEditor>>selectedSharedVariable (in category 'selection - bindings') ----- + selectedSharedVariable + "Try to make a pool-variable binding out of the current text selection, which can point to a variable in that pool." + + ^ self selectedSharedVariablePool ifNotNil: + [ :poolBinding | + self selectedSymbol ifNotNil: + [ :symbol | poolBinding value bindingOf: symbol ] ]! Item was added: + ----- Method: SmalltalkEditor>>selectedSharedVariablePool (in category 'selection - bindings') ----- + selectedSharedVariablePool + "Try to make a shared-pool binding out of the current text selection. That selection can either point directly to the pool or into that pool at a variable." + + (model respondsTo: #selectedClass) ifFalse: [ ^ nil ]. + + self selectedSymbol ifNotNil: + [ :symbol | + "Is a shared pool selected?" + (model environment bindingOf: symbol) ifNotNil: [:globalBinding | + ((globalBinding value isKindOf: Dictionary) or: [globalBinding value isKindOf: SharedPool]) + ifTrue: [^ globalBinding]]. + "Is a variable *within* a shared pool?" + ^ model selectedClass ifNotNil: + [ :class | class allSharedPools + detect: [ :pool | (pool bindingOf: symbol) notNil ] + ifFound: [ :pool | (model environment keyAtIdentityValue: pool ifAbsent: []) + ifNotNil: [ :poolName | model environment bindingOf: poolName ] ] ] ].! Item was added: + ----- Method: SmalltalkEditor>>selectedSymbol (in category 'selection') ----- + selectedSymbol + "Try to make a symbol out of the current text selection." + + ^ self selection string findSymbol! Item was changed: ----- Method: TextEditor>>browseIt (in category 'menu messages') ----- browseIt "Launch a browser for the current selection, if appropriate." Preferences alternativeBrowseIt ifTrue: [^ self browseClassFromIt]. self lineSelectAndEmptyCheck: [^ morph flash]. "First, try to show all accesses to instance or class variables." self selectedInstanceVariable ifNotNil: [:nameToClass | self systemNavigation browseAllAccessesTo: nameToClass key from: nameToClass value]. self selectedClassVariable ifNotNil: [:binding | self systemNavigation browseAllCallsOn: binding]. + self selectedSharedVariable ifNotNil: + [:binding | self systemNavigation browseAllCallsOn: binding]. "Then, either browse the class (from a binding) or all implementors of a selector." self selectedBinding ifNotNil: [:binding | ^ self systemNavigation browseClass: binding]. self selectedSelector ifNotNil: [:selector | ^ self systemNavigation browseAllImplementorsOf: selector]. morph flash! Item was changed: ----- Method: TextEditor>>implementorsOfIt (in category 'menu messages') ----- implementorsOfIt "Open an implementors browser on the selected selector or a regular browser if the selection is a class binding." self lineSelectAndEmptyCheck: [^ self]. + self selectedClassVariablePool ifNotNil: + [:binding | ^ binding explore]. "(model environment classNamed: binding key) browse ???" + self selectedSharedVariablePool ifNotNil: + [:binding | ^ binding explore]. - self selectedBinding ifNotNil: - [:binding | ^ self systemNavigation browseClass: binding]. self selectedSelector ifNotNil: [:selector | ^ self systemNavigation browseAllImplementorsOf: selector]. morph flash! Item was removed: - ----- Method: TextEditor>>selectedBinding (in category 'menu messages') ----- - selectedBinding - "Try to make a binding out of the current text selection. That binding can be a global or class." - - ^ self selectedSymbol ifNotNil: - [ :symbol | - ((model respondsTo: #selectedClassOrMetaClass) - ifTrue: [ model selectedClassOrMetaClass ifNil: [ model environment ] ] - ifFalse: [ model environment ]) ifNotNil: - [ :environment | environment bindingOf: symbol ] ]! Item was removed: - ----- Method: TextEditor>>selectedClassVariable (in category 'menu messages') ----- - selectedClassVariable - "Try to make a class-variable binding out of the current text selection." - - (model respondsTo: #selectedClassOrMetaClass) ifFalse: [ ^ nil ]. - - ^ self selectedSymbol ifNotNil: - [ :symbol | model selectedClassOrMetaClass ifNotNil: - [ :classOrMetaClass | (classOrMetaClass theNonMetaClass allClassVarNames includes: symbol) - ifTrue: [ classOrMetaClass bindingOf: symbol ] - ifFalse: [ nil ] ] ]! Item was removed: - ----- Method: TextEditor>>selectedInstanceVariable (in category 'menu messages') ----- - selectedInstanceVariable - "Try to make an association from an instance-variable name to the class where this variable is defined. Make the implementation robust for models that do not know about classes. - - Note that inst-var names might not have symbol a representation, only via their accessors." - - (model respondsTo: #selectedClassOrMetaClass) ifFalse: [ ^ nil ]. - - ^ self selection string ifNotNil: - [ :token | model selectedClassOrMetaClass ifNotNil: - [ :behavior | - (behavior instVarIndexFor: token ifAbsent: [ 0 ]) ~= 0 - ifTrue: [ token -> behavior ] - ifFalse: [ nil ] ] ]! Item was removed: - ----- Method: TextEditor>>selectedLiteral (in category 'menu messages') ----- - selectedLiteral - "Try to make a Smalltalk literal out of the current text selection." - - ^ self selection string findLiteral! Item was removed: - ----- Method: TextEditor>>selectedSelector (in category 'menu messages') ----- - selectedSelector - "Try to make a selector out of the current text selection." - - ^ self selection string findSelector! Item was removed: - ----- Method: TextEditor>>selectedSymbol (in category 'menu messages') ----- - selectedSymbol - "Try to make a symbol out of the current text selection." - - ^ self selection string findSymbol!

1 0

The Trunk: CollectionsTests-mt.329.mcz
by commits＠source.squeak.org 04 Dec '19

04 Dec '19

Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-mt.329.mcz ==================== Summary ==================== Name: CollectionsTests-mt.329 Author: mt Time: 4 December 2019, 4:54:53.803613 pm UUID: 411ab84e-e7e1-4d01-b711-9e1c5aadaef2 Ancestors: CollectionsTests-mt.328 Documents some quirks in RunArray item access. Fails at the moment ... =============== Diff against CollectionsTests-mt.328 =============== Item was added: + ----- Method: RunArrayTest>>testAt2 (in category 'tests - accessing') ----- + testAt2 + "self debug: #testAt2" + | array | + array := RunArray new: 5 withAll: 2. + + self should: [array at: 0] raise: Error. + self should: [array at: 6] raise: Error. + self should: [array at: $b] raise: Error.!

1 0

The Trunk: 60Deprecated-mt.67.mcz
by commits＠source.squeak.org 04 Dec '19

04 Dec '19

Marcel Taeumel uploaded a new version of 60Deprecated to project The Trunk: http://source.squeak.org/trunk/60Deprecated-mt.67.mcz ==================== Summary ==================== Name: 60Deprecated-mt.67 Author: mt Time: 4 December 2019, 3:31:20.194613 pm UUID: f029b4a1-fe78-4997-8ad1-7bef1bf1332a Ancestors: 60Deprecated-mt.66 Complements HelpSystem-Core-mt.118 =============== Diff against 60Deprecated-mt.66 =============== Item was changed: SystemOrganization addCategory: #'60Deprecated-Collections-Streams'! + SystemOrganization addCategory: #'60Deprecated-HelpSystem-Core-Model'! SystemOrganization addCategory: #'60Deprecated-Kernel-Methods'! SystemOrganization addCategory: #'60Deprecated-Morphic-Widgets'! SystemOrganization addCategory: #'60Deprecated-NSPlugin-System-Support'! SystemOrganization addCategory: #'60Deprecated-System-Support'! SystemOrganization addCategory: #'60Deprecated-Tools-Inspector'! SystemOrganization addCategory: #'60Deprecated-Tools-Menus'! Item was added: + HelpTopic subclass: #CodeStyledHelpTopic + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: '60Deprecated-HelpSystem-Core-Model'! + + !CodeStyledHelpTopic commentStamp: 'tpr 6/19/2018 19:27' prior: 0! + A CodeStyledHelpTopic is a simple way to make sure a help topic gets styled for code in a help browser. Once the help browser is able to code-style individual chunks instead of having to brute-force entire pages we can remove this class and simplify thngs! Item was added: + ----- Method: CodeStyledHelpTopic>>usesCodeStyling (in category 'testing') ----- + usesCodeStyling + "do I need a styled (ie with Shout) browser page?" + ^true!

1 0

Jump to page: