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]]'!