Squeak-dev September 2023

squeak-dev@lists.squeakfoundation.org

27 participants
82 discussions

Community Aerostat Defense A.I. C4ISR
by rabbit 22 Sep '23

22 Sep '23

Hey all'y'all, I wish to bring up my suggestion for a foundational objective in building out Squeak. We have drones, A.I., VM engines, networking. With distributed events, and integrated Metaverse video ingestion and integration, we could have community folk monitor upon event trigger of various types. Emergency response with non-lethal capability (gas, rubber bullets, flash bangs). With swarming, you gain corralling and such collaborative applications of observation and force. And so, I would like to go deep throughout a Battlespace Swarm A.I. aerostat community defense barrier design and requirements. A plan and a voice of commitment would be super-stellar. We’re just getting warmed up, these past 43 years, the perfect number. There was a rounding error, 42 is off by one. 🙏🏻🤲 ••• We could call it Plop. Criminals get scared. Don’t get Plopped, yo. It’ll fuck ya up. For real for real. For days. You can’t get away from them and they just be watching. Don’t trigger a kick! Answer all their questions in truth. Or you’ll get catch a downgrade. A Judicial is worse than a Neighbor tag. However, F*ckin’ downvotes suck. It’s a new conversation, now. Alright then, stump -- ••• rabbit ❤️‍🔥🐰

1 1

Squeak 6.0: Morphic-mt.2030.mcz
by commits＠source.squeak.org 22 Sep '23

22 Sep '23

Marcel Taeumel uploaded a new version of Morphic to project Squeak 6.0: http://source.squeak.org/squeak60/Morphic-mt.2030.mcz ==================== Summary ==================== Name: Morphic-mt.2030 Author: mt Time: 22 September 2023, 2:10:10.065389 pm UUID: b61f285f-ed62-954e-b971-e73d403526ae Ancestors: Morphic-mt.2029 Fixes another visual regression from Morphic-mt.2028 =============== Diff against Morphic-mt.2029 =============== Item was changed: ----- Method: PluggableTextMorph>>drawFrameAdornment:on: (in category 'drawing') ----- drawFrameAdornment: aColor on: aCanvas "Indicate edit status for the text editor" self class simpleFrameAdornments ifTrue: [ | adornmentWidth | adornmentWidth := ((self valueOfProperty: #frameAdornmentWidth ifAbsent: [1]) * RealEstateAgent scaleFactor) truncated. aCanvas + frameRectangle: self scroller bounds - frameRectangle: self innerBounds width: adornmentWidth color: aColor. aCanvas + frameRectangle: (self scroller bounds insetBy: adornmentWidth) - frameRectangle: (self innerBounds insetBy: adornmentWidth) width: adornmentWidth color: (aColor alpha: aColor alpha / 3.0) ] ifFalse: [ | form | "Class-side adornment cache is currently using pre-multiplied alpha, so we need to use rule 34 which works for < 32bpp, too." form := self class adornmentWithColor: aColor. aCanvas image: form + at: self scroller bounds topRight - (form width @ 0) - at: self innerBounds topRight - (form width @ 0) sourceRect: form boundingBox rule: 34 ]!

1 0

The Trunk: Morphic-mt.2131.mcz
by commits＠source.squeak.org 22 Sep '23

22 Sep '23

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.2131.mcz ==================== Summary ==================== Name: Morphic-mt.2131 Author: mt Time: 22 September 2023, 1:55:23.04797 pm UUID: 994a8dfe-6363-9440-a320-07e398585048 Ancestors: Morphic-mt.2130 Speaking of rabbit holes ... fixes another visual regression from Morphic-mt.2129. =============== Diff against Morphic-mt.2130 =============== Item was changed: ----- Method: PluggableTextMorph>>drawFrameAdornment:on: (in category 'drawing') ----- drawFrameAdornment: aColor on: aCanvas "Indicate edit status for the text editor" self class simpleFrameAdornments ifTrue: [ | adornmentWidth | adornmentWidth := (self valueOfProperty: #frameAdornmentWidth ifAbsent: [1]) px. aCanvas + frameRectangle: self scroller bounds - frameRectangle: self innerBounds width: adornmentWidth color: aColor. aCanvas + frameRectangle: (self scroller bounds insetBy: adornmentWidth) - frameRectangle: (self innerBounds insetBy: adornmentWidth) width: adornmentWidth color: (aColor alpha: aColor alpha / 3.0) ] ifFalse: [ | form | "Class-side adornment cache is currently using pre-multiplied alpha, so we need to use rule 34 which works for < 32bpp, too." form := self class adornmentWithColor: aColor. aCanvas image: form + at: self scroller bounds topRight - (form width @ 0) - at: self innerBounds topRight - (form width @ 0) sourceRect: form boundingBox rule: 34 ]!

1 0

The Inbox: Sound-mad.90.mcz
by commits＠source.squeak.org 22 Sep '23

22 Sep '23

A new version of Sound was added to project The Inbox: http://source.squeak.org/inbox/Sound-mad.90.mcz ==================== Summary ==================== Name: Sound-mad.90 Author: mad Time: 22 September 2023, 1:54:04.433028 pm UUID: 903c4996-a9b8-46a7-b794-a8a1e04f41b4 Ancestors: Sound-mt.89 Ports fix of storeSampleCount:bigEndian:on: from AbstractSound (by ct) to SampledSound. =============== Diff against Sound-mt.89 =============== Item was added: + ----- Method: SampledSound>>storeSampleCount:bigEndian:on: (in category 'file i/o') ----- + storeSampleCount: samplesToStore bigEndian: bigEndianFlag on: aBinaryStream + "Store my samples on the given stream at the current SoundPlayer sampling rate. If bigFlag is true, then each 16-bit sample is stored most-significant byte first (AIFF files), otherwise it is stored least-significant byte first (WAV files)." + + | streamDirect reverseBytes | + self samplingRate ~= originalSamplingRate ifTrue: [ + ^ super storeSampleCount: samplesToStore bigEndian: bigEndianFlag on: aBinaryStream]. + + "optimization: if sampling rates match, just store my buffer" + streamDirect := aBinaryStream isKindOf: StandardFileStream. + reverseBytes := (bigEndianFlag xor: Smalltalk isBigEndian) xor: streamDirect not. + reverseBytes ifTrue: [samples reverseEndianness]. + streamDirect + ifTrue: [ "optimization for files: write sound buffer directly to file" + aBinaryStream next: (samples size // 2) putAll: samples startingAt: 1] "size in words" + ifFalse: [ "for non-file streams:" + 1 to: samples monoSampleCount do: [:i | aBinaryStream int16: (samples at: i)]]. + reverseBytes ifTrue: [samples reverseEndianness]. "restore to original endianness" + !

1 0

The Trunk: Chronology-Core-mt.88.mcz
by commits＠source.squeak.org 22 Sep '23

22 Sep '23

Marcel Taeumel uploaded a new version of Chronology-Core to project The Trunk: http://source.squeak.org/trunk/Chronology-Core-mt.88.mcz ==================== Summary ==================== Name: Chronology-Core-mt.88 Author: mt Time: 22 September 2023, 1:26:16.55597 pm UUID: 7d6e55e7-b734-8d47-8591-8b9a291cebf2 Ancestors: Chronology-Core-mt.87 Fix for backwards compatibility. =============== Diff against Chronology-Core-mt.87 =============== Item was added: + ----- Method: TimeZone class>>offset:name:abbreviation: (in category 'instance creation') ----- + offset: aDuration name: aName abbreviation: anAbbreviation + "Backwards compatibility." + + ^ FixedTimeZone offset: aDuration name: aName abbreviation: anAbbreviation!

1 0

Noticeable GC load for ifEmpty:ifNotEmpty:?
by Marcel Taeumel 21 Sep '23

21 Sep '23

Hi all -- [ #() isEmpty ifTrue: ['hallo'] ifFalse: ['squeak'] ] bench '127,000,000 per second. 7.85 nanoseconds per run. 0 % GC time.' [ #() ifEmpty: ['hallo'] ifNotEmpty: ['squeak'] ] bench 7,580,000 per second. 132 nanoseconds per run. 78.0088 % GC time.' Why is that? :-) Why is there an extra GC? Here is the current implementation of #ifEmpty:ifNotEmpty: ifEmpty: emptyBlock ifNotEmpty: notEmptyBlock self isEmpty ifTrue: [^ emptyBlock value]. ^ notEmptyBlock cull: self Best, Marcel

4 5

Squeak 6.0: Morphic-mt.2029.mcz
by commits＠source.squeak.org 20 Sep '23

20 Sep '23

Marcel Taeumel uploaded a new version of Morphic to project Squeak 6.0: http://source.squeak.org/squeak60/Morphic-mt.2029.mcz ==================== Summary ==================== Name: Morphic-mt.2029 Author: mt Time: 20 September 2023, 11:13:26.173909 am UUID: a7729933-da7a-a741-b20e-c9995561c4ab Ancestors: Morphic-mt.2028 Fixes minor visual regression from Morphic-mt.2028 where the scrollpane's #layoutInset was to set as expected. =============== Diff against Morphic-mt.2028 =============== Item was changed: ----- Method: ScrollPane>>newScrollerBounds (in category 'layout') ----- newScrollerBounds "Answer the new bounds for the receiver's scrolling area. Should be called after a #layoutChanged." | inner bottomOffset leftOffset rightOffset | (retractableScrollBar or: [self vIsScrollbarShowing not]) ifTrue: [leftOffset := rightOffset := 0] ifFalse: [ scrollBarOnLeft ifTrue: [ leftOffset := self scrollBarThickness - self borderWidth. rightOffset := 0.] ifFalse: [ leftOffset := 0. rightOffset := self scrollBarThickness - self borderWidth]]. (retractableScrollBar or: [self hIsScrollbarShowing not]) ifTrue: [bottomOffset := 0] ifFalse: [bottomOffset := self scrollBarThickness - self borderWidth]. + self flag: #todo. "mt: Make layoutInset appear outside all scrollbars, not just the scroller." + inner := self layoutBounds. - inner := self innerBounds. ^ (inner left + leftOffset) @ (inner top "+ topOffset") corner: (inner right - rightOffset) @ (inner bottom - bottomOffset)!

1 0

The Trunk: Morphic-mt.2130.mcz
by commits＠source.squeak.org 20 Sep '23

20 Sep '23

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.2130.mcz ==================== Summary ==================== Name: Morphic-mt.2130 Author: mt Time: 20 September 2023, 11:11:17.704242 am UUID: 0657f2ee-97b1-3749-bfed-14df20f5379c Ancestors: Morphic-mt.2129 Fixes minor visual regression from Morphic-mt.2129 where the scrollpane's #layoutInset was to set as expected. =============== Diff against Morphic-mt.2129 =============== Item was changed: ----- Method: ScrollPane>>newScrollerBounds (in category 'layout') ----- newScrollerBounds "Answer the new bounds for the receiver's scrolling area. Should be called after a #layoutChanged." | inner bottomOffset leftOffset rightOffset | (retractableScrollBar or: [self vIsScrollbarShowing not]) ifTrue: [leftOffset := rightOffset := 0] ifFalse: [ scrollBarOnLeft ifTrue: [ leftOffset := self scrollBarThickness - self borderWidth. rightOffset := 0.] ifFalse: [ leftOffset := 0. rightOffset := self scrollBarThickness - self borderWidth]]. (retractableScrollBar or: [self hIsScrollbarShowing not]) ifTrue: [bottomOffset := 0] ifFalse: [bottomOffset := self scrollBarThickness - self borderWidth]. + self flag: #todo. "mt: Make layoutInset appear outside all scrollbars, not just the scroller." + inner := self layoutBounds. - inner := self innerBounds. ^ (inner left + leftOffset) @ (inner top "+ topOffset") corner: (inner right - rightOffset) @ (inner bottom - bottomOffset)!

1 0

UTF-16 to UTF-8
by Javier Diaz-Reinoso 20 Sep '23

20 Sep '23

What's the way to convert a ByteArray with UTF-16 big endian data to a UTF-8 string? Thanks

2 4

Tokenish a class that does nothing with no comment!
by gettimothy 19 Sep '23

19 Sep '23

Hi folks. I am trying to figure out how to separate some words in a string 'complexgrammar' so I can print Complex Grammar. looking for solutions, I find Tokenish, a class that does nothing with no comment. I think it may be a former colleague of mine.

4 9

← Newer
1
2
3
4
5
6
7
8
9
Older →