Squeak-dev June 2024

squeak-dev@lists.squeakfoundation.org

19 participants
25 discussions

The Inbox: Collections-ct.1070.mcz
by commits＠source.squeak.org 21 Jun '24

21 Jun '24

Christoph Thiede uploaded a new version of Collections to project The Inbox: http://source.squeak.org/inbox/Collections-ct.1070.mcz ==================== Summary ==================== Name: Collections-ct.1070 Author: ct Time: 18 June 2024, 9:30:13.910837 pm UUID: 95d7a3e1-899f-489e-91f1-5511d6c98689 Ancestors: Collections-mt.1069 Proposal for discussion: Adds SequenceableCollection>>every: for getting every n-th element of a collection. I use this for retrieving quick samples from a larger collection during exploration. (1 to: 10) every: 3. "#(1 4 7 10)" =============== Diff against Collections-mt.1069 =============== Item was added: + ----- Method: SequenceableCollection>>every: (in category 'accessing') ----- + every: nth + "Answer every nth element of the receiver." + + ^ (1 to: self size by: nth) + collect: [:index | self at: index] + as: self species!

11 16

Review Request: packageSelfExtensions.1.cs
by christoph.thiede＠student.hpi.uni-potsdam.de 18 Jun '24

18 Jun '24

=============== Summary =============== Change Set: packageSelfExtensions Date: 25 March 2022 Author: Christoph Thiede Revises the notion of extension method so that also extensions to the same package are found. For instance, browsing all extensions of the package 'Etoys' local to the category 'Etoys-Squeakland-MorphicExtras-Charts' will now also bring up the extensions on Player. Fixes #extensionCategoriesForClass:localTo: to also find different casings of the package name in the extension category. Also revises #methodCategoryPrefix to no longer destroy the original casing of the package name. Note that with this change, #extensionMethods and #coreMethods are no longer necessarily disjunct. =============== Diff =============== PackageInfo>>allBehaviors {private} · ct 3/25/2022 15:40 + allBehaviors + + ^ self systemNavigation allBehaviors contents PackageInfo>>extensionCategoriesForClass:localTo: {testing} · ct 3/25/2022 15:55 (changed) extensionCategoriesForClass: aClass localTo: aClassCategory ^ (self extensionCategoriesForClass: aClass) - select: [:ea | ea beginsWith: '*', aClassCategory] + select: [:ea | self category: ea matches: '*' , aClassCategory] PackageInfo>>extensionClasses {listing} · ct 3/25/2022 15:38 (changed) extensionClasses - ^ self externalBehaviors reject: [:classOrTrait | (self extensionCategoriesForClass: classOrTrait) isEmpty] + ^ self allBehaviors reject: [:classOrTrait | (self extensionCategoriesForClass: classOrTrait) isEmpty] PackageInfo>>extensionClassesLocalTo: {listing} · ct 3/25/2022 15:38 (changed) extensionClassesLocalTo: classCategory - ^ self externalBehaviors reject: [:classOrTrait | + ^ self allBehaviors reject: [:classOrTrait | (self extensionCategoriesForClass: classOrTrait localTo: classCategory) isEmpty] PackageInfo>>extensionMethods {listing} · ct 3/25/2022 15:36 (changed) extensionMethods - ^ self externalBehaviors gather: [:classOrTrait | self extensionMethodsForClass: classOrTrait] + ^ self allBehaviors gather: [:classOrTrait | self extensionMethodsForClass: classOrTrait] PackageInfo>>extensionMethodsLocalTo: {listing} · ct 3/25/2022 15:37 (changed) extensionMethodsLocalTo: aClassCategory - ^ self externalBehaviors gather: [:classOrTrait | + ^ self allBehaviors gather: [:classOrTrait | self extensionMethodsForClass: classOrTrait localTo: aClassCategory] PackageInfo>>methodCategoryPrefix {naming} · ct 3/25/2022 15:53 (changed) methodCategoryPrefix - ^ methodCategoryPrefix ifNil: [methodCategoryPrefix := '*', self packageName asLowercase] + ^ methodCategoryPrefix ifNil: [methodCategoryPrefix := '*', self packageName] PackageInfo>>methods {listing} · ct 3/25/2022 16:00 (changed) methods - ^ (self extensionMethods, self coreMethods) select: [:method | + ^ (self extensionMethods, self coreMethods) withoutDuplicates select: [:method | method isValid and: [method isLocalSelector]] ["packageSelfExtensions.1.cs"] --- Sent from Squeak Inbox Talk

3 3

The Trunk: Morphic-ct.2162.mcz
by commits＠source.squeak.org 18 Jun '24

18 Jun '24

Christoph Thiede uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-ct.2162.mcz ==================== Summary ==================== Name: Morphic-ct.2162 Author: ct Time: 16 June 2024, 7:29:34.902776 pm UUID: 7647de77-2692-4f5b-b31d-c211550af6ab Ancestors: Morphic-mt.2161 Fixes stale drop shadow cache when resizing a polyon. =============== Diff against Morphic-mt.2161 =============== Item was changed: ----- Method: PolygonMorph>>computeBounds (in category 'private') ----- computeBounds | oldBounds delta excludeHandles | self flag: #refactor. "mt: Make it lazy like all layout policies in Morph. See #fullBounds and #doLayoutIn:." vertices ifNil: [^ self]. self changed. oldBounds := bounds. self releaseCachedState. bounds := self curveBounds expanded copy. self arrowForms do: [:f | bounds swallow: (f offset extent: f extent)]. handles ifNotNil: [self updateHandles]. "since we are directly updating bounds, see if any ordinary submorphs exist and move them accordingly" (oldBounds notNil and: [(delta := bounds origin - oldBounds origin) ~= (0@0)]) ifTrue: [ excludeHandles := IdentitySet new. handles ifNotNil: [excludeHandles addAll: handles]. self submorphsDo: [ :each | (excludeHandles includes: each) ifFalse: [ each position: each position + delta ]. ]. ]. + self removeProperty: #dropShadow. self layoutChanged. self changed. !

1 0

Code Examples with multiple Hands??
by Jim Rosenberg 17 Jun '24

17 Jun '24

I am the author of artistic content originally deployed in HyperCard in days of yore which I've ported to Squeak, and find that they work really well in SqueakJS. (Thank you, thank you Vanessa!!!) So what happens if I try to run them in the browser in SqueakJS on *Android*? Well, from a technical perspective they work fine, but from an artistic perspective it results in a simply AWFUL experience because: On a touch-screen, interactivity must be operated by placing your fingers between your eyes and the content. This is HORRENDOUS! How many pixels does your finger block the view of? ***A LOT***! So: what I'd like to do is have an area of the screen "outside of the content frame" to use as a virtual trackpad. (I don't suppose somebody has already done this???) The Squeak concept of Hand and the ability to have more than one hand at the same time should make this feasible. Before I spend a lot of effort reinventing the wheel, I'm wondering if there is already some Squeak code out there where the active hand controls a second hand remotely and the "remote hand" operates morphs for events like mouseEnter: etc. with respect to the remote hand rather than the "active hand". -Thanks in advance, Jim

4 5

raycasting in Squeak
by Lauren Pullen 17 Jun '24

17 Jun '24

Hi List, I have been working on a rendering engine for a 1st person maze game, like the kind that powered the old Wolfenstein 3D, and I thought I'd share my experience. In the BitBlt Renderer image, I've done all the rendering by hand, in Squeak. It's being rendered in Standard Definition PAL. In standard it was hard to see where to go, so I changed it to widescreen, but that cost a couple frames per second. There are rough edges on the texture coming from cosine for fisheye correction, as well as a curve. I ran out of wall time to do anything else with the renderer... it ran at 4 frames per second after scaling by the UI scale... and to make it not look like it runs like molasses I didn't tween walking and turning. And then I tried to texture the floor and ceiling and my wall time went from 4 frames per second to 4 seconds per frame because I had to paint a pixel at a time. I'm sure it could have been done faster with WarpBlt, but I had only been able to optimize drawing trapezoids for 0, 90, 180, and 270 degrees and didn't want to lose turning animations. In the GPU Renderer image, I've offloaded rendering onto the graphics card. It was certainly an adventure, because when I started I knew absolutely nothing about hardware rendering except it involves telling the GPU how to paint triangles. While I am upset that it is rendering at a high resolution instead of the chunky, 1990s look I was hoping for, I'll take the gained performance over it. Actually, it runs so fast I can both convert the entire stage to a mesh and upload it every frame and still have wall time left over to do movement animations at 12 frames per second. I'm going to optimize stage loading next using the raycaster, but it performs well enough to use for debugging and as a demo for people at home. So, yes, you can make a 3D game in Squeak. If it runs on my 10 year old laptop where only the onboard graphics card works, I'd say it can be done. Which is great, because I've really been excited about learning Smalltalk and using it to make graphical programs, and what better than writing a game?

7 14

[squeak-smalltalk/squeak-object-memory] Bug: Themes not properly updating in minimized windows (Issue #121)
by Antonia 17 Jun '24

17 Jun '24

When a window like a workspace or a browser is minimized and the Squeak theme is updated, this change is not reflected in these windows -- Reply to this email directly or view it on GitHub: https://github.com/squeak-smalltalk/squeak-object-memory/issues/121 You are receiving this because you are subscribed to this thread. Message ID: <squeak-smalltalk/squeak-object-memory/issues/121(a)github.com>

3 5

Squeak 6.0: Morphic-mt.2034.mcz
by commits＠source.squeak.org 17 Jun '24

17 Jun '24

Marcel Taeumel uploaded a new version of Morphic to project Squeak 6.0: http://source.squeak.org/squeak60/Morphic-mt.2034.mcz ==================== Summary ==================== Name: Morphic-mt.2034 Author: mt Time: 17 June 2024, 3:18:57.007843 pm UUID: 401aeffa-4fff-834e-b75b-52135da9b04f Ancestors: Morphic-mt.2033 Backport fix from 6.1alpha, so that now collapsed windows are updated when expanded with the current UI theme. =============== Diff against Morphic-mt.2033 =============== Item was changed: ----- Method: SystemWindow>>collapseOrExpand (in category 'resize/collapse') ----- collapseOrExpand "Collapse or expand the window, depending on existing state" | cf | isCollapsed ifTrue: ["Expand -- restore panes to morphics structure" isCollapsed := false. self beKeyWindow. "Bring to frint first" Preferences collapseWindowsInPlace ifTrue: [fullFrame := fullFrame align: fullFrame topLeft with: self getBoundsWithFlex topLeft] ifFalse: [collapsedFrame := self getBoundsWithFlex]. collapseBox ifNotNil: [collapseBox setBalloonText: 'collapse this window' translated]. self setBoundsWithFlex: fullFrame. paneMorphs reverseDo: [:m | self addMorph: m unlock. self world startSteppingSubmorphsOf: m]. self addPaneSplitters. self addGrips. (self hasProperty: #applyTheme) ifTrue: [ self removeProperty: #applyTheme. + UserInterfaceTheme current applyTo: self allMorphs]] - self userInterfaceTheme applyTo: self allMorphs]] ifFalse: ["Collapse -- remove panes from morphics structure" isCollapsed := true. fullFrame := self getBoundsWithFlex. "First save latest fullFrame" paneMorphs do: [:m | m delete; releaseCachedState]. self removePaneSplitters. self removeGrips. model modelSleep. cf := self getCollapsedFrame. (collapsedFrame isNil and: [Preferences collapseWindowsInPlace not]) ifTrue: [collapsedFrame := cf]. self setBoundsWithFlex: cf. collapseBox ifNotNil: [collapseBox setBalloonText: 'expand this window' translated ]. expandBox ifNotNil: [expandBox setBalloonText: 'expand this window' translated ]. self sendToBack]. self layoutChanged!

1 0

The Inbox: Morphic-ct.2162.mcz
by commits＠source.squeak.org 17 Jun '24

17 Jun '24

Christoph Thiede uploaded a new version of Morphic to project The Inbox: http://source.squeak.org/inbox/Morphic-ct.2162.mcz ==================== Summary ==================== Name: Morphic-ct.2162 Author: ct Time: 16 June 2024, 7:29:34.902776 pm UUID: 7647de77-2692-4f5b-b31d-c211550af6ab Ancestors: Morphic-mt.2161 Fixes stale drop shadow cache when resizing a polyon. =============== Diff against Morphic-mt.2161 =============== Item was changed: ----- Method: PolygonMorph>>computeBounds (in category 'private') ----- computeBounds | oldBounds delta excludeHandles | self flag: #refactor. "mt: Make it lazy like all layout policies in Morph. See #fullBounds and #doLayoutIn:." vertices ifNil: [^ self]. self changed. oldBounds := bounds. self releaseCachedState. bounds := self curveBounds expanded copy. self arrowForms do: [:f | bounds swallow: (f offset extent: f extent)]. handles ifNotNil: [self updateHandles]. "since we are directly updating bounds, see if any ordinary submorphs exist and move them accordingly" (oldBounds notNil and: [(delta := bounds origin - oldBounds origin) ~= (0@0)]) ifTrue: [ excludeHandles := IdentitySet new. handles ifNotNil: [excludeHandles addAll: handles]. self submorphsDo: [ :each | (excludeHandles includes: each) ifFalse: [ each position: each position + delta ]. ]. ]. + self removeProperty: #dropShadow. self layoutChanged. self changed. !

3 2

Squeak 6.0: Morphic-mt.2033.mcz
by commits＠source.squeak.org 17 Jun '24

17 Jun '24

Marcel Taeumel uploaded a new version of Morphic to project Squeak 6.0: http://source.squeak.org/squeak60/Morphic-mt.2033.mcz ==================== Summary ==================== Name: Morphic-mt.2033 Author: mt Time: 17 June 2024, 3:08:28.676924 pm UUID: 8f0963a1-d486-eb43-8e85-c1da8ae296da Ancestors: Morphic-mt.2032 Improves support for drop-shadows in polygon morphs. It's still only rectangular, but at least no invalidates correctly when the polygon changes. Thanks to Christoph (ct) for the hint and fix! =============== Diff against Morphic-mt.2032 =============== Item was changed: ----- Method: PolygonMorph>>computeBounds (in category 'private') ----- computeBounds | oldBounds delta excludeHandles | self flag: #refactor. "mt: Make it lazy like all layout policies in Morph. See #fullBounds and #doLayoutIn:." vertices ifNil: [^ self]. self changed. oldBounds := bounds. self releaseCachedState. bounds := self curveBounds expanded copy. self arrowForms do: [:f | bounds swallow: (f offset extent: f extent)]. handles ifNotNil: [self updateHandles]. "since we are directly updating bounds, see if any ordinary submorphs exist and move them accordingly" (oldBounds notNil and: [(delta := bounds origin - oldBounds origin) ~= (0@0)]) ifTrue: [ excludeHandles := IdentitySet new. handles ifNotNil: [excludeHandles addAll: handles]. self submorphsDo: [ :each | (excludeHandles includes: each) ifFalse: [ each position: each position + delta ]. ]. ]. + self removeProperty: #dropShadow. self layoutChanged. self changed. !

1 0

The Trunk: SUnitGUI-mt.94.mcz
by commits＠source.squeak.org 17 Jun '24

17 Jun '24

Marcel Taeumel uploaded a new version of SUnitGUI to project The Trunk: http://source.squeak.org/trunk/SUnitGUI-mt.94.mcz ==================== Summary ==================== Name: SUnitGUI-mt.94 Author: mt Time: 17 June 2024, 2:38:46.583923 pm UUID: ef9fd219-2fa3-bb4c-a3ef-409239535573 Ancestors: SUnitGUI-tpr.93 Fixes quite old regression/bug in the calculation of test coverage using exclusion rules. For classes, #methods answers a reader object and not something that understands #do:. So we must use #methodsDo: directly. =============== Diff against SUnitGUI-tpr.93 =============== Item was changed: ----- Method: TestRunner>>excludeClassesNotUnderTestFrom: (in category 'actions') ----- excludeClassesNotUnderTestFrom: methods classesSelected do: [ :class | (class class includesSelector: #classNamesNotUnderTest) ifTrue: [ class classNamesNotUnderTest do: [ :className | | theClass | theClass := Smalltalk classNamed: className. theClass ifNotNil:[ + theClass methodsDo: - theClass methods do: [ :each | methods remove: each methodReference ifAbsent: [ ] ]. + theClass class methodsDo: - theClass class methods do: [ :each | methods remove: each methodReference ifAbsent: [ ] ]] ] ] ]!

1 0