Squeak-dev February 2021

squeak-dev@lists.squeakfoundation.org

33 participants
196 discussions

UK Smalltalk User Group meeting - Wednesday February 24th
by Giovanni Corriga 07 Feb '21

07 Feb '21

The next meeting of the UK Smalltalk User Group will be on Wednesday, February 24th. Christian Haider will guide us in a tour of the Amber dialect of Smalltalk and its Silk web framework. In his own words... Amber [1], created by Nicolas Petton, is a Smalltalk implemented in JavaScript running in a web browser. Silk [2], written by the Amber maintainer Herby Vojčík, is a web framework in Amber. I was looking for a good solution for the web for a long time. At the last ESUG, I was bugging everybody about a Smalltalk in the browser, because I decided to redo the frontend of my current project [3] in Smalltalk instead of JavaScript. There were some developments, but only Amber was available. So I tried it for real on a little side project [4] to see if this route is viable - spoiler: it is! Silk, the web framework, caught my attention and I fell in love with it. Silk is very simple, straight forward and powerful, just the properties I love Smalltalk for. A Silk is basically a facade for a DOM node in the browser allowing the programmer to build up and manipulate the DOM in a direct way. Silk is so easy and intuitive that it never stood in the way and just worked. So, I could just concentrate on the complexities of the web (and the app). In this presentation I will walk you through the setup, show you the Amber tools and explore what you can do with Silk. I will try to justify my enthusiasm and appreciation for Silk :-). About me: My name is Christian Haider [5] and I use Smalltalk since the mid-90s. Fortunately, I earn my living with Smalltalk and use it on a daily bases (mostly VisualWorks). I like programming UIs and graphics. My largest open source contribution is a PDF library [6], the most significant one is Values [7]. [1] https://amber-lang.net/ [2] https://smalltalkrenaissance.wordpress.com/2015/06/29/silk-is-just-too-flex… [3] https://unsere-gelder.de/ (in German) [4] https://covidcrt.uber.space/ (sources at https://github.com/ChristianHaider/CoViD19UI) [5] https://christianhaider.de/ (in German) [6] https://wiki.pdftalk.de/doku.php [7] https://wiki.pdftalk.de/doku.php?id=complexvalues Given the current COVID-19 restrictions, this will be an online meeting from home. If you'd like to join us, please sign up in advance on the meeting's Meetup page ( https://www.meetup.com/UKSTUG/events/cbklbryccdbgc/ ) to receive the meeting details. Don’t forget to bring your laptop and drinks! * <https://www.blogger.com/#>*

1 0

interesting slowness (not important, just an FYI)
by gettimothy 07 Feb '21

07 Feb '21

Hi Folks. I am in the process of verifying what Unifont stuff appears in squeak/xterm and in web on Brave (chromium) / Edge (runs on Linux now) per: http://menmachinesmaterials.com/UnicodeRangeBrowser Ok, on the Squeak side, I am doing a mass Do on the following: (16r000020 asCharacter to:16r00007F asCharacter) editWithLabel:'Basic Latin'. (16r0000A0 asCharacter to:16r0000FF asCharacter) editWithLabel:'Latin-1 Supplement'. (16r000100 asCharacter to:16r00017F asCharacter) editWithLabel:'Latin Extended-A'. (16r000180 asCharacter to:16r00024F asCharacter) editWithLabel:'Latin Extended-B'. (16r000250 asCharacter to:16r0002AF asCharacter) editWithLabel:'IPA Extensions'. (16r0002B0 asCharacter to:16r0002FF asCharacter) editWithLabel:'Spacing Modifier Letters'. (16r000300 asCharacter to:16r00036F asCharacter) editWithLabel:'Combining Diacritical Marks'. (16r000370 asCharacter to:16r0003FF asCharacter) editWithLabel:'Greek and Coptic'. (16r000400 asCharacter to:16r0004FF asCharacter) editWithLabel:'Cyrillic'. (16r000500 asCharacter to:16r00052F asCharacter) editWithLabel:'Cyrillic Supplementary'. (16r000530 asCharacter to:16r00058F asCharacter) editWithLabel:'Armenian'. (16r000590 asCharacter to:16r0005FF asCharacter) editWithLabel:'Hebrew' . (16r000600 asCharacter to:16r0006FF asCharacter) editWithLabel:'Arabic' . (16r000700 asCharacter to:16r00074F asCharacter) editWithLabel:'Syriac' . (16r000780 asCharacter to:16r0007BF asCharacter) editWithLabel:'Thaana' . (16r000900 asCharacter to:16r00097F asCharacter) editWithLabel:'Devanagari'. (16r000980 asCharacter to:16r0009FF asCharacter) editWithLabel:'Bengali'. (16r000A00 asCharacter to:16r000A7F asCharacter) editWithLabel:'Gurmukhi'. (16r000A80 asCharacter to:16r000AFF asCharacter) editWithLabel:'Gujarati'. (16r000B00 asCharacter to:16r000B7F asCharacter) editWithLabel:'Oriya'. (16r000B80 asCharacter to:16r000BFF asCharacter) editWithLabel:'Tamil'. (16r000C00 asCharacter to:16r000C7F asCharacter) editWithLabel:'Telugu'. (16r000C80 asCharacter to:16r000CFF asCharacter) editWithLabel:'Kannada'. (16r000D00 asCharacter to:16r000D7F asCharacter) editWithLabel:'Malayalam'. (16r000D80 asCharacter to:16r000DFF asCharacter) editWithLabel:'Sinhala'. (16r000E00 asCharacter to:16r000E7F asCharacter) editWithLabel:'Thai'. (16r000E80 asCharacter to:16r000EFF asCharacter) editWithLabel:'Lao'. (16r000F00 asCharacter to:16r000FFF asCharacter) editWithLabel:'Tibetan'. (16r001000 asCharacter to:16r00109F asCharacter) editWithLabel:'Myanmar'. (16r0010A0 asCharacter to:16r0010FF asCharacter) editWithLabel:'Georgian'. (16r001100 asCharacter to:16r0011FF asCharacter) editWithLabel:'Hangul Jamo'. (16r001200 asCharacter to:16r00137F asCharacter) editWithLabel:'Ethiopic'. (16r0013A0 asCharacter to:16r0013FF asCharacter) editWithLabel:'Cherokee'. (16r001400 asCharacter to:16r00167F asCharacter) editWithLabel:'Unified Canadian Aboriginal Syllabics'. (16r001680 asCharacter to:16r00169F asCharacter) editWithLabel:'Ogham'. (16r0016A0 asCharacter to:16r0016FF asCharacter) editWithLabel:'Runic'. (16r001700 asCharacter to:16r00171F asCharacter) editWithLabel:'Tagalog'. (16r001720 asCharacter to:16r00173F asCharacter) editWithLabel:'Hanunoo'. (16r001740 asCharacter to:16r00175F asCharacter) editWithLabel:'Buhid'. (16r001760 asCharacter to:16r00177F asCharacter) editWithLabel:'Tagbanwa'. (16r001780 asCharacter to:16r0017FF asCharacter) editWithLabel:'Khmer'. (16r001800 asCharacter to:16r0018AF asCharacter) editWithLabel:'Mongolian'. (16r001900 asCharacter to:16r00194F asCharacter) editWithLabel:'Limbu'. (16r001950 asCharacter to:16r00197F asCharacter) editWithLabel:'Tai Le'. (16r0019E0 asCharacter to:16r0019FF asCharacter) editWithLabel:'Khmer Symbols'. (16r001D00 asCharacter to:16r001D7F asCharacter) editWithLabel:'Phonetic Extensions'. (16r001E00 asCharacter to:16r001EFF asCharacter) editWithLabel:'Latin Extended Additional'. (16r001F00 asCharacter to:16r001FFF asCharacter) editWithLabel:'Greek Extended'. (16r002000 asCharacter to:16r00206F asCharacter) editWithLabel:'General Punctuation'. (16r002070 asCharacter to:16r00209F asCharacter) editWithLabel:'Superscripts and Subscripts'. (16r0020A0 asCharacter to:16r0020CF asCharacter) editWithLabel:'Currency Symbols'. (16r0020D0 asCharacter to:16r0020FF asCharacter) editWithLabel:'Combining Diacritical Marks for Symbols'. (16r002100 asCharacter to:16r00214F asCharacter) editWithLabel:'Letterlike Symbols'. (16r002150 asCharacter to:16r00218F asCharacter) editWithLabel:'Number Forms'. (16r002190 asCharacter to:16r0021FF asCharacter) editWithLabel:'Arrows'. (16r002200 asCharacter to:16r0022FF asCharacter) editWithLabel:'Mathematical Operators'. (16r002300 asCharacter to:16r0023FF asCharacter) editWithLabel:'Miscellaneous Technical'. (16r002400 asCharacter to:16r00243F asCharacter) editWithLabel:'Control Pictures'. (16r002440 asCharacter to:16r00245F asCharacter) editWithLabel:'Optical Character Recognition'. (16r002460 asCharacter to:16r0024FF asCharacter) editWithLabel:'Enclosed Alphanumerics'. (16r002500 asCharacter to:16r00257F asCharacter) editWithLabel:'Box Drawing'. (16r002580 asCharacter to:16r00259F asCharacter) editWithLabel:'Block Elements'. (16r0025A0 asCharacter to:16r0025FF asCharacter) editWithLabel:'Geometric Shapes'. (16r002600 asCharacter to:16r0026FF asCharacter) editWithLabel:'Miscellaneous Symbols'. (16r002700 asCharacter to:16r0027BF asCharacter) editWithLabel:'Dingbats'. (16r0027C0 asCharacter to:16r0027EF asCharacter) editWithLabel:'Miscellaneous Mathematical Symbols-A'. (16r0027F0 asCharacter to:16r0027FF asCharacter) editWithLabel:'Supplemental Arrows-A'. (16r002800 asCharacter to:16r0028FF asCharacter) editWithLabel:'Braille Patterns'. (16r002900 asCharacter to:16r00297F asCharacter) editWithLabel:'Supplemental Arrows-B'. (16r002980 asCharacter to:16r0029FF asCharacter) editWithLabel:'Miscellaneous Mathematical Symbols-B'. (16r002A00 asCharacter to:16r002AFF asCharacter) editWithLabel:'Supplemental Mathematical Operators'. (16r002B00 asCharacter to:16r002BFF asCharacter) editWithLabel:'Miscellaneous Symbols and Arrows'. (16r002E80 asCharacter to:16r002EFF asCharacter) editWithLabel:'CJK Radicals Supplement'. (16r002F00 asCharacter to:16r002FDF asCharacter) editWithLabel:'Kangxi Radicals'. (16r002FF0 asCharacter to:16r002FFF asCharacter) editWithLabel:'Ideographic Description Characters'. (16r003000 asCharacter to:16r00303F asCharacter) editWithLabel:'CJK Symbols and Punctuation'. (16r003040 asCharacter to:16r00309F asCharacter) editWithLabel:'Hiragana'. (16r0030A0 asCharacter to:16r0030FF asCharacter) editWithLabel:'Katakana'. (16r003100 asCharacter to:16r00312F asCharacter) editWithLabel:'Bopomofo'. (16r003130 asCharacter to:16r00318F asCharacter) editWithLabel:'Hangul Compatibility Jamo'. (16r003190 asCharacter to:16r00319F asCharacter) editWithLabel:'Kanbun'. (16r0031A0 asCharacter to:16r0031BF asCharacter) editWithLabel:'Bopomofo Extended'. (16r0031F0 asCharacter to:16r0031FF asCharacter) editWithLabel:'Katakana Phonetic Extensions'. (16r003200 asCharacter to:16r0032FF asCharacter) editWithLabel:'Enclosed CJK Letters and Months'. (16r003300 asCharacter to:16r0033FF asCharacter) editWithLabel:'CJK Compatibility'. (16r003400 asCharacter to:16r004DBF asCharacter) editWithLabel:'CJK Unified Ideographs Extension A'. (16r004DC0 asCharacter to:16r004DFF asCharacter) editWithLabel:'Yijing Hexagram Symbols'. (16r004E00 asCharacter to:16r009FFF asCharacter) editWithLabel:'CJK Unified Ideographs'. (16r00A000 asCharacter to:16r00A48F asCharacter) editWithLabel:'Yi Syllables'. (16r00A490 asCharacter to:16r00A4CF asCharacter) editWithLabel:'Yi Radicals'. (16r00AC00 asCharacter to:16r00D7AF asCharacter) editWithLabel:'Hangul Syllables'. (16r00D800 asCharacter to:16r00DB7F asCharacter) editWithLabel:'High Surrogates'. (16r00DB80 asCharacter to:16r00DBFF asCharacter) editWithLabel:'High Private Use Surrogates'. (16r00DC00 asCharacter to:16r00DFFF asCharacter) editWithLabel:'Low Surrogates'. (16r00E000 asCharacter to:16r00F8FF asCharacter) editWithLabel:'Private Use Area'. (16r00F900 asCharacter to:16r00FAFF asCharacter) editWithLabel:'CJK Compatibility Ideographs'. (16r00FB00 asCharacter to:16r00FB4F asCharacter) editWithLabel:'Alphabetic Presentation Forms'. (16r00FB50 asCharacter to:16r00FDFF asCharacter) editWithLabel:'Arabic Presentation Forms-A'. (16r00FE00 asCharacter to:16r00FE0F asCharacter) editWithLabel:'Variation Selectors'. (16r00FE20 asCharacter to:16r00FE2F asCharacter) editWithLabel:'Combining Half Marks'. (16r00FE30 asCharacter to:16r00FE4F asCharacter) editWithLabel:'CJK Compatibility Forms'. (16r00FE50 asCharacter to:16r00FE6F asCharacter) editWithLabel:'Small Form Variants'. (16r00FE70 asCharacter to:16r00FEFF asCharacter) editWithLabel:'Arabic Presentation Forms-B'. (16r00FF00 asCharacter to:16r00FFEF asCharacter) editWithLabel:'Halfwidth and Fullwidth Forms'. (16r00FFF0 asCharacter to:16r00FFFF asCharacter) editWithLabel:'Specials'. (16r010000 asCharacter to:16r01007F asCharacter) editWithLabel:'Linear B Syllabary'. (16r010080 asCharacter to:16r0100FF asCharacter) editWithLabel:'Linear B Ideograms'. (16r010100 asCharacter to:16r01013F asCharacter) editWithLabel:'Aegean Numbers'. (16r010300 asCharacter to:16r01032F asCharacter) editWithLabel:'Old Italic'. (16r010330 asCharacter to:16r01034F asCharacter) editWithLabel:'Gothic'. (16r010380 asCharacter to:16r01039F asCharacter) editWithLabel:'Ugaritic'. (16r010400 asCharacter to:16r01044F asCharacter) editWithLabel:'Deseret'. (16r010450 asCharacter to:16r01047F asCharacter) editWithLabel:'Shavian'. (16r010480 asCharacter to:16r0104AF asCharacter) editWithLabel:'Osmanya'. (16r010800 asCharacter to:16r01083F asCharacter) editWithLabel:'Cypriot Syllabary'. (16r01D000 asCharacter to:16r01D0FF asCharacter) editWithLabel:'Byzantine Musical Symbols'. (16r01D100 asCharacter to:16r01D1FF asCharacter) editWithLabel:'Musical Symbols'. (16r01D300 asCharacter to:16r01D35F asCharacter) editWithLabel:'Tai Xuan Jing Symbols'. (16r01D400 asCharacter to:16r01D7FF asCharacter) editWithLabel:'Mathematical Alphanumeric Symbols'. (16r020000 asCharacter to:16r02A6DF asCharacter) editWithLabel:'CJK Unified Ideographs Extension B'. (16r02F800 asCharacter to:16r02FA1F asCharacter) editWithLabel:'CJK Compatibility Ideographs Supplement'. (16r0E0000 asCharacter to:16r0E007F asCharacter) editWithLabel:'Tags'. When I do it en-masse, Squeak slows to a crawl. I am going to give it a few hours to see what happens...Workspaces are starting to appear. The limited number of individual doits work as fast as always. just a heads up, nothing to get concerned about. cordially, t

3 9

SharedQueue bug in #nextOrNilSuchThat
by Jaromir 06 Feb '21

06 Feb '21

Test for SharedQueue >> nextOrNilSuchThat fails due to incorrect implementation of #nextOrNilSuchThat - I at least assume the semantics should be the same as for SharedQueue2 and satisfy the test (i.e. pick one item, leave the rest be). I propose this correction to #nextOrNilSuchThat (the original one skipped AND DISCARDED all items before the item found): nextOrNilSuchThat: aBlock "Answer the next object that satisfies aBlock, skipping any intermediate objects. If no object has been sent, answer <nil> and leave me intact. NOTA BENE: aBlock MUST NOT contain a non-local return (^)." ^accessProtect critical: [ | value readPos | value := nil. readPos := readPosition. [ readPos < writePosition and: [ value isNil ] ] whileTrue: [ value := contentsArray at: readPos. readPos := readPos + 1. (aBlock value: value) ifFalse: [ value := nil ] ifTrue: [ readSynch waitIfLocked: [ ^nil ]. "We found the value, but someone else booked it." *readPos-1 to: readPosition+1 by: -1 do: [ :j | contentsArray at: j put: (contentsArray at: j-1) ]. contentsArray at: readPosition put: nil. readPosition := readPosition+1 *] ]. value ]. Is this the right way to propose changes and fixes? Thanks Cheers, Jaromir Tested at Squeak6.0alpha-20182-64bit.image -- Sent from: http://forum.world.st/Squeak-Dev-f45488.html

2 2

MCM configuration versioning active on source.squeak.org
by David T. Lewis 06 Feb '21

06 Feb '21

The source.squeak.org server now has MonticelloConfigurations-dtl.161 installed, so both squeaksource.com and source.squeak.org will now save MCM configurations with comments and version information. It may be necessary to do MCFileBasedRepository flushAllCaches in your image, but afterwards the version information will be present for newly saved MCM configs. Try browsing update-dtl.483.mcm for an example. See MonticelloConfigurations-dtl.161 for details: Name: MonticelloConfigurations-dtl.161 Time: 9 May 2020, 10:22:36.276105 am A MCConfigurationExtended is a configuration with author initials, timestamp, UUID identifier, comment, and a list of prior versions. Its external storage format is organized for compatibility with MCConfiguration, such that an image wtih support for only MCConfiguration can use configurations saved from a MCConfigurationExtended. The intended use is to enable documentation of configuration maps, and to allow modifications to a configuration map without loss of version history. When editing an MCConfiguration, a copyForEdit of the configuration is modfied, leaving the prior configuration in the version history. When saving an edited version, an editor window allows a version comment to be entered for the new configuration. Version history for a saved MCConfiguration is trimmed to a maximum of 10 prior versions to maintain reasonable storage size. Full version history can be reconstructed based on the UUID identifiers. MCConfigurationBrowser provides a "Versions" button to open an explorer on the version history of a configuration. No other support for browsing version history and comments is provided. MCConfigurationExtended is fully backward compatible such that saved versions will be rendered as simple MCConfiguration without version history in an image that lacks support for the extended format. A SqueakSource server must have this update applied before it can render a saved MCConfigurationExtended.

1 0

Process >> priority: behavior grossly incorrect, Transcript losing output
by Jaromir 06 Feb '21

06 Feb '21

In the following example higher priority process keeps waiting in the ProcessorScheduler queue until lower priority process suspends! Transcript flush; cr. *Processor activeProcess priority: 42. [ Transcript nextPut: $A ] forkAt: 41. Processor activeProcess priority: 40.* Transcript nextPut: $B; flush. 1000 factorial. Transcript nextPut: $C; flush. 1000 factorial. Transcript nextPut: $D; flush. 10 milliSeconds wait. "suspends the active process" Transcript nextPut: $E; flush. Answers: BCDAE BCDAE BCDE "here A even lost!" BCDAE BCDAE BCDAE BCDAE BCDAE Increasing the lenght of computation by doing 20000 factorial shows interrupts work and suspend the rogue process: BCDAE BACDE BCADE BCDE "A lost again" BACDE BCDAE BCDAE Reason: the #priority: method won't make sure the active process doesn't jump over a scheduled process when lowering it's priority - as a result the active process will continue running until it suspends and won't let the higher priority process a chance to run. priority: anInteger "Set the receiver's priority to anInteger." (anInteger >= Processor lowestPriority and:[anInteger <= Processor highestPriority]) ifTrue: [priority := anInteger] ifFalse: [self error: 'Invalid priority: ', anInteger printString] Proposed solution: priority: anInteger "Set the receiver's priority to anInteger." (anInteger >= Processor lowestPriority and:[anInteger <= Processor highestPriority]) ifTrue: [ priority := anInteger. *(self isActiveProcess and: [anInteger < Processor nextReadyProcess priority]) ifTrue: [ [self resume] fork. self suspend ] ]* ifFalse: [self error: 'Invalid priority: ', anInteger printString] The problem with this solution is the #nextReadyProcess may get interrupted in the middle which may make it's answer usless. So I guess either this whole method should run as a primitive or in the interim, always force the active process suspend momentarily to let ProcessorScheduler do the job: priority: anInteger "Set the receiver's priority to anInteger." (anInteger >= Processor lowestPriority and:[anInteger <= Processor highestPriority]) ifTrue: [ priority := anInteger. *self isActiveProcess ifTrue: [ [self resume] fork. self suspend ] ]* ifFalse: [self error: 'Invalid priority: ', anInteger printString] Impact: at least two methods use this type of priority switching: #valueUnpreemptively and #valueAt: and their behavior is impacted the same way. Transcript flush; cr. *[ [ Transcript nextPut: $A ] forkAt: 41. ] valueUnpreemptively.* Transcript nextPut: $B; flush. 20000 factorial. Transcript nextPut: $C; flush. 20000 factorial. Transcript nextPut: $D; flush. 10 milliSeconds wait. Transcript nextPut: $E; flush. Answers again: BCDAE BCDAE BCDE BCADE BCDAE BCADE BCDAE BCDE BCDAE BACDE On top of that Transcript loses some output intermittently - I'm not sure if it's related or a separate issue. Image ----- C:\Users\mail\Squeak\Squeak6.0alpha-20182-64bit-superFRESH\Squeak6.0alpha-20182-64bit.image Squeak6.0alpha latest update: #20182 with all default settings including: Smalltalk vm processPreemptionYields = false TranscriptStream forceUpdate = true Related discussion: http://forum.world.st/The-Inbox-Compiler-mt-456-mcz-td5126723.html -- Sent from: http://forum.world.st/Squeak-Dev-f45488.html

1 0

The Trunk: Morphic-eem.1721.mcz
by commits＠source.squeak.org 04 Feb '21

04 Feb '21

Eliot Miranda uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-eem.1721.mcz ==================== Summary ==================== Name: Morphic-eem.1721 Author: eem Time: 3 February 2021, 6:52:27.309661 pm UUID: 3fa83dbf-de0f-4bb8-a461-57416e66b6cf Ancestors: Morphic-eem.1720 And make sure that we find the right model when searching for classes in multi-window browsers. =============== Diff against Morphic-eem.1720 =============== Item was changed: ----- Method: Browser>>displayClass: (in category '*Morphic-Menus-DockingBar-accessing') ----- displayClass: aClass "Assuming the receiver has answered true to isDisplayingClass:, come to the front and select the given class." | index | + index := self multiWindowIndexForClassName: aClass name. + index ~= 0 ifTrue: + [multiWindowState selectWindowIndex: index. + ^(multiWindowState models at: index) selectClass: aClass]. - index := self multiWindowIndexForClassName: aClass. - index ~= 0 ifTrue: - [multiWindowState selectWindowIndex: index]. self selectClass: aClass!

1 0

The Trunk: Morphic-eem.1720.mcz
by commits＠source.squeak.org 04 Feb '21

04 Feb '21

Eliot Miranda uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-eem.1720.mcz ==================== Summary ==================== Name: Morphic-eem.1720 Author: eem Time: 3 February 2021, 6:41:54.512365 pm UUID: d5ad36ce-7228-4bbe-8c99-a5bcef5e9bef Ancestors: Morphic-eem.1719 Avoid Symbol interning dulication in SearchBar>>smartSearch:in: =============== Diff against Morphic-eem.1719 =============== Item was changed: ----- Method: SearchBar>>smartSearch:in: (in category 'searching') ----- smartSearch: text in: morph "Take the user input and perform an appropriate search" | input newContents | self removeResultsWidget. input := text asString ifEmpty:[^self]. self class useSmartSearch ifFalse: [^ ToolSet default browseMessageNames: input]. (Symbol findInterned: input) ifNotNil: [:symbol| input := symbol]. "If it is a global or a full class name, browse that class." (Smalltalk bindingOf: input) ifNotNil: [:assoc| | class | class := (assoc value isBehavior ifTrue:[assoc value] ifFalse:[assoc value class]) theNonMetaClass. Project current world submorphs do: [:windowMorph| (windowMorph isSystemWindow and: [(windowMorph model isKindOf: Browser) and: [windowMorph model isDisplayingClass: class]]) ifTrue: [windowMorph beKeyWindow. ^windowMorph model displayClass: class]]. ^ToolSet browse: class selector: nil]. "If it is a symbol and there are implementors of it, browse those implementors." + input isSymbol ifTrue: + [(SystemNavigation new allImplementorsOf: input) ifNotEmpty: + [:list| - Symbol hasInterned: input ifTrue: [:selector | - (SystemNavigation new allImplementorsOf: selector) ifNotEmpty:[:list| ^SystemNavigation new browseMessageList: list name: 'Implementors of ' , input]]. "If it starts uppercase, browse classes if any. Otherwise, just search for messages." input first isUppercase ifTrue: + [(UIManager default classFromPattern: input withCaption: '') ifNotNil: + [:aClass| ^ToolSet browse: aClass selector: nil]. - [(UIManager default classFromPattern: input withCaption: '') - ifNotNil:[:aClass| ^ToolSet browse: aClass selector: nil]. newContents := input, ' -- not found.'. self searchTerm: newContents. self selection: (input size+1 to: newContents size). self currentHand newKeyboardFocus: morph textMorph. ^ self]. "Default to browse message names..." ToolSet default browseMessageNames: input!

1 0

font dependent error message? More than 256 literals referenced.
by gettimothy 03 Feb '21

03 Feb '21

Hi Folks "More than 256 literals referenced. You must split or otherwise simplify this method. The 257th literal is: 13055 ->"x Its funny, in one image, I have the method and all works fine. I spun up another image for Fonts work, installed the unifont and tried to us monticello to load the package and I get that message. The only difference I see is the installed/selected fonts. Is this assumption of mine true?

2 2

Cannot read 4.3 image on Raspberry Pi
by Jim Rosenberg 03 Feb '21

03 Feb '21

Ouch! I have a lot of artistic work which is developed in Squeak on Linux -- currently only up to 4.3 (which is working fine for me, so I haven't upgraded). I'm trying to run one of my 4.3 images on a Raspberry Pi 3B+ which is at Raspbian 10 (buster), and with the current armv6 squeak VM, getting the message This interpreter (vers. 6521) cannot read image file (vers. 6504). Suggestions? -Thanks in advance, Jim

9 17

Transcript losing output when #processPreemptionYields = true
by jaromir 03 Feb '21

03 Feb '21

Transcript may lose some output for #processPreemptionYields = true Example (semaphore prearmed with 2 signals): |accessProtect| Smalltalk vm processPreemptionYields: true. Transcript cr. accessProtect := Semaphore new signal signal. [accessProtect critical: [ Transcript cr; show: 'Process 1a '. 10000 factorial. Transcript cr; show: 'Process 1b '. ]] fork. Processor yield. [accessProtect critical: [ Transcript cr; show: 'Process 2a '. 10000 factorial. Transcript cr; show: 'Process 2b '. ]] forkAt: 41. Transcript cr; show: 'Process UIa '. 0.3 second wait. Transcript cr; show: 'Process UIb '. Output: "this is ok" Process 1a Process 2a Process 2b Process 1b Process UIa Process UIb "Here Process 2a output missing!" Process 1a Process 2b Process UIa Process 1b Process UIb "Or even this came out" Process 1a Process 2b Process 1b Process UIb The problem is probably related to the post: Transcript error when forceUpdate: false http://forum.world.st/Transcript-error-when-forceUpdate-false-td5126397.html Similar workaround (Collections-mt.923 @ inbox) may fix this issue too. Tested on Squeak6.0alpha-20182-64bit-freshCopy (Collections-dtl.923 @ trunk) -- Sent from: http://forum.world.st/Squeak-Dev-f45488.html

5 9

Jump to page: