Squeak-dev March 2024

squeak-dev@lists.squeakfoundation.org

27 participants
58 discussions

The Trunk: System-cmm.1451.mcz
by commits＠source.squeak.org 26 Mar '24

26 Mar '24

Chris Muller uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-cmm.1451.mcz ==================== Summary ==================== Name: System-cmm.1451 Author: cmm Time: 25 March 2024, 7:37:55.127523 pm UUID: 29d336c2-1aa8-40f1-914f-7b2b23873523 Ancestors: System-eem.1450 Added Smalltalk>>#previousPlatformName to support detecting and responding to platform changes between image restarts. =============== Diff against System-eem.1450 =============== Item was changed: Object subclass: #SmalltalkImage instanceVariableNames: 'globals' + classVariableNames: 'EndianCache LastImageName LastQuitLogPosition LastStats PlatformNameCache PreviousPlatformName ShutDownList SourceFileVersionString StartUpList StartupStamp VMMakerVersion WordSize' - classVariableNames: 'EndianCache LastImageName LastQuitLogPosition LastStats PlatformNameCache ShutDownList SourceFileVersionString StartUpList StartupStamp VMMakerVersion WordSize' poolDictionaries: '' category: 'System-Support'! !SmalltalkImage commentStamp: 'dtl 3/6/2010 14:00' prior: 0! I represent the current image and runtime environment, including system organization, the virtual machine, object memory, plugins and source files. My instance variable #globals is a reference to the system dictionary of global variables and class names. My singleton instance is called Smalltalk.! Item was changed: ----- Method: SmalltalkImage>>cleanUpSystemAttributeCaches (in category 'housekeeping') ----- cleanUpSystemAttributeCaches "Reset platform-specific values. This MUST BE called directly before the image is snapshotted. Note that this can't safely be done on start-up because Smalltalk is too late in the start-up sequence. See commentary in #getSystemAttribute:." self flag: #discuss. "mt: Such caches might better be managed by the VM itself. A primitive-based cache protocol could help. On a fresh (VM) start-up, those values would then be nil (or uninitialized) automatically." + PreviousPlatformName := PlatformNameCache. - EndianCache := WordSize := PlatformNameCache := nil.! Item was added: + ----- Method: SmalltalkImage>>previousPlatformName (in category 'os') ----- + previousPlatformName + "Answer the name of the previous OS platform that ran this image, useful for detecting and responding to platform changes." + ^ PreviousPlatformName ifNil: [ 'unknown' ]! Item was changed: ----- Method: SmalltalkImage>>snapshot:andQuit:withExitCode:embedded: (in category 'snapshot and quit') ----- snapshot: save andQuit: quit withExitCode: exitCode embedded: embeddedFlag "Mark the changes file and close all files as part of #processShutdownList. If save is true, save the current state of this Smalltalk in the image file. If quit is true, then exit to the outer OS shell. If exitCode is not nil, then use it as exit code. The latter part of this method runs when resuming a previously saved image. This resume logic checks for a document file to process when starting up." | resuming msg | Object flushDependents. Object flushEvents. (SourceFiles at: 2) ifNotNil:[ msg := String streamContents: [ :s | s nextPutAll: '----'; nextPutAll: (save ifTrue: [ quit ifTrue: [ 'QUIT' ] ifFalse: [ 'SNAPSHOT' ] ] ifFalse: [quit ifTrue: [ 'QUIT/NOSAVE' ] ifFalse: [ 'NOP' ]]); nextPutAll: '----'; print: Date dateAndTimeNow; space; nextPutAll: (FileDirectory default localNameFor: self imageName); nextPutAll: ' priorSource: '; print: LastQuitLogPosition ]. self assureStartupStampLogged. save ifTrue: [ LastQuitLogPosition := (SourceFiles at: 2) setToEnd; position ]. self logChange: msg. Transcript cr; show: msg]. self processShutDownList: quit. Cursor write show. + save ifTrue: + [self cleanUpSystemAttributeCaches. - save ifTrue: [ - self cleanUpSystemAttributeCaches. resuming := embeddedFlag ifTrue: [self snapshotEmbeddedPrimitive] + ifFalse: + [PlatformNameCache := nil. + self snapshotPrimitive]] "<-- PC frozen here on image file" - ifFalse: [self snapshotPrimitive]] "<-- PC frozen here on image file" ifFalse: [resuming := false]. (quit and: [resuming == false]) ifTrue: [exitCode ifNil: [ self quitPrimitive ] ifNotNil: [ self quitPrimitive: exitCode ] ]. Cursor normal show. self startUpPostSnapshot: resuming == true. Project current wakeUpTopWindow. "Now it's time to raise an error" resuming == nil ifTrue: [self error:'Failed to write image file (disk full?)']. ^ resuming!

1 0

The Trunk: System-ct.1257.mcz
by commits＠source.squeak.org 25 Mar '24

25 Mar '24

Christoph Thiede uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-ct.1257.mcz ==================== Summary ==================== Name: System-ct.1257 Author: ct Time: 27 November 2021, 10:01:11.385431 pm UUID: 5df16e76-2520-984a-8fc6-37ca1b36b76c Ancestors: System-ct.1256 Complements Kernel-ct.1426 (removal of #automaticPlatformSettings preference). Step 2/2. =============== Diff against System-ct.1256 =============== Item was removed: - ----- Method: Preferences class>>automaticPlatformSettings (in category 'standard queries') ----- - automaticPlatformSettings - ^ self - valueOfFlag: #automaticPlatformSettings - ifAbsent: [ true ]! Item was changed: ----- Method: Preferences class>>defaultValueTableForCurrentRelease (in category 'defaults') ----- defaultValueTableForCurrentRelease "Answer a table defining default values for all the preferences in the release. Returns a list of (pref-symbol, boolean-symbol) pairs" ^ #( (abbreviatedBrowserButtons false) (alternativeBrowseIt false) (annotationPanes false) (areaFillsAreTolerant false) (areaFillsAreVeryTolerant false) (automaticFlapLayout true) (automaticKeyGeneration false) - (automaticPlatformSettings true) (automaticViewerPlacement true) (balloonHelpEnabled true) (balloonHelpInMessageLists false) (batchPenTrails false) (capitalizedReferences true) (caseSensitiveFinds false) (cautionBeforeClosing false) (changeSetVersionNumbers true) (checkForSlips true) (checkForUnsavedProjects true) (classicNavigatorEnabled false) (cmdDotEnabled true) (collapseWindowsInPlace false) (compactViewerFlaps false) (compressFlashImages false) (confirmFirstUseOfStyle true) (conversionMethodsAtFileOut false) (debugHaloHandle true) (debugPrintSpaceLog false) (debugShowDamage false) (decorateBrowserButtons true) (diffsInChangeList true) (diffsWithPrettyPrint false) (dismissAllOnOptionClose false) (dragNDropWithAnimation false) (eToyFriendly false) (eToyLoginEnabled false) (enableLocalSave true) (extractFlashInHighQuality true) (extractFlashInHighestQuality false) (fastDragWindowForMorphic true) (fenceEnabled true) (fullScreenLeavesDeskMargins true) (haloTransitions false) (higherPerformance false) (honorDesktopCmdKeys true) (includeSoundControlInNavigator false) (infiniteUndo false) (logDebuggerStackToFile true) (magicHalos false) (menuButtonInToolPane false) (menuColorFromWorld false) (menuKeyboardControl false) (modalColorPickers true) (mouseOverForKeyboardFocus false) (mouseOverHalos false) (mvcProjectsAllowed true) (navigatorOnLeftEdge true) (noviceMode false) (okToReinitializeFlaps true) (optionalButtons true) (passwordsOnPublish false) (personalizedWorldMenu true) (postscriptStoredAsEPS false) (projectViewsInWindows true) (projectZoom true) (projectsSentToDisk false) (propertySheetFromHalo false) (readDocumentAtStartup true) (restartAlsoProceeds false) (reverseWindowStagger true) (roundedMenuCorners true) (scrollBarsNarrow false) (scrollBarsOnRight true) (securityChecksEnabled false) (selectiveHalos false) (showBoundsInHalo false) (showDirectionForSketches false) (showDirectionHandles false) (showFlapsWhenPublishing false) (showProjectNavigator false) (showSecurityStatus true) (showSharedFlaps true) (signProjectFiles true) (simpleMenus false) (smartUpdating true) (startInUntrustedDirectory false) (systemWindowEmbedOK false) (tileTranslucentDrag true) (timeStampsInMenuTitles true) (turnOffPowerManager false) (twentyFourHourFileStamps true) (typeCheckingInTileScripting true) (uniTilesClassic true) (uniqueNamesInHalos false) (universalTiles false) (unlimitedPaintArea false) (useButtonPropertiesToFire false) (useUndo true) (viewersInFlaps true) (warnAboutInsecureContent true) (warnIfNoChangesFile true) (warnIfNoSourcesFile true)) " Preferences defaultValueTableForCurrentRelease do: [:pair | (Preferences preferenceAt: pair first ifAbsent: [nil]) ifNotNilDo: [:pref | pref defaultValue: (pair last == true)]]. Preferences chooseInitialSettings. "! Item was changed: ----- Method: SmalltalkImage>>setPlatformPreferences (in category 'snapshot and quit') ----- setPlatformPreferences "Set some platform specific preferences on system startup" | platform specs | - Preferences automaticPlatformSettings ifFalse:[^self]. platform := self platformName. + specs := #(). - specs := #(). platform = 'Win32' ifTrue:[ specs := #()]. platform = 'Mac OS' ifTrue:[ specs := #()]. specs do:[:tuple| Preferences setPreference: tuple first toValue: (tuple last == true). + ].! - ]. - ! Item was changed: (PackageInfo named: 'System') postscript: '"Add the new primitive error codes to the specialObjectsArray if they are not there yet." Smalltalk primitiveErrorTable size < 26 ifTrue: [Smalltalk recreateSpecialObjectsArray]. + (Preferences preferenceAt: #debugLogTimestamp) categoryList: #(''debug''). + + Preferences removePreference: #automaticPlatformSettings.'! - (Preferences preferenceAt: #debugLogTimestamp) categoryList: #(''debug'').'!

3 5

Re: RFBSocket waitForSendDoneFor: question
by lewis＠mail.msen.com 24 Mar '24

24 Mar '24

Thank you Levente! On 2024-03-23 21:10, leves wrote: > Hi David, > > RFBSocket >> #waitForSendDoneFor: is present even in RFB-ikp.2, which > is from 2004. > I removed it back in 2016 with RFB-klub.15 (see the commit message in > history as the version is not in the repository), because Socket's > #waitForSendDoneFor: just works. The bugs mentioned in the comment must > have been fixed in the 2000s. > > Best, > Levente > > On 2024. 03. 23. 17:27, lewis(a)mail.msen.com wrote: > >> SqueakSource servers use the RFB package in the source.squeak.org/ss >> repository. The RFBSocket>>waitForSendDoneFor: method was removed in >> merge (RFB-cmm.20). Was this a mistake in the merge? >> >> RFBSocket>>waitForSendDoneFor: was introduced by Levente in 2012 >> (RFB-ul.7 probably) and was present in the package until 2021 >> (RFB-cmm.20). It is documented as follows: >> >> waitForSendDoneFor: timeout >> "This is a (dual) bug-fix implementation only. Broken VMs (like the >> Windoze one) confuse the read and write Semaphores (bug #1), and the >> new Socket implementation fails utterly to deal properly with the >> situation (bug #2)." >> >> Thanks, >> Dave

1 0

RFBSocket waitForSendDoneFor: question
by lewis＠mail.msen.com 23 Mar '24

23 Mar '24

SqueakSource servers use the RFB package in the source.squeak.org/ss repository. The RFBSocket>>waitForSendDoneFor: method was removed in merge (RFB-cmm.20). Was this a mistake in the merge? RFBSocket>>waitForSendDoneFor: was introduced by Levente in 2012 (RFB-ul.7 probably) and was present in the package until 2021 (RFB-cmm.20). It is documented as follows: waitForSendDoneFor: timeout "This is a (dual) bug-fix implementation only. Broken VMs (like the Windoze one) confuse the read and write Semaphores (bug #1), and the new Socket implementation fails utterly to deal properly with the situation (bug #2)." Thanks, Dave

1 0

The Inbox: Collections-LM.1047.mcz
by commits＠source.squeak.org 22 Mar '24

22 Mar '24

A new version of Collections was added to project The Inbox: http://source.squeak.org/inbox/Collections-LM.1047.mcz ==================== Summary ==================== Name: Collections-LM.1047 Author: LM Time: 22 March 2024, 12:41:45.48151 pm UUID: 2a45afd6-49ba-4136-8d68-bc2661b6667f Ancestors: Collections-ct.1046 These statistical functions can be quite useful for data analysis. =============== Diff against Collections-ct.1046 =============== Item was added: + ----- Method: Collection>>sampleStandardDeviation (in category 'math functions') ----- + sampleStandardDeviation + + ^ self sampleVariance sqrt! Item was added: + ----- Method: Collection>>sampleVariance (in category 'math functions') ----- + sampleVariance + + ^ self totalSumOfSquares / (self size - 1)! Item was added: + ----- Method: Collection>>standardDeviation (in category 'math functions') ----- + standardDeviation + + ^ self variance sqrt! Item was added: + ----- Method: Collection>>standardError (in category 'math functions') ----- + standardError + "Unknown, so use the usual statistical estimate." + ^ (self sampleVariance / self size) sqrt! Item was added: + ----- Method: Collection>>totalSumOfSquares (in category 'math functions') ----- + totalSumOfSquares + + | average | + average := self average. + ^ (self collect: [:element | (element - average) squared]) sum! Item was added: + ----- Method: Collection>>variance (in category 'math functions') ----- + variance + + ^ self totalSumOfSquares / self size!

2 1

The Trunk: System-eem.1450.mcz
by commits＠source.squeak.org 22 Mar '24

22 Mar '24

Eliot Miranda uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-eem.1450.mcz ==================== Summary ==================== Name: System-eem.1450 Author: eem Time: 21 March 2024, 9:59:04.230117 pm UUID: 8a307197-4ed6-4876-a204-4922ff405e1d Ancestors: System-cmm.1449 Eliminate hyper-active low space notification by not notifying if after a GC there is at least 1/5 more free space than the low space threshold, in the case where there are no memoryHogs. Document parameters 50 & 51 in vmParameterAt:[put:]. Improve the comment for snapshotPrimitive. =============== Diff against System-cmm.1449 =============== Item was changed: ----- Method: LowSpaceWatcher>>notifyMemoryHogs (in category 'process steps') ----- notifyMemoryHogs + "Try to clean up memory hogs. Answer if sufficient memory was released." - "Try to clean up memory hogs. Answer true if sufficient memory was released." | free | + free := Smalltalk bytesLeft. + self memoryHogs isEmpty ifTrue: + [^free >= (Smalltalk lowSpaceThreshold * 5 // 4)]. + self memoryHogs do: + [ :hog | hog freeSomeSpace ]. + ^Smalltalk bytesLeft > free! - self memoryHogs isEmpty - ifTrue: [ ^ false ] - ifFalse: [ free := Smalltalk bytesLeft. - self memoryHogs - do: [ :hog | hog freeSomeSpace ]. - ^ Smalltalk bytesLeft > free ] - - ! Item was changed: ----- Method: SmalltalkImage>>snapshotPrimitive (in category 'snapshot and quit') ----- snapshotPrimitive + "Primitive. Write the current state of the object memory on a file in the same format + as the Smalltalk-80 release. Return normally after writing the file, and answer false. + The file can later be resumed, returning you to this exact state except for answering + true. Essential. See Object documentation whatIsAPrimitive." - "Primitive. Write the current state of the object memory on a file in the - same format as the Smalltalk-80 release. The file can later be resumed, - returning you to this exact state. Return normally after writing the file. - Essential. See Object documentation whatIsAPrimitive." <primitive: 97> ^nil "indicates error writing image file"! Item was changed: ----- Method: SmalltalkImage>>vmParameterAt: (in category 'vm parameters') ----- vmParameterAt: parameterIndex "parameterIndex is a positive integer corresponding to one of the VM's internal parameter/metric registers. Answer with the current value of that register. Fail if parameterIndex is invalid or has no corresponding register. Coerce positive integers for parameterIndices unknown to teh VM to nil. VM parameters are numbered as follows: 1 byte size of old-space (read-only) 2 byte size of young-space (read-only) 3 byte size of object memory (read-only) 4 allocationCount (read-only; nil in Cog VMs) 5 allocations between GCs (read-write; nil in Cog VMs) 6 survivor count tenuring threshold (read-write) 7 full GCs since startup (read-only) 8 total milliseconds in full GCs since startup (read-only) 9 incremental GCs since startup (read-only; scavenging GCs on Spur) 10 total milliseconds in incremental/scavenging GCs since startup (read-only) 11 tenures of surving objects since startup/last write (read-write) 12 event trace mask; if 1 << eventType is set in the mask then event received by primGetNextEvent: will be printed to stderr. 13 VM ticker start microseconds (Croquet/QwaqVM only) 14 VM ticker count (Croquet/QwaqVM only) 15 VM ticker call count (Croquet/QwaqVM only) 16 total microseconds in idle since startup 17 proportion of code zone available for use (Sista VMs only; read-write) 18 total milliseconds in full GC compaction since startup (a portion of parameter 8) 19 scavenge threshold; the effective size of eden 20 utc microseconds at VM start-up (actually at time initialization, which precedes image load) (newer Cog VMs only). 21 root (remembered) table size (read-only) 22 root (remembered) table overflows since startup (read-only) 23 bytes of extra memory to reserve for VM buffers, plugins, etc. 24 memory threshold above which to shrink object memory (read-write) 25 ammount to grow by when growing object memory (read-write) 26 interruptChecksEveryNms - force an ioProcessEvents every N milliseconds (read-write) 27 number of times mark loop iterated for current IGC/FGC (read-only) includes ALL marking 28 number of times sweep loop iterated for current IGC/FGC (read-only) 29 number of times make forward loop iterated for current IGC/FGC (read-only) 30 number of times compact move loop iterated for current IGC/FGC (read-only) 31 number of grow memory requests (read-only) 32 number of shrink memory requests (read-only) 33 number of root table entries used for current IGC/FGC (read-only) 34 bytes allocated in total since start-up or reset (read-write) 35 number of survivor objects after current IGC/FGC (read-only) 36 millisecond clock when current IGC/FGC completed (read-only) 37 number of marked objects for Roots of the world, not including Root Table entries for current IGC/FGC (read-only) 38 milliseconds taken by current IGC (read-only) 39 Number of finalization signals for Weak Objects pending when current IGC/FGC completed (read-only) 40 BytesPerWord for this image 41 imageFormatVersion for the VM 42 number of stack pages in use (Cog Stack VM only, otherwise nil) 43 desired number of stack pages (stored in image file header, max 65535; Cog VMs only, otherwise nil) 44 size of eden, in bytes (Cog VMs only, otherwise nil) 45 desired size of eden, in bytes (stored in image file header; Cog VMs only, otherwise nil) 46 size of machine code zone, in bytes (stored in image file header; Cog JIT VM only, otherwise nil) 47 desired size of machine code zone, in bytes (applies at startup only, stored in image file header; Cog JIT VM only) 48 various properties stored in the image header (that instruct the VM) as an integer encoding an array of bit flags. Bit 0: in a threaded VM, if set, tells the VM that the image's Process class has threadAffinity as its 5th inst var (after nextLink, suspendedContext, priority & myList) Bit 1: in Cog JIT VMs, if set, asks the VM to set the flag bit in interpreted methods Bit 2: if set, preempting a process puts it to the head of its run queue, not the back, i.e. preempting a process by a higher priority one will not cause the preempted process to yield to others at the same priority. Bit 3: (unassigned) Bit 4: in a Spur VM, if set, causes weaklings and ephemerons to be queued individually for finalization Bit 5: if set, implies wheel events will be delivered as such and not mapped to arrow key events Bit 6: if set, implies arithmetic primitives will fail if given arguments of different types (float vs int) Bit 7: if set, causes times delivered from file primitives to be in UTC rather than local time Bit 8: if set, implies the VM will not upscale the display on high DPI monitors; older VMs did this by default. 49 the size of the external semaphore table (read-write; Cog VMs only) + 50 the maximum number of literals in a method for it to be considered for JIT compilation (Cog JIT VM only, otherwise nil) + 51 a set of bit flags describing the state of the image load (read-only; later Cog VMs only; otherwise nil) + Bit 0: image needed swizzling on load + Bit 1: image is embedded (e.g. as a resource) in this VM - 50-51 reserved for VM parameters that persist in the image (such as eden above) 52 root (remembered) table maximum size (read-only) + 53 the number of oldSpace segments (read-only; Spur only, otherwise nil) - 53 the number of oldSpace segments (Spur only, otherwise nil) 54 total size of free old space (Spur only, otherwise nil) 55 ratio of growth and image size at or above which a GC will be performed post scavenge (Spur only, otherwise nil) 56 number of process switches since startup (read-only) 57 number of ioProcessEvents calls since startup (read-only) 58 number of forceInterruptCheck (Cog VMs) or quickCheckInterruptCalls (non-Cog VMs) calls since startup (read-only) 59 number of check event calls since startup (read-only) 60 number of stack page overflows since startup (read-only; Cog VMs only) 61 number of stack page divorces since startup (read-only; Cog VMs only) 62 number of machine code zone compactions since startup (read-only; Cog VMs only) 63 milliseconds taken by machine code zone compactions since startup (read-only; Cog VMs only) 64 current number of machine code methods (read-only; Cog VMs only) 65 In newer Cog VMs a set of flags describing VM features, if non-zero bit 0 implies multiple bytecode set support; if non-zero bit 1 implies read-only object support; if non-zero bit 2 implies the VM suffers from using an ITIMER heartbeat (if 0 it has a thread that provides the heartbeat) (read-only; Cog VMs only; nil in older Cog VMs, a boolean answering multiple bytecode support in not so old Cog VMs) if non-zero bit 3 implies the VM supports cross-platform BIT_IDENTICAL_FLOATING_POINT arithmetic if non-zero bit 4 implies the VM can catch exceptions in FFI calls and answer them as primitive failures if non-zero bit 5 implies the VM's suspend primitive backs up the process to before the wait if it was waiting on a condition variable 66 the byte size of a stack page in the stack zone (read-only; Cog VMs only) 67 the maximum allowed size of old space in bytes, 0 implies no internal limit (Spur VMs only). 68 the average number of live stack pages when scanned by GC (at scavenge/gc/become et al) 69 the maximum number of live stack pages when scanned by GC (at scavenge/gc/become et al) 70 the value of VM_PROXY_MAJOR (the interpreterProxy major version number) 71 the value of VM_PROXY_MINOR (the interpreterProxy minor version number) 72 total milliseconds in full GCs Mark phase since startup (read-only) 73 total milliseconds in full GCs Sweep phase since startup (read-only, can be 0 depending on compactors) 74 maximum pause time due to segment allocation 75 whether arithmetic primitives will do mixed type arithmetic; if false they fail for different receiver and argument types 76 the minimum unused headroom in all stack pages; Cog VMs only" <primitive: 254> (parameterIndex isInteger and: [parameterIndex > 0]) ifTrue: [^nil]. self primitiveFailed! Item was changed: ----- Method: SmalltalkImage>>vmParameterAt:put: (in category 'vm parameters') ----- vmParameterAt: parameterIndex put: newValue "parameterIndex is a positive integer corresponding to one of the VM's internal parameter/metric registers. Store newValue (a positive integer) into that register and answer with the previous value that was stored there. Fail if newValue is out of range, if parameterIndex has no corresponding register, or if the corresponding register is read-only. As of late 2020 the parameters which can be set are 5 allocations between GCs (read-write; nil in Cog VMs) 6 survivor count tenuring threshold (read-write) 11 tenures of surving objects since startup/last write (read-write) 12 event trace mask; if 1 << eventType is set in the mask then event received by primGetNextEvent: will be printed to stderr. 17 proportion of code zone available for use (Sista VMs only) 23 bytes of extra memory to reserve for VM buffers, plugins, etc. 24 memory threshold above whichto shrink object memory (read-write) 25 memory headroom when growing object memory (read-write) 26 interruptChecksEveryNms - force an ioProcessEvents every N milliseconds (read-write) 34 bytes allocated in total since start-up or reset (read-write) 43 desired number of stack pages (stored in image file header, max 65535; Cog VMs only, otherwise nil) 45 desired size of eden, in bytes (stored in image file header; Cog VMs only, otherwise nil) 47 desired size of machine code zone, in bytes (applies at startup only, stored in image file header; Cog JIT VM only) 48 various properties of the Cog VM as an integer encoding an array of bit flags; see commentary in #vmParameterAt: 49 the size of the external semaphore table (read-write; Cog VMs only) + 50 the maximum number of literals in a method for it to be considered for JIT compilation (Cog JIT VM only, otherwise nil) 55 ratio of growth and image size at or above which a GC will be performed post scavenge (Spur only, otherwise nil) 67 the maximum allowed size of old space in bytes, 0 implies no internal limit (Spur only). 68 the average number of live stack pages when scanned by GC (at scavenge/gc/become et al) 69 the maximum number of live stack pages when scanned by GC (at scavenge/gc/become et al) 74 maximum pause time due to segment allocation 75 whether arithmetic primitives will do mixed type arithmetic; if false they fail for different receiver and argument types" <primitive: 254> self primitiveFailed!

1 0

UKSTUG Meeting - Maximiliano Tabacman: Electronic Roleplaying Assistant - 27 March 2024
by Giovanni Corriga 19 Mar '24

19 Mar '24

In this presentation, Maximiliano Tabacman will be presenting the main features, abstractions and design decisions behind ERA, the Electronic Roleplaying Assistant ( https://preview.drivethrurpg.com/en/product/137825/ERA-for-Rolemaster ). ERA is currently being used to create characters and manage the adventures of many gaming groups across the world, supporting Navigator RPG, Against the Darkmaster, Rolemaster Classic, Rolemaster Fantasy and Rolemaster Unified. We will review how Pharo allows creating a deployed version that runs locally in Linux, Mac and Windows, while Digital Ocean and Auth0 allow running an online server with different user roles. https://pharo.org/success/RolPlayingAssistant.html We will also mention how ERA makes use of the different frameworks developed and maintained by the Buenos Aires Smalltalk group, hosted at Github. Maximiliano Tabacman ( https://www.linkedin.com/in/maximiliano-tabacman-9aa4b817b/ ) is a long time Smalltalker with a Phd from the University of Buenos Aires. He is a Software architect at Mercap, executive secretary at FAST and creator of ERA. 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/299364517/ ) to receive the meeting details. Don’t forget to bring your laptop and drinks!

1 0

Installing Maui
by Edwin Ancaer 13 Mar '24

13 Mar '24

Hello, I'm sorry to have to ask, but I wanted to install Maui in my new version of Squeak, and it seems to have disappeared from the SqueakMap Package Loader, or more probably, I'm doing something wrong while selecting. Can someone point me to foolproof instructions on how to load it. Thanks a lot, Edwin Ancaer *;

2 2

Squeak Oversight Board Election 2024 - The New Board
by Patrick Rein 12 Mar '24

12 Mar '24

Hi Everyone, I'm very pleased to announce your Squeak Oversight Board for 2024. They are: 1. Marcel Taeumel 2. Vanessa Freudenberg 3. Tim Rowledge 4. David T. Lewis 5. Craig Latta 6. Christoph Thiede 7. Bruce O'Neel I would like to thank everyone that served on the board in the term of 2023. Thank you for your contributions to Squeak! Thank you to everyone that ran this year and for everyone that voted. We are looking forward to a great year in the Squeak community! Please help me to welcome and congratulate your new board for 2024!! All the best, Patrick

7 6

DisplayHostWindow>>hostWindowExtent: Discrepancy -- Mac vs. Linux
by Jim Rosenberg 11 Mar '24

11 Mar '24

I have a class of my own called FrameStackCard which is a subclass of PasteUpMorph. FrameStackCard has a class method called resizeHostWindow which is intended to resize the OS desktop window in which Squeak is running to the size of the top-most FrameStackCard. The exact code is: resizeHostWindow Project current world submorphs do: [ :m | (m isKindOf: FrameStackCard) ifTrue: [ ^ DisplayHostWindow hostWindowExtent: (m extent) ] ] On Linux (specifically Debian 10, KDE window manager) running VM from Squeak 6.0 on a Squeak 5.3 image, this works perfectly. The top-most card has origin (0@0), the window contents is sized exactly to the top-most card's extent, everything exactly visible. On MacOS (specifically Sonoma 14.3.1) I'm getting "similar" behavior EXCEPT that the window size seems to *include* the MacOS window title bar, whereas on Linux the window size seems to be just the *contents* of the window, without the title bar. The Linux behavior is what I want to happen. On MacOS, a sliver at the bottom is not visible. So the semantics don't quite agree. I haven't had a chance to test this on Windows yet. Is there something I can do to get the Linux behavior on MacOS? -Thanks in advance, Jim

1 0