Packages January 2020

packages@lists.squeakfoundation.org

1 participants
28 discussions

The Trunk: System-cmm.1131.mcz
by commits＠source.squeak.org 25 Jan '20

25 Jan '20

Chris Muller uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-cmm.1131.mcz ==================== Summary ==================== Name: System-cmm.1131 Author: cmm Time: 24 January 2020, 10:29:33.137608 pm UUID: e1008e87-2bc1-4149-8890-2543885b48d7 Ancestors: System-cmm.1129 Fix Community (dark) theme balloons not easily seen due to matching color on MC and SqueakMap browsers. =============== Diff against System-cmm.1129 =============== Item was changed: ----- Method: CommunityTheme class>>addDarkDialogs: (in category 'instance creation') ----- addDarkDialogs: aUserInterfaceTheme "self createDark apply." aUserInterfaceTheme set: #borderColor for: #DialogWindow to: self dbSelection; set: #color for: #DialogWindow to: (self dbBlue adjustSaturation: -0.20 brightness: -0.30); set: #titleColor for: #DialogWindow to: self dbBlue twiceDarker; set: #titleTextColor for: #DialogWindow to: Color veryLightGray; set: #textColor for: #DialogWindow to: (Color gray: 0.9); set: #okColor for: #DialogWindow to: self dbGreen; set: #cancelColor for: #DialogWindow to: self dbOrange; set: #buttonColor for: #DialogWindow to: Color darkGray; set: #selectionModifier for: #DialogWindow to: [ [:c | self dbSelection twiceDarker ] ]. "The List Chooser is a dialog, too." aUserInterfaceTheme set: #addColor for: #ListChooser to: self dbBlue; set: #disabledColor for: #ListChooser to: Color transparent. "And the system progress bar." aUserInterfaceTheme set: #color for: #SystemProgressBarMorph to: Color transparent; set: #barColor for: #SystemProgressBarMorph to: self dbSelection. "And the balloon morphs." aUserInterfaceTheme set: #borderColor for: #NewBalloonMorph to: Color transparent ; + set: #color for: #NewBalloonMorph to: (self dbLabel alpha: 0.9) ; - set: #color for: #NewBalloonMorph to: (self dbOrange twiceDarker alpha: 0.9) ; set: #textColor for: #NewBalloonMorph to: Color white .! Item was changed: ----- Method: CommunityTheme class>>addDarkSyntaxHighlighting: (in category 'instance creation') ----- addDarkSyntaxHighlighting: aUserInterfaceTheme "self createDark apply." | normal bold italic underlined darkMap | normal := TextEmphasis normal. bold:=TextEmphasis bold. italic:=TextEmphasis italic. underlined := TextEmphasis underlined. darkMap := StrikeFont familyName: 'Darkmap DejaVu Sans' pointSize: 9. aUserInterfaceTheme set: #color for: #TextAction to: self dbBlue; set: #default for: #SHTextStylerST80 to: {self dbForeground}; set: #invalid for: #SHTextStylerST80 to: {self dbInvalid}; set: #excessCode for: #SHTextStylerST80 to: {self dbInvalid twiceDarker}; "Descriptive text for humans, italicized." set: #comment for: #SHTextStylerST80 to: {self dbComment. italic}; set: #unfinishedComment for: #SHTextStylerST80 to: {self dbComment darker. italic}; set: #'$' for: #SHTextStylerST80 to: {self dbConstant}; set: #character for: #SHTextStylerST80 to: {self dbConstant}; set: #integer for: #SHTextStylerST80 to: {self dbConstant}; set: #number for: #SHTextStylerST80 to: {self dbConstant}; set: #- for: #SHTextStylerST80 to: {self dbForeground. bold}; set: #= for: #SHTextStylerST80 to: {self dbForeground. bold}; set: #symbol for: #SHTextStylerST80 to: {self dbBedrock}; set: #stringSymbol for: #SHTextStylerST80 to: {self dbBedrock}; set: #literalArray for: #SHTextStylerST80 to: {self dbForeground}; set: #string for: #SHTextStylerST80 to: {self dbConstant}; set: #unfinishedString for: #SHTextStylerST80 to: {self dbConstant darker}; set: #assignment for: #SHTextStylerST80 to: {nil. bold}; set: #ansiAssignment for: #SHTextStylerST80 to: {nil. bold}; set: #literal for: #SHTextStylerST80 to: {nil. bold}; set: #keyword for: #SHTextStylerST80 to: {self dbMessage}; set: #binary for: #SHTextStylerST80 to: {self dbForeground. bold}; set: #unary for: #SHTextStylerST80 to: {self dbMessage}; set: #incompleteKeyword for: #SHTextStylerST80 to: {self dbMessage darker. {underlined. bold}}; set: #incompleteBinary for: #SHTextStylerST80 to: {self dbMessage darker. underlined}; set: #incompleteUnary for: #SHTextStylerST80 to: {self dbMessage darker. underlined}; set: #undefinedKeyword for: #SHTextStylerST80 to: {self dbInvalid}; set: #undefinedBinary for: #SHTextStylerST80 to: {self dbInvalid}; set: #undefinedUnary for: #SHTextStylerST80 to: {self dbInvalid}; "Delineate the selector (good for new users), and make the method look like a mini-document with a title." set: #patternKeyword for: #SHTextStylerST80 to: {self dbMessage lighter. {bold. underlined}}; set: #patternBinary for: #SHTextStylerST80 to: {nil. bold}; set: #patternUnary for: #SHTextStylerST80 to: {self dbMessage lighter. {bold. underlined}}; set: #self for: #SHTextStylerST80 to: {self dbBedrock. bold}; set: #super for: #SHTextStylerST80 to: {self dbBedrock. bold}; set: #true for: #SHTextStylerST80 to: {self dbBedrock. bold}; set: #false for: #SHTextStylerST80 to: {self dbBedrock. bold}; set: #nil for: #SHTextStylerST80 to: {self dbBedrock. bold}; set: #thisContext for: #SHTextStylerST80 to: {self dbBedrock. bold}; set: #return for: #SHTextStylerST80 to: {self dbForeground. bold}; set: #patternArg for: #SHTextStylerST80 to: {self dbSelection twiceLighter. TextEmphasis normal. "darkMap"}; set: #methodArg for: #SHTextStylerST80 to: {self dbSelection twiceLighter. TextEmphasis normal. "darkMap"}; set: #blockPatternArg for: #SHTextStylerST80 to: {self dbSelection twiceLighter}; set: #blockArg for: #SHTextStylerST80 to: {self dbSelection twiceLighter}; set: #argument for: #SHTextStylerST80 to: {self dbSelection twiceLighter}; set: #blockArgColon for: #SHTextStylerST80 to: {self dbBedrock}; set: #leftParenthesis for: #SHTextStylerST80 to: {self dbBedrock muchLighter}; set: #rightParenthesis for: #SHTextStylerST80 to: {self dbBedrock muchLighter}; set: #leftParenthesis1 for: #SHTextStylerST80 to: {self dbBedrock twiceLighter}; set: #rightParenthesis1 for: #SHTextStylerST80 to: {self dbBedrock twiceLighter}; set: #leftParenthesis2 for: #SHTextStylerST80 to: {self dbBedrock}; set: #rightParenthesis2 for: #SHTextStylerST80 to: {self dbBedrock}; set: #leftParenthesis3 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #rightParenthesis3 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #leftParenthesis4 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #rightParenthesis4 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #leftParenthesis5 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #rightParenthesis5 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #leftParenthesis6 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #rightParenthesis6 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #leftParenthesis7 for: #SHTextStylerST80 to: {Color yellow}; set: #rightParenthesis7 for: #SHTextStylerST80 to: {Color yellow}; set: #blockStart for: #SHTextStylerST80 to: {self dbBedrock muchLighter}; set: #blockEnd for: #SHTextStylerST80 to: {self dbBedrock muchLighter}; set: #blockStart1 for: #SHTextStylerST80 to: {self dbBedrock twiceLighter}; set: #blockEnd1 for: #SHTextStylerST80 to: {self dbBedrock twiceLighter}; set: #blockStart2 for: #SHTextStylerST80 to: {self dbBedrock}; set: #blockEnd2 for: #SHTextStylerST80 to: {self dbBedrock}; set: #blockStart3 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #blockEnd3 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #blockStart4 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #blockEnd4 for: #SHTextStylerST80 to: {self dbPurple muchLighter}; set: #blockStart5 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #blockEnd5 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #blockStart6 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #blockEnd6 for: #SHTextStylerST80 to: {self dbOrange muchLighter}; set: #blockStart7 for: #SHTextStylerST80 to: {Color yellow}; set: #blockEnd7 for: #SHTextStylerST80 to: {Color yellow}; set: #arrayStart for: #SHTextStylerST80 to: {self dbBedrock}; set: #arrayEnd for: #SHTextStylerST80 to: {self dbBedrock}; set: #arrayStart1 for: #SHTextStylerST80 to: {self dbForeground}; set: #arrayEnd1 for: #SHTextStylerST80 to: {self dbForeground}; set: #byteArrayStart for: #SHTextStylerST80 to: {self dbForeground}; set: #byteArrayEnd for: #SHTextStylerST80 to: {self dbForeground}; set: #byteArrayStart1 for: #SHTextStylerST80 to: {self dbForeground}; set: #byteArrayEnd1 for: #SHTextStylerST80 to: {self dbForeground}; set: #leftBrace for: #SHTextStylerST80 to: {self dbForeground}; set: #rightBrace for: #SHTextStylerST80 to: {self dbForeground}; set: #cascadeSeparator for: #SHTextStylerST80 to: {self dbForeground}; set: #statementSeparator for: #SHTextStylerST80 to: {self dbForeground}; set: #externalCallType for: #SHTextStylerST80 to: {self dbForeground}; set: #externalCallTypePointerIndicator for: #SHTextStylerST80 to: {self dbForeground}; set: #primitiveOrExternalCallStart for: #SHTextStylerST80 to: {self dbForeground}; set: #primitiveOrExternalCallEnd for: #SHTextStylerST80 to: {self dbForeground}; set: #methodTempBar for: #SHTextStylerST80 to: {self dbBedrock}; set: #blockTempBar for: #SHTextStylerST80 to: {self dbBedrock}; set: #blockArgsBar for: #SHTextStylerST80 to: {self dbBedrock}; set: #primitive for: #SHTextStylerST80 to: {self dbGreen lighter. bold}; set: #pragmaKeyword for: #SHTextStylerST80 to: {self dbGreen. bold}; set: #pragmaUnary for: #SHTextStylerST80 to: {self dbGreen. bold}; set: #pragmaBinary for: #SHTextStylerST80 to: {self dbGreen. bold}; set: #externalFunctionCallingConvention for: #SHTextStylerST80 to: {self dbGreen. bold}; set: #module for: #SHTextStylerST80 to: {self dbGreen. bold}; + set: #blockTempVar for: #SHTextStylerST80 to: {self dbLabel. italic}; + set: #blockPatternTempVar for: #SHTextStylerST80 to: {self dbLabel. italic}; - set: #blockTempVar for: #SHTextStylerST80 to: {self dbLocal. italic}; - set: #blockPatternTempVar for: #SHTextStylerST80 to: {self dbLocal. italic}; set: #instVar for: #SHTextStylerST80 to: {self dbYellow. normal }; + set: #workspaceVar for: #SHTextStylerST80 to: {self dbLabel. italic}; - set: #workspaceVar for: #SHTextStylerST80 to: {self dbLocal. italic}; set: #undefinedIdentifier for: #SHTextStylerST80 to: {self dbInvalid}; set: #incompleteIdentifier for: #SHTextStylerST80 to: {self dbGray. underlined}; + set: #tempVar for: #SHTextStylerST80 to: {self dbLabel. italic}; + set: #patternTempVar for: #SHTextStylerST80 to: {self dbLabel. italic}; - set: #tempVar for: #SHTextStylerST80 to: {self dbLocal. italic}; - set: #patternTempVar for: #SHTextStylerST80 to: {self dbLocal. italic}; set: #poolConstant for: #SHTextStylerST80 to: {self dbConstant }; set: #classVar for: #SHTextStylerST80 to: {self dbReference}; set: #globalVar for: #SHTextStylerST80 to: {self dbClass. normal}. "And the text differ" aUserInterfaceTheme set: #insertTextAttributes for: #TextDiffBuilder to: { TextColor color: self dbRed }; set: #removeTextAttributes for: #TextDiffBuilder to: { TextEmphasis struckOut. TextColor color: self dbBlue }; set: #normalTextAttributes for: #TextDiffBuilder to: { TextEmphasis normal }.! Item was added: + ----- Method: CommunityTheme class>>dbLabel (in category 'colors by purpose') ----- + dbLabel + "Short notes and labels are meant for human consumption." + ^ self dbPink! Item was removed: - ----- Method: CommunityTheme class>>dbLocal (in category 'colors by purpose') ----- - dbLocal - "Local variables can be descriptive, sometimes saving the need for a comment." - ^ self dbPink!

1 0

The Trunk: System-cmm.1130.mcz
by commits＠source.squeak.org 24 Jan '20

24 Jan '20

Chris Muller uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-cmm.1130.mcz ==================== Summary ==================== Name: System-cmm.1130 Author: cmm Time: 24 January 2020, 4:10:56.786823 pm UUID: e3403284-49d1-4d18-9c7f-b0c051a3b4c4 Ancestors: System-cmm.1129 Fix Community (dark) theme balloons not easily seen due to matching color on MC and SqueakMap browsers. =============== Diff against System-cmm.1129 =============== Item was changed: ----- Method: CommunityTheme class>>addDarkDialogs: (in category 'instance creation') ----- addDarkDialogs: aUserInterfaceTheme "self createDark apply." aUserInterfaceTheme set: #borderColor for: #DialogWindow to: self dbSelection; set: #color for: #DialogWindow to: (self dbBlue adjustSaturation: -0.20 brightness: -0.30); set: #titleColor for: #DialogWindow to: self dbBlue twiceDarker; set: #titleTextColor for: #DialogWindow to: Color veryLightGray; set: #textColor for: #DialogWindow to: (Color gray: 0.9); set: #okColor for: #DialogWindow to: self dbGreen; set: #cancelColor for: #DialogWindow to: self dbOrange; set: #buttonColor for: #DialogWindow to: Color darkGray; set: #selectionModifier for: #DialogWindow to: [ [:c | self dbSelection twiceDarker ] ]. "The List Chooser is a dialog, too." aUserInterfaceTheme set: #addColor for: #ListChooser to: self dbBlue; set: #disabledColor for: #ListChooser to: Color transparent. "And the system progress bar." aUserInterfaceTheme set: #color for: #SystemProgressBarMorph to: Color transparent; set: #barColor for: #SystemProgressBarMorph to: self dbSelection. "And the balloon morphs." aUserInterfaceTheme set: #borderColor for: #NewBalloonMorph to: Color transparent ; + set: #color for: #NewBalloonMorph to: (self dbLabel alpha: 0.9) ; - set: #color for: #NewBalloonMorph to: (self dbOrange twiceDarker alpha: 0.9) ; set: #textColor for: #NewBalloonMorph to: Color white .! Item was added: + ----- Method: CommunityTheme class>>dbLabel (in category 'colors by purpose') ----- + dbLabel + "Short notes and labels are meant for human consumption." + ^ self dbPink!

1 0

The Trunk: Kernel-tonyg.1293.mcz
by commits＠source.squeak.org 24 Jan '20

24 Jan '20

Tony Garnock-Jones uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-tonyg.1293.mcz ==================== Summary ==================== Name: Kernel-tonyg.1293 Author: tonyg Time: 24 January 2020, 3:42:53.891725 pm UUID: 818c88e4-7f2f-473a-ace7-e286013c078e Ancestors: Kernel-nice.1292 Repair minor bug in Promise>>resolveWith:. =============== Diff against Kernel-nice.1292 =============== Item was changed: ----- Method: Promise>>resolveWith: (in category 'resolving') ----- resolveWith: arg "Resolve this promise. If arg is itself a Promise, make this promise depend upon it, as detailed in the Promises/A+ spec: https://promisesaplus.com/#the-promise-resolution-procedure" arg isPromise ifTrue: [ arg whenResolved: [:v | self resolveWith: v]. arg whenRejected: [:e | self rejectWith: e]] ifFalse: [ mutex critical: [ (state == #pending) ifTrue: [ | worklist | value := arg. state := #fulfilled. worklist := resolvers. + resolvers := #(). - resolvers = #(). rejecters := #(). worklist do: [:r | self evaluateResolver: r]]]]!

1 0

The Trunk: CollectionsTests-ul.332.mcz
by commits＠source.squeak.org 21 Jan '20

21 Jan '20

Levente Uzonyi uploaded a new version of CollectionsTests to project The Trunk: http://source.squeak.org/trunk/CollectionsTests-ul.332.mcz ==================== Summary ==================== Name: CollectionsTests-ul.332 Author: ul Time: 21 January 2020, 3:02:12.306127 am UUID: 676023ec-8314-440b-acab-f6e29848f816 Ancestors: CollectionsTests-nice.331 HashedCollectionTest changes: - more thorough #testSizeFor - inlined #testPrimes: into #testGoodPrimes - added new checks to #testGoodPrimes - always calculate badPrimes in #testGoodPrimes =============== Diff against CollectionsTests-nice.331 =============== Item was changed: ----- Method: HashedCollectionTest>>testGoodPrimes (in category 'tests - class - sizing') ----- testGoodPrimes + | goodPrimes badPrimes hashMultiplyConstant | + goodPrimes := HashedCollection goodPrimes. + "Bad primes are less than the hashMultiply constant (1664525) and 1664525 \\ prime is close to 0 (mod prime)." + hashMultiplyConstant := 1 hashMultiply. + badPrimes := (Integer primesUpTo: hashMultiplyConstant) select: [ :each | + | remainder | + remainder := hashMultiplyConstant \\ each. + remainder <= 1 or: [ remainder + 1 = each ] ]. + self assert: goodPrimes isArray. + goodPrimes do: [ :each | + self assert: each isInteger. + self assert: each odd. + self assert: each isPrime ]. + self assert: goodPrimes isSorted. + "HashedCollection class >> #goodPrimesAtLeast: relies on the following three." + self assert: goodPrimes size > 3. + self assert: #(3 5 7) equals: (goodPrimes first: 3). + self assert: goodPrimes last > 100000. + "The below snippet tests that primes past 2069 do not interact badly with 1664525, the hashMultiply constant." + goodPrimes + select: [ :each | each > 2069 ] + thenDo: [ :each | + self deny: (badPrimes includes: each). + 1 to: 8 do: [ :k | + 1 to: 32 do: [ :a | + self assert: 1 equals: (each gcd: (256 raisedTo: k) + a). + self assert: 1 equals: (each gcd: (256 raisedTo: k) - a) ] ] ]! - self testPrimes: HashedCollection goodPrimes! Item was removed: - ----- Method: HashedCollectionTest>>testPrimes: (in category 'tests - class - sizing') ----- - testPrimes: primes - - | badPrimes | - badPrimes := #(3 5 71 139 479 5861 277421). "These primes are less than the hashMultiply constant (1664525) and 1664525 \\ prime is close to 0 (mod prime). The following snippet reproduces these numbers: - | hashMultiplyConstant | - hashMultiplyConstant := 1 hashMultiply. - (Integer primesUpTo: hashMultiplyConstant) select: [ :each | - | remainder | - remainder := hashMultiplyConstant \\ each. - remainder <= 1 or: [ remainder + 1 = each ] ]." - self assert: primes isSorted. - primes do: [ :each | - self assert: each isPrime. - self deny: (each > 2069 and: [ badPrimes includes: each ]) ]. - self assert: ( - primes select: [ :p | - | result | - result := false. - p > 2069 ifTrue: [ - 1 to: 8 do: [ :k | - 1 to: 32 do: [ :a | - (p gcd: (256 raisedTo: k) + a) = 1 ifFalse: [ - result := true ]. - (p gcd: (256 raisedTo: k) - a) = 1 ifFalse: [ - result := true ] ] ] ]. - result ]) isEmpty.! Item was changed: ----- Method: HashedCollectionTest>>testSizeFor (in category 'tests - class - sizing') ----- testSizeFor + (0 to: 10000) asArray, #( - 0 1 5 10 30 57 89 578 1234 1912 2411 2591 5627 7849 10999 61356 68602 73189 79868 86789 239984 239985 501175 661865 841558 9669391 15207345 19827345 23469817 27858432 65223175 106650047 157687845 190892299 234947087 264782114 269617510 270995400 392236508 456647275 468699153 606865011 606997796 617927086 + 837938371 880614337 989233852 1000473294 1060034095 1073741833 1073741834) do: [ :numberOfElements | + | capacity | + capacity := HashedCollection sizeFor: numberOfElements. + capacity <= HashedCollection goodPrimes last ifTrue: [ + self assert: capacity isPrime ]. + self assert: capacity odd. + self assert: numberOfElements asFloat / capacity <= 0.75 ]! - 837938371 880614337 989233852 1000473294 1060034095) do: [ :each | - | size | - size := HashedCollection sizeFor: each. - size <= HashedCollection goodPrimes last ifTrue: [ - self assert: size isPrime ]. - self assert: size odd. - self assert: size * 3 // 4 >= each ]!

1 0

The Trunk: Compiler-eem.416.mcz
by commits＠source.squeak.org 19 Jan '20

19 Jan '20

Eliot Miranda uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-eem.416.mcz ==================== Summary ==================== Name: Compiler-eem.416 Author: eem Time: 18 January 2020, 5:39:19.465227 pm UUID: dc1deb74-569c-4fab-8b57-c4513cbead96 Ancestors: Compiler-ct.415 Fix compiler bug with cascaded caseOf:[otherwise:] nodes. When an optimized block form is used in a cascade the form's message is sent ensureCanCascade:, whicharranges to send deoptimize to any and all previously optimized blocks in the form. The bug was that ensureCanCascade: failed to identify the brace node in the optimized caseOf:[otherwise:] form and hence neglected to deoptimize the blocks in the case. The fix is to provide both an isBraceNode to make it easy for ensureCanCascade: to identify braces, and BraceNode>>deoptimize: to do the work. =============== Diff against Compiler-ct.415 =============== Item was added: + ----- Method: BraceNode>>deoptimize (in category 'closure analysis') ----- + deoptimize + "Deoptimize the blocks in a caseOf:[otherwise:] that is being used in a cascade." + elements do: + [:aMessage| + self assert: aMessage selector key == #->. + aMessage receiver deoptimize. + aMessage arguments first deoptimize]! Item was added: + ----- Method: BraceNode>>isBraceNode (in category 'testing') ----- + isBraceNode + ^true! Item was changed: ----- Method: MessageNode>>ensureCanCascade: (in category 'cascading') ----- ensureCanCascade: encoder special > 0 ifTrue: [special := 0. receiver := originalReceiver. selector := encoder encodeSelector: originalSelector. arguments := originalArguments. receiver isBlockNode ifTrue: [receiver deoptimize]. arguments do: [:each| + (each isBlockNode or: [each isBraceNode]) ifTrue: - each isBlockNode ifTrue: [each deoptimize]]]! Item was added: + ----- Method: ParseNode>>isBraceNode (in category 'testing') ----- + isBraceNode + ^false!

1 0

The Trunk: Morphic-cmm.1618.mcz
by commits＠source.squeak.org 18 Jan '20

18 Jan '20

Chris Muller uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-cmm.1618.mcz ==================== Summary ==================== Name: Morphic-cmm.1618 Author: cmm Time: 16 January 2020, 10:50:39.500247 pm UUID: 9cbbc4fc-7a83-4f6c-94ca-6ac110f34c1f Ancestors: Morphic-cmm.1617 When "Mouse over for keyboard focus" is used, release the prior keyboard focus upon restarting the image, so that the Global Command Keys will be honored until the first focus shift. =============== Diff against Morphic-cmm.1617 =============== Item was changed: ----- Method: MorphicProject>>wakeUpTopWindow (in category 'enter') ----- wakeUpTopWindow "Image has been restarted, and the startUp list has been processed. Perform any additional actions needed to restart the user interface." + SystemWindow wakeUpTopWindowUponStartup. + Preferences mouseOverForKeyboardFocus ifTrue: + [ "Allow global command keys to work upon re-entry without having to cause a focus change first." + ActiveHand releaseKeyboardFocus ]! - SystemWindow wakeUpTopWindowUponStartup!

1 0

The Trunk: Compiler-ct.415.mcz
by commits＠source.squeak.org 18 Jan '20

18 Jan '20

Nicolas Cellier uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-ct.415.mcz ==================== Summary ==================== Name: Compiler-ct.415 Author: ct Time: 17 January 2020, 1:51:09.030813 pm UUID: 8c7af075-6a3d-c54b-87a8-135580d7ec7c Ancestors: Compiler-mt.413 Fixes a compiler bug that occured when sending a cascade to a block, caused by trouble with copies in Parser >> cascade. Each message of a cascade must be able to access the same instance of the cascadeReceiver in order to perform possible transformations. This bug is also tested in Tests-ct.425. Please revise carefully. Replaces Compiler-ct.414. Furthermore, this commit refines the documentation of #blockExtent and fixes several spelling errors in the class comment of BlockNode (featuring Grammarly). Thanks to Eliot & Nicolas for their support! For more information, see: http://forum.world.st/BUG-Cannot-compile-cascade-sent-to-block-td5108942.ht… =============== Diff against Compiler-mt.413 =============== Item was changed: ParseNode subclass: #BlockNode instanceVariableNames: 'arguments statements returns nArgsNode size temporaries optimized optimizedMessageNode actualScopeIfOptimized blockExtent remoteTempNode copiedValues closureCreationNode startOfLastStatement tempsMark' classVariableNames: '' poolDictionaries: '' category: 'Compiler-ParseNodes'! + !BlockNode commentStamp: 'ct 1/17/2020 13:05' prior: 0! - !BlockNode commentStamp: 'eem 5/4/2017 17:26' prior: 0! I represent a bracketed block with 0 or more arguments and 1 or more statements. If I am initialized with no statements, I create one. I have a flag to tell whether my last statement returns a value from the enclosing method. I can emit for value in the usual way, in which case I create a BlockClosure to be evaluated by sending it value: at run time. Or I can emit code to be evaluated in line; this only happens at the top level of a method and in certain optimized control structures (see MessageNode class>>initialize MacroSelectors). Instance Variables + actualScopeIfOptimized: <nil | BlockNode> + arguments: <SequencableCollection of: TempVariableNode> + blockExtent: <nil | Interval> + closureCreationNode: <LeafNode> + copiedValues: <nil | (SequencableCollection of: TempVariableNode)> + nArgsNode: <nil | Integer> + optimized: <Boolean> + optimizedMessageNode: <nil | MessageNode> + remoteTempNode: <nil | RemoteTempVectorNode> + returns: <Boolean> + size: <nil | Integer> + startOfLastStatement: <nil | Integer> + statements: <SequencableCollection of: ParseNode> + temporaries: <SequencableCollection of: TempVariableNode> + tempsMark: <nil | Integer> - actualScopeIfOptimized: <nil | BlockNode> - arguments: <SequencableCollection of: TempVariableNode> - blockExtent: <nil | Interval> - closureCreationNode: <LeafNode> - copiedValues: <nil | (SequencableCollection of: TempVariableNode)> - nArgsNode: <nil | Integer> - optimized: <Boolean> - optimizedMessageNode: <nil | MessageNode> - remoteTempNode: <nil | RemoteTempVectorNode> - returns: <Boolean> - size: <nil | Integer> - startOfLastStatement: <nil | Integer> - statements: <SequencableCollection of: ParseNode> - temporaries: <SequencableCollection of: TempVariableNode> - tempsMark: <nil | Integer> actualScopeIfOptimized + - if the receiver has been inlined this is the non-optimized BlockNode the receiver is inlined into. - - if the receiver has been inlined this is the non-optimized BlockNode the receiver is inlined into. arguments + - the sequence of arguments to the block (or method if a top-level block) - - the sequence of arguments to the block (or method if a top-level block) blockExtent + - the interval defining the range of block scopes the receiver comprises, which is itself and any blocks it may contain. See #analyseArguments:temporaries:rootNode: - - the interval defining the range of block scopes the receiver comprises, which is itself and any blokcs it may contain. See #analyseArguments:temporaries:rootNode: closureCreationNode + - a place-holder representing the body of the block. - - a place-holder representing the body of the block. copiedValues + - blocks do not reference the temporary variables of their outer context they close over directly; instead, temporary variables which won't change value are collected and copied into the block, and temporary variables that are modified either within the block or after it has closed over the variables are allocated in a remote temp vector that again becomes one of the block's copied values. In this way, a block refers to the outer temporaries it closes over only through copiedValues. copiedValues is the sequence of these TempVariableNodes. - - blocks do not reference the temporary variables of their outer context they cose over directly; instead temporary variables which won't change value are collected and copied into the block, and temporary variables that are modified either within the block or after it has closed over the variales are allocated in a remote temp vector that again becomes one of the block's copied values. In this way, a block refers to the outer teporaries it closes over only throguh copiedValues. copiedValues is the sequence of these TempVariableNodes. nArgsNode + - a place holder for the encoder to allow it to number block temporaries - - a place holder for the encoder to allow it to number block temporaries optimized + - true if the receiver is inlined, false if a true block - - true if the receiver is inlined, false if a true block optimizedMessageNode + - the MessageNode in which the receiver is optimized, if it is optimized. - - the MessageNode in which the receiver is optimized, if it is optimized. remoteTempNode + - if any of the blocks nested into the receiver either modify a temp or access a temp that is modified after the block is created, then this temp is allocated remotely in a remote temp vector that allows the temp's location to be shared between blocks. This is the node that creates the remote temp vector. - - if any of the blocks nested into the receiver either modify a temp or access a temp that is modified after the block is created, then this temp is allocated remotely in a remote temp vector that allows the temp's location to be shared between blocks. This is the node that creates the remote temp vector. returns + - true if the receiver contains a method return. - - true if the receiver contains a method return. size + - the size of the block's bytecodes if it is generated by embedding its bytecodes within an enclosing CompiledMethod. - - the size of the block's bytecodes if it is generated by embedding its bytecodes within an enclosing CompiledMethod. startOfLastStatement + - the index in the source of the start of the last statement in the block. - - the index in the source of the start of the last statement in the block. statements + - the sequence of statements comprising the receiver - - the sequence of statements comprising the receiver temporaries + - the sequence of temporaries (including the remoteTempNode if any) of block-local temporaries - - the sequence of temporaries (including the remoteTempNode if any) of block-local temporaries tempsMark + - the index in the source of the last block-local temporary, used to auto-insert temps declared during compilation! - - the index in the source of the last block-local temporary, used to auto-insert temps declared during compilation! Item was changed: ----- Method: BlockNode>>blockExtent (in category 'closure analysis') ----- + blockExtent "^<nil | Interval>" - blockExtent "^<Interval>" ^blockExtent! Item was changed: ----- Method: MessageNode>>receiver:arguments:precedence: (in category 'private') ----- receiver: rcvr arguments: args precedence: p receiver := rcvr. + originalReceiver := rcvr. - originalReceiver := rcvr copy. arguments := args. originalArguments := arguments copy. sizes := Array new: arguments size. precedence := p!

1 0

The Trunk: Help-Squeak-Project-tpr.77.mcz
by commits＠source.squeak.org 18 Jan '20

18 Jan '20

tim Rowledge uploaded a new version of Help-Squeak-Project to project The Trunk: http://source.squeak.org/trunk/Help-Squeak-Project-tpr.77.mcz ==================== Summary ==================== Name: Help-Squeak-Project-tpr.77 Author: tpr Time: 17 January 2020, 4:03:16.894255 pm UUID: e80e9094-8b34-4faf-8195-bb2593af07b1 Ancestors: Help-Squeak-Project-ct.75, Help-Squeak-Project-tpr.76 Updates to help pages for new users; explain mouse buttons etc =============== Diff against Help-Squeak-Project-mt.74 =============== Item was changed: ----- Method: SqueakHelp class>>introduction (in category 'pages') ----- introduction "This method was automatically generated. Edit it using:" "SqueakHelp edit: #introduction" + ^(HelpTopic - ^HelpTopic title: 'Welcome' contents: 'Welcome to Squeak Visit http://www.squeak.org for the lastest information. Squeak is an open-source Smalltalk programming system available for all major platforms. It features the Morphic framework, which promotes low effort graphical, interactive application development and maintenance. Many projects have been successfully created with Squeak in a wide range of domains such as education, multimedia, gaming, research, and commerce. Squeak is fast, flexible and free. It''s Smalltalk!!!! + Everything is an object. Objects collaborate by sending messages to achieve the desired application behavior. The Smalltalk programming language has a concise syntax and simple execution semantics. The Smalltalk system is implemented in itself: Compiler, debugger, programming tools, and so on are all Smalltalk code the user can read and modify. Novice programmers can get started easily and experts can engineer elegant solutions at large. - Everything is an object. Objects collaborate by exchanging messages to achieve the desired application behavior. The Smalltalk programming language has a concise syntax and simple execution semantics. The Smalltalk system is implemented in itself: Compiler, debugger, programming tools, and so on are all Smalltalk code the user can read and modify. Novice programmers can get started easily and experts can engineer elegant solutions at large. Morphic UI Framework All graphical objects are tangible and interactively changeable. This promotes short feedback loops and low-effort application development. Morphic thus leverages the live programming experience of traditional Smalltalk environments from a mainly text-focused domain to a graphical one. Powerful Tooling The dynamic Squeak environment provides a variety of tools for browsing, writing, executing, and versioning Smalltalk code. Multiple debugging sessions can be served concurrently. Thanks to Morphic, tool customization can be achieved with reasonable effort. Fast Virtual Machine + There are several fast Squeak VMs that also support other languages of the Smalltalk family. Meta-tracing, just-in-time compilation, stack-to-register mapping, and aggressive in-line message caching yield efficiency in executing Smalltalk code. - There are several fast Squeak VMs that also support other languages of the Smalltalk family. Meta-tracing, just-in-time compilation, stack-to-register mapping, and aggressive in-line message caching yield efficiency in executing Smalltalk byte code. Web Development + With frameworks like Seaside and AIDA, Squeak can be a web server. It provides a layered set of abstractions over HTTP and HTML that let you build highly interactive web applications quickly, reusably, and maintainably. - With frameworks like Seaside and AIDA, Squeak can be a web server. It provides a layered set of abstractions over HTTP and HTML that let you build highly interactive web applications quickly, reusably,` and maintainably. Multi-Platform Support Squeak supports Windows, Linux (X86, X64 and ARM), and OS X and is preinstalled on C.H.I.P., Raspberry Pi, and OLPC XO.!! + ]style[(19 5 1 21 29 399 15 18 6 33 8 87 14 80 8 2 8 2 17 161 20 27 8 254 16 64 8 11 9 6 10 152 20 247 15 22 7 5 4 18 3 163 22 120)a0b,a0,a0b,Rhttp://www.squeak.org;,a0,,i,,Rcode://Object;,,Rcode://MessageSend;,,Rcode://HelpBrowser openForCodeOn: TerseGuideHelp;,,Rcode://Compiler;,,Rcode://Debugger;,,Rcode://Browser;,,i,,Rcode://Morph new openInHand;,,i,,Rcode://ToolSet browse: String selector: #findTokens:;,,Rcode://7/0;,,Rcode://MCWorkingCopyBrowser new show;,,i,,i,,Rhttp://www.seaside.st/;,,Rhttp://www.aidaweb.si/;,,Rcode://WebClient;,,i,!!' readStream nextChunkText) + key: #introduction; + shouldStyle: false; + yourself! - ]style[(19 5 1 21 29 399 15 18 6 36 8 87 14 80 8 2 8 2 17 161 20 27 8 254 16 64 8 11 9 6 10 152 20 252 15 22 7 5 4 18 3 164 22 120)a0b,a0,a0b,Rhttp://www.squeak.org;,a0,,i,,Rcode://Object;,,Rcode://MessageSend;,,Rcode://HelpBrowser openForCodeOn: TerseGuideHelp;,,Rcode://Compiler;,,Rcode://Debugger;,,Rcode://Browser;,,i,,Rcode://Morph new openInHand;,,i,,Rcode://ToolSet browse: String selector: #findTokens:;,,Rcode://7/0;,,Rcode://MCWorkingCopyBrowser new show;,,i,,i,,Rhttp://www.seaside.st/;,,Rhttp://www.aidaweb.si/;,,Rcode://WebClient;,,i,!!' readStream nextChunkText! Item was changed: ----- Method: SqueakLicenseHelp class>>licenseChange (in category 'pages') ----- licenseChange ^(HelpTopic + title: 'License Details and History' - title: 'License has changed with 4.0' readOnlyContents: 'On 23 September 1996, Apple Computer Inc. released Squeak V1.1 under the "Squeak License" (SqL). On May 8, 2006 Apple agreed to relicense original Squeak V1.1 under the Apple Public Source License. On October 12, 2006 Apple granted permission to relicense under Apache license 2.0. In 2006, VPRI began to collect "Distribution Agreements" for all contributors to Squeak since V1.1 up to V3.8, asking them to relicense their contributions, which were originally licensed under SqL, to the MIT license. This was a great effort on behalf of many and VPRI has 100s of signed documents agreeing to this. Do you want to contribute source to Squeak? All new contributions since 4.0 must be under the MIT license. When you make your code available, please state explicitly in some form such as the description on a web site or email announcement that your contribution is under the MIT license. (It doesn''t have to be exclusive; you can release it under difference licenses at the same time.) Have you contributed source to Squeak? If you believe you have, but have not sent in an agreement to allow your submission(s) to be licensed under the MIT license then please see http://netjam.org/squeak/contributors. There you can find a list of known contributors and a PDF of the agreement with instructions. The snail mail address is found in the agreement PDF file. Also there are a few people for which we are lacking full contact information. If you think you can help please also visit the link above and see if you can identify any of the unknown developer initials or any of the developers for whom we do not have a current email address.!! ]style[(603 43 344 38 141 37 433),b,,b,,Rhttp://netjam.org/squeak/contributors;,!!' readStream nextChunkText) key: #licenseChange! Item was changed: ----- Method: SqueakLicenseHelp class>>pages (in category 'accessing') ----- pages + ^#( officialLicense licenseChange)! - ^#(licenseChange officialLicense)! Item was changed: ----- Method: SqueakProjectHelp class>>squeakUserInterface (in category 'pages') ----- squeakUserInterface "This method was automatically generated. Edit it using:" "SqueakProjectHelp edit: #squeakUserInterface" ^(HelpTopic title: 'Squeak User Interface' contents: 'The Squeak User Interface The Squeak UI has some unusual elements that you may not have seen before. Here is a brief introduction to those elements. + 1. Red button, Yellow Button; buttons on mice, trackpads and wheels - what do they do? - 1. Projects + Smalltalk has been around a long time; since before most people had any idea that computers could have graphical screens or that devices such as mice existed. Smalltalk''s UI expects three button mice and to some extent still sticks with the ancient PARC tradition of naming them Red (left), Yellow (middle) and Blue (right). You''ll see these names in code referring to things like ''blueButtonActivity''. - A project is an entire Squeak desktop full of windows. Projects can be used to change quickly from one task to another. An inactive project is represented by a project window, which shows a thumbnail of its state. Project windows are actually more like doors than windows, since you can enter the project just by clicking on them. You can create a new project by choosing ''open...project'' from the screen menu. To exit a project (and return to its parent project), choose ''previous project'' from the screen menu. Each project maintains its own set of windows and other information. + Of course, not many mice used these days actually have the buttons colored, and quite a few have different numbers of buttons and even scroller wheels or trackpad surfaces; all of which can make it confusing to explain what button needs to be used. Laptops tend to have trackpads with perhaps a button, or two, or perhaps require a ctl or alt or cmd key to be pressed at the same time as the trackpad. To try to help work around the potential for confusion, think of the actions as <Select>, <Menu> and <Halo>. + + a) <Select> is the fairly obvious ''select an item in a list'', or ''select a place in some text'', or press a screen button'' action. In many cases you can also hold down the button to drag the pointer to select a range of text, or double-click to perform some other action. + b) <Menu> will normally open a pop-up menu that is specific to the location of the pointer. + c) <Halo> normally displays the Morphic Halo (see below) that lets you perform many actions on the morph (a UI element) - 2. Morphic Halos + In general on a Mac you can also hold the alt key down to get the <Menu> button action when simply pressing on a trackpad (or even one of the rare single-button mice) , or the cmd key for the Halo Button action. On a Windows laptop you can typically use the alt key for <Menu> and the ctl key for Halo. On the assorted unix systems out there you are on your own; the choice of window manager etc can change anything. - In a morphic project, pressing cmd-click (Mac) or alt-click (Windows) on a graphical object (e.g. a window) will surround it with a constellation of colored circles. These are called "halo handles." Additional clicks will cycle through the halos for the other graphical objects in the nesting structure. If you hold down the Shift key while cmd/alt-clicking, the nested morphs will be traversed from innermost outward. Clicking without the cmd/alt key will dismiss the halo. While the halo is up, letting the cursor linger over one of the halo handles for a few seconds will cause a balloon to pop up with the name of that handle. Three useful handles are the top-left "X" handle (delete), the bottom-right yellow handle (resize), and the brown handle (slide the object within its containing object). Halos allow complex graphical objects to be explored - or even disassembled (using the black halo handle). Usually no harm results from taking apart an object; you can just discard the pi eces and create a new one. + In the Preference Browser you can ''swap mouse buttons'' to swap the <Menu> and <Halo> buttons if you prefer; this may feel more familiar for users of systems where a right button press opens menus. - 3. Flaps + 2. Keyboard shortcuts - To enable Flaps, click on the desktop to show the world menu, choose the "Flaps..." menu and "show shared tags". Tabs labeled "Squeak", "Tools", "Supplies", etc., will appear along the edges of the Squeak desktop. Click on any tab to open the corresponding flap. Drag a tab to resize the flap and to relocate the tab. Bring up the halo on any tab and click on its menu handle to be presented with many options relating to the flap. Use the "Flaps..." menu, reached via the desktop menu, to control which flaps are visible and for other flap-related options and assistance. + Squeak has a number of keyboard shortcuts available (which, like everything else are changeable by users) that can be found listed on the ''Command Key Mappings'' page. Some will seem very familiar and some will appear quite strange. Cmd-y, for example swaps the characters on the left and right of the text election; a surprisingly useful key for small tpyos. - 4. Parts Bins + 3. The Dock + + Across the top of the screen lies the Dock; a mix of menu bar, tool bar and search interface. At the extreme left is the Squeak logo, which if clicked will open a menu that gives easy access to updating Squeak, checking your system configuration, and saving and/or quitting. The other headings at the left of the screen provide menus giving access to assorted tools and other facilities; you will probably mostly use the Tools and Apps items. To the right end of the Dock is the search interface, a quick way to search for message names and classes. Type a message (or a partial message, or a class name and press <Return> to see what it finds. There is also a clock and lastly a button that will expand the Squeak window to fill the screen - if possible it will take over the entire screen. Click on it again to return to the previous window size. + + 4. Menus + + Squeak uses several sorts of menu. + a) the pull-down menus - like those that you see on the Dock. + b) pop-up menus that appear where the pointer is located (sometimes shifted to fit on-screen) + c) menus where some entries have an ellipsis (the ...) which tells you that clicking on the entry will open another menu + d) hierarchical menus where entries with a right-pointing triangle icon automatically open another menu, usually to the right of the original menu. As above, this may be modified to fit the new menu on the screen. + As with most GUIs these days clicking on a menu item will choose that action and clicking outside the menu will close the menu(s) and do nothing. + + 5. Projects + + A project is an entire Squeak desktop full of windows and is akin to the desktop spaces used in some window systems. Projects can be used to change quickly from one task to another. An inactive project is represented by a project window, which shows a thumbnail of its state. Project windows are actually more like doors than windows, since you can enter the project just by clicking on them. Each project maintains its own set of windows and other information. + + You can create a new project by choosing ''Create MVC Project'' or ''Create Morphic Project'' from the dock menu. The MVC projects use the older MVC type windows - the original windowing system. Note that not all tools work well - or at all - in MVC projects and you should generllly use Morphic pjojects. The default project is a Morphic project. + To exit a project (and return to its parent project), choose ''previous project'' from the screen menu. + + 6. Morphic Halos + + In a morphic project, pressing the <Halo> Button (see above!!!!) on a graphical object (e.g. a window) will surround it with a constellation of colored circles. These are called "halo handles." Additional clicks will cycle through the halos for the other graphical objects in the nesting structure. If you hold down the Shift key while <Halo>-clicking, the nested morphs will be traversed from innermost outward. Clicking Select or Menu will dismiss the halo. While the halo is up, letting the cursor linger over one of the halo handles for a few seconds will cause a balloon to pop up with the name of that handle. Three useful handles are the top-left "X" handle (delete), the bottom-right yellow handle (resize), and the brown handle (slide the object within its containing object). Halos allow complex graphical objects to be explored - or even disassembled (using the black halo handle). Usually no harm results from taking apart an object; you can just discard the pieces and create a new one. + + 7. Flaps + + The Flaps are a sort of sliding menu - a drawer - containing tools etc as one way to access them. To enable Flaps, red-click on the desktop background to show the world menu, choose the "Flaps..." menu and "show shared tabs". Tabs labeled "Squeak", "Tools", "Supplies", etc., will appear around the edges of the Squeak desktop. Click on any tab to open the corresponding flap. Drag a tab to resize the flap and to relocate the tab. Bring up the halo on any tab and click on its menu handle to be presented with many options relating to the flap. Use the "Flaps..." menu, reached via the desktop menu, to control which flaps are visible and for other flap-related options and assistance. + + 8. Parts Bins + You can obtain new objects in many ways. The "Objects Catalog" (choose "objects'' from the world menu or open the objects flap) and several of the standard flaps (e.g. "Tools" and "Supplies") serve as "Parts Bins" the for new objects. Drag any icon you see in a Parts Bin and a fresh copy of the kind of object it represents will appear "in your hand"; click to deposit the new object anywhere you wish. You can also add your own objects to any of the flaps - just drag your object over the tab, wait for the flap to pop open, then drop the object at the desired position in the flap. !! + ]style[(25 127 88 284 1 14 1 17 1 1011 1 59 1 137 1 493 25 52 1 86 20 73 5 123 13 422 5 5 4 132 1 283 10 156 1 81 1 415 1 19 13 223 16 679 16 50 1 91 15 851 7 696 13 48 15 525)b,,i,,b,,b,,b,,b,,b,,b,,i,,b,,i,,i,,i,,i,,i,,b,,i,,b,,b,,b,,i,,Rcode://(ProjectViewMorph newProjectViewInAWindowFor: MorphicProject new) openInWorld;,,i,,b,,Rcode://SystemWindow topWindow addHalo;,,i,,i,,Rcode://Project current world activateObjectsTool;,!!' readStream nextChunkText) + key: #squeakUserInterface; + shouldStyle: false; + yourself! - ]style[(25 127 12 161 16 413 17 150 15 860 8 580 14 48 15 525)b,,i,,Rcode://(ProjectViewMorph newProjectViewInAWindowFor: MorphicProject new) openInWorld;,,i,,Rcode://SystemWindow topWindow addHalo;,,i,,i,,Rcode://Project current world activateObjectsTool;,!!' readStream nextChunkText) - key: #squeakUserInterface! Item was changed: ----- Method: SqueakProjectHelp class>>workingWithSqueak (in category 'pages') ----- workingWithSqueak "This method was automatically generated. Edit it using:" "SqueakProjectHelp edit: #workingWithSqueak" ^(HelpTopic title: 'Working with Squeak' contents: + 'Take few minutes and get familiar with the image concept of the Squeak/Smalltalk system. This includes starting and quitting the image, learning where all the objects live, and understanding where your source code resides. - 'Working with Squeak - Take few minutes and get familiar with the image concept of the Squeak/Smalltalk system. This includes starting and quitting the image, learning where all the objects live, and understanding where your source code resides. - 1. Starting and Quitting + Like most Smalltalks, the machine-executable portion is a relatively small program known as the "virtual machine" (VM). The VM''s job is to provide services from the physical machine to the Smalltalk system; services like memory management; input from keybords, mice, and networks; output to screens, files, and networks. The Smalltalk system, including all data and code, is a system of objects built from the ground up, and interpreted by this virtual computer. This affords a Smalltalk system platform portability. - Like most Smalltalks, the machine-executable portion is a relatively small program known as the "virtual machine" (VM). The VM''s job is to provide services from the physical machine to real Smalltalk objects. Services like input and output. The Smalltalk system, including all data and code, is a system of objects, built from the ground up, and interpreted by this virtual computer. This affords Smalltalk system platform portability. + Smalltalk cannot run without the VM. The VM can''t do anything useful except process Smalltalk systems. They belong together like Rebo and Zooty. - Smalltalk cannot run without the VM. The VM can''t do anything useful except process Smalltalk systems. + To start the system + - on most OS you can double-click on the ''.image'' file and the OS file type handler will start the VM with that image file. + - on many OS, drag the ".image" data file to the VM executable application, typically named "Squeak"+ some version name such as "Squeak5.3. + - where a command line terminal or shell is used, there are several command-line options for starting the system. typically you can run `squeak --help` for some help. + By default, the system will open on the screen in a single OS hosted window, though there are options for headless usage. - To start the system, drag the ".image" data file to the VM executable "squeak". There are myriad command-line options for starting the system via the command-line (see squeak --help). By default, the system will open on the screen in a single OS window. + To quit a Squeak session, choose ''quit'' from the Squeak-logo menu at the left of the menu bar (the Dock) at the top of the window. That will close the session and you will lose any work you did. + If you ''save'', the image file will be overwritten and resume from that place the next time it''s launched. + In general you should not over-write the delivered image file but instead use the ''save as'' option to create your own work copy. - To quit a Squeak session, choose ''quit'' from the menu bar. If you save, the image file will be overwritten and resume from that place the next time it''s launched. 2. The Image File Squeak is an environment built in its own objects from the ground up, including one or more end-user applications. All of the objects in the system -- Classes, Dictionaries, Windows, Customers and other objects that make up the Squeak environment are stored in a binary ".image" file. This is the "object-data file" loaded by the VM when Squeak is launched. When an image is started, every object resumes exactly from where it was last saved. 3. The Sources File Smalltalk is traditionally includes the source code in the running system. However, keeping multiple copies of the same source code in all images files is wasteful. Therefore, the source code itself is kept in a read-only .sources file and accessed by all images. The image files merely have pointers into this file, which is read on-the-fly to present original source code. The code of the base system is stored in the file "SqueakV50.sources". This file does not change except between releases of Squeak. Normally this file should be placed in the folder containing the VM executable. 4. The Changes File + The purpose of Squeak is to develop new programs and systems. Code changes to the running system are effective immediately. But since multiple images can be running, they could not all update the .sources file safely. Therefore, each image file is accompanied by a ".changes" file which contains source code changes for that and only that Smalltalk system.. - The purpose of Squeak is to develop new programs and systems. Code changes to the running system are effective immediately. But since multiple images can be running, they cannot all update the .sources file safely. Therefore, each image file is accompanied by a ".changes" file which contains source code changes for that and only that Smalltalk system.. The changes file is important for project work. It keeps a sequential log of development activity for the purpose of recovering work performed since the last image-save. Any of several events could lead to the need to recover work, including a power-outage or making an erroneous change to code required to keep the system running. The changes file does not consume memory space, so Squeak is able to keep a complete history of all program changes. This makes it easy to examine or even reinstate older versions of methods (see ''versions'' option in browser selector pane). This encourages experimentation, since you can easily revert to the original versions of any set of methods. In extreme cases where sources and/or changes files are not available, the system can still run, and will automatically decompile the bytecode methods in image memory, if necessary, into readable and editable versions of the original source code (only comments and temporary variable names are lost). 5. Transferring Code-Snippets Between Images In addition to the ''save'' command that saves the entire state of the system, the code of individual methods, categories or classes may be ''filed out'' and then filed-in to another image. 6. Packages + The code of an entire project is encapsulated in a Package. This allows users to share their code with other users. Code of packages are delineated by the categories of their classes, and methods. The Monticello browser is then used to wrap that code into a Package object which can be saved to a Monticello repository. Visit the Squeak swiki for more info - http://wiki.squeak.org/squeak/1287 - The code of an entire project is encapsulated by a Package. This allows users to share their code with other users. Code of packages are delineated by the categories of their classes, and methods. The Monticello browser is then used to wrap that code into a Package object which can be saved to a Monticello repository at http://ss3.gemtalksystems.com/ss. + Some projects end up using the resources provided by several packages, resulting in a hierarchy of packages that make up a system. The ''Installer'' class can be used to install such systems.!!' readStream nextChunkText) + key: #workingWithSqueak; + shouldStyle: false; + yourself! - Some projects end up using the resources provided by several packages, resulting in a hierarchy of packages that make up a system. Installer can be used to install such systems.!! - ]style[(19 225 26 969 17 449 19 596 19 1351 44 189 12 539)b,,i,,i,,i,,i,,i,,i,!!' readStream nextChunkText) - key: #workingWithSqueak! Item was added: + SqueakToolsHelp subclass: #SqueakToolsPreferenceBrowserHelp + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Help-Squeak-Project'! Item was added: + ----- Method: SqueakToolsPreferenceBrowserHelp class>>bookName (in category 'accessing') ----- + bookName + <generated> + ^'Preference Browser'! Item was added: + ----- Method: SqueakToolsPreferenceBrowserHelp class>>defaultPage (in category 'accessing') ----- + defaultPage + + ^ #preferenceBrowser! Item was added: + ----- Method: SqueakToolsPreferenceBrowserHelp class>>localAndGlobal (in category 'pages') ----- + localAndGlobal + <generated> + "This method was automatically generated. Edit it using:" + "SqueakToolsPreferenceBrowserHelp edit: #localAndGlobal" + ^(HelpTopic + title: 'Local and global preferences' + contents: + 'Some preferences can be local instead of global. When a preference is set as global, its value will apply to whatever project you are in. A local preference will only be valid in the project that you set it in.!! + ]style[(24 5 181),b,!!' readStream nextChunkText) + key: #localAndGlobal; + shouldStyle: false; + yourself! Item was added: + ----- Method: SqueakToolsPreferenceBrowserHelp class>>pages (in category 'accessing') ----- + pages + <generated> + ^ #(preferenceBrowser localAndGlobal savingAndLoading)! Item was added: + ----- Method: SqueakToolsPreferenceBrowserHelp class>>preferenceBrowser (in category 'pages') ----- + preferenceBrowser + <generated> + "This method was automatically generated. Edit it using:" + "SqueakToolsPreferenceBrowserHelp edit: #preferenceBrowser" + ^(HelpTopic + title: 'What is the Preference Browser' + contents: + 'Many aspects of the system are governed by the settings of various preferences. The Preference Browser lists all of them and allows you to adjust them. + + Click on any of the categories shown in the list on the left to see all the preferences in that category. Alternatively, type into the search box at the top of the window and all preferences matching whatever you typed will appear in the category "search results". + + To find out more about any a particular preference, just select it and its help text will appear. The "more" button at the end of the help text opens up a menu with some more expert-oriented options.!! + ]style[(84 18 186 10 121 16 183),Rcode://PreferenceBrowser open;b,,b,,b,!!' readStream nextChunkText) + key: #preferenceBrowser; + shouldStyle: false; + yourself! Item was added: + ----- Method: SqueakToolsPreferenceBrowserHelp class>>savingAndLoading (in category 'pages') ----- + savingAndLoading + <generated> + "This method was automatically generated. Edit it using:" + "SqueakToolsPreferenceBrowserHelp edit: #savingAndLoading" + ^(HelpTopic + title: 'Saving and loading' + contents: + 'The Save button allows you to quickly save your current settings in your image so they can be restored later using the Load button. This is useful to make some experiments and revert them later. + + To carry your settings to another Squeak image, you might want to use the Save to disk and Load from disk buttons. The former option will store all your settings in a file named ''my.prefs'' in your Squeak''s current directory.!! + ]style[(4 4 111 4 147 12 5 14 92 26 1),b,,b,,b,,b,,Rcode://FileList open;,!!' readStream nextChunkText) + key: #savingAndLoading; + shouldStyle: false; + yourself!

1 0

The Trunk: Morphic-cmm.1617.mcz
by commits＠source.squeak.org 17 Jan '20

17 Jan '20

Chris Muller uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-cmm.1617.mcz ==================== Summary ==================== Name: Morphic-cmm.1617 Author: cmm Time: 10 January 2020, 7:32:31.635312 pm UUID: ce0033f9-62f5-4c12-9b75-24d613d56c50 Ancestors: Morphic-tpr.1616 - Fix inescapable modal dialog. - Fix truncation of the first line of PluggableListMorphs when a font larger than the default is used. =============== Diff against Morphic-tpr.1616 =============== Item was changed: ----- Method: DialogWindow>>getUserResponse (in category 'running') ----- getUserResponse | hand world | self message ifEmpty: [messageMorph delete]. "Do not waste space." self paneMorph submorphs ifEmpty: ["Do not waste space and avoid strange button-row wraps." self paneMorph delete. self buttonRowMorph wrapDirection: #none]. hand := self currentHand. world := self currentWorld. self fullBounds. self moveToPreferredPosition. self openInWorld: world. hand showTemporaryCursor: nil. "Since we are out of context, reset the cursor." hand keyboardFocus in: [:priorKeyboardFocus | hand mouseFocus in: [:priorMouseFocus | self exclusive ifTrue: [hand newMouseFocus: self]. hand newKeyboardFocus: self. [[self isInWorld] whileTrue: [world doOneSubCycle]] ifCurtailed: [self cancelDialog]. hand newKeyboardFocus: priorKeyboardFocus. + hand releaseMouseFocus]]. - hand newMouseFocus: priorMouseFocus]]. ^ result! Item was changed: ----- Method: PluggableListMorph>>initialize (in category 'initialization') ----- initialize - listMorph := self createListMorph. super initialize. - self scroller layoutPolicy: TableLayout new; addMorph: listMorph. + self + minimumWidth: (self font widthOf: $m) * 5 ; + minimumHeight: self font height - self minimumWidth: (self font widthOf: $m) * 5. - ! Item was changed: ----- Method: ProportionalSplitterMorph>>topBoundary (in category 'queries - geometry') ----- topBoundary "Answer the topmost x position the receiver could be moved to." | splitter morphs | splitter := self splitterAbove. morphs := self commonNeighbours: leftOrTop with: splitter. - ^ (splitter ifNil: [owner isSystemWindow ifTrue: [owner panelRect top] ifFalse: [owner innerBounds top]] ifNotNil: [splitter bottom]) + (self minimumHeightOf: morphs)!

1 0

The Trunk: EToys-dtl.376.mcz
by commits＠source.squeak.org 11 Jan '20

11 Jan '20

David T. Lewis uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-dtl.376.mcz ==================== Summary ==================== Name: EToys-dtl.376 Author: dtl Time: 11 January 2020, 2:53:43.182192 pm UUID: 378673fc-1ae5-45ac-ae9b-3400df8547a9 Ancestors: EToys-nice.375, EToys-kfr.374 Merge =============== Diff against EToys-nice.375 =============== Item was changed: ----- Method: WeekMorph>>title (in category 'all') ----- title "Answer a title with the names of the days." | title extent days | title := AlignmentMorph new layoutInset: 0; color: Color red; listDirection: #leftToRight; + vResizing: #shrinkWrap; - vResizing: #shrinkWarp; height: tileRect height. extent := self tile extent. days := (Week startDay = #Monday) ifTrue: [ #(2 3 4 5 6 7 1) ] ifFalse: [ 1 to: 7 ]. (days reverse collect: [:each | Date nameOfDay: each]) do: [:each | title addMorph: ((self tileLabeled: (each copyFrom: 1 to: 2)) extent: extent)]. ^ title !

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages January 2020