Christoph Thiede uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-ct.475.mcz
==================== Summary ====================
Name: Compiler-ct.475 Author: ct Time: 5 May 2022, 9:11:08.778426 pm UUID: bf77ca70-af29-1b46-ab84-13d597882d75 Ancestors: Compiler-ct.474, Compiler-ct.473, Compiler-ct.459, Compiler-ct.461
Non-exhaustive cherry-picking from the inbox.
Compiler-ct.473: Treat non-breaking space (16ra0) as delimiter in parser/scanner. Revision: Add missing postscript update.
Compiler-ct.461: Revise description of #prefAllowUnicharSymbol. '#,' is indeed allowed always (#(1) perform: #, with: #(2)) but '#' (pure hash) is not.
=============== Diff against Compiler-ct.474 ===============
Item was changed: ----- Method: Scanner class>>initializeTypeTable (in category 'initialization') ----- initializeTypeTable "self initializeTypeTable"
| newTable | newTable := Array new: 256 withAll: #xBinary. "default" + newTable atAll: #(9 10 12 13 32 16ra0) put: #xDelimiter. "tab lf ff cr space nbsp" - newTable atAll: #(9 10 12 13 32 ) put: #xDelimiter. "tab lf ff cr space" newTable atAll: ($0 asciiValue to: $9 asciiValue) put: #xDigit.
1 to: 255 do: [:index | (Character value: index) isLetter ifTrue: [newTable at: index put: #xLetter]].
newTable at: $" asciiValue put: #xDoubleQuote. newTable at: $# asciiValue put: #xLitQuote. newTable at: $$ asciiValue put: #xDollar. newTable at: $' asciiValue put: #xSingleQuote. newTable at: $: asciiValue put: #xColon. newTable at: $( asciiValue put: #leftParenthesis. newTable at: $) asciiValue put: #rightParenthesis. newTable at: $. asciiValue put: #period. newTable at: $; asciiValue put: #semicolon. newTable at: $[ asciiValue put: #leftBracket. newTable at: $] asciiValue put: #rightBracket. newTable at: ${ asciiValue put: #leftBrace. newTable at: $} asciiValue put: #rightBrace. newTable at: $^ asciiValue put: #upArrow. newTable at: $_ asciiValue put: #xUnderscore. newTable at: $| asciiValue put: #verticalBar. TypeTable := newTable "bon voyage!!"!
Item was changed: ----- Method: Scanner class>>prefAllowUnicharSymbol (in category 'preferences') ----- prefAllowUnicharSymbol "Accessor for the system-wide preference" + <preference: 'Allow symbols with unique character like #.' - <preference: 'Allow symbols with unique character like #,' category: 'Compiler' + description: 'When true, the historical syntax #., #,, or # is allowed.' - description: 'When true, the historical syntax #, #; or #. is allowed.' type: #Boolean> ^AllowUnicharSymbol ifNil: [false]!
Item was changed: (PackageInfo named: 'Compiler') postscript: '"below, add code to be run after the loading of this package"
"Recompile senders of caseOf:" self systemNavigation allSelectorsAndMethodsDo: [ :behavior :selector :method | (method hasLiteral: #caseOf:) + ifTrue: [behavior recompile: selector]]. + + "Treat non-breaking space (16ra0) as delimiter in parser/scanner (Compiler-ct.473)." + Scanner initialize.'! - ifTrue: [behavior recompile: selector]]'!
squeak-dev@lists.squeakfoundation.org