[squeak-dev] The Inbox: Multilingual-xw.285.mcz

commits at source.squeak.org commits at source.squeak.org
Sat May 7 15:10:12 UTC 2022


A new version of Multilingual was added to project The Inbox:
http://source.squeak.org/inbox/Multilingual-xw.285.mcz

==================== Summary ====================

Name: Multilingual-xw.285
Author: xw
Time: 7 May 2022, 11:10:07.055063 pm
UUID: 233fb9c3-faf0-bd41-9c4e-1f2ac4f55d7d
Ancestors: Multilingual-mt.284

Use UTF32InputInterpreter (no leadingChar) for Unicode platforms

See this proposal for more details: https://github.com/squeak-smalltalk/squeak-object-memory/issues/18

=============== Diff against Multilingual-mt.284 ===============

Item was changed:
  ----- Method: JapaneseEnvironment class>>inputInterpreterClass (in category 'accessing') -----
  inputInterpreterClass
  	| platformName encoding |
  	platformName := Smalltalk platformName.
  	platformName = 'Win32' ifTrue:
  		[^self win32VMUsesUnicode
+ 			ifTrue: [UTF32InputInterpreter]
- 			ifTrue: [UTF32JPInputInterpreter]
  			ifFalse: [WinShiftJISInputInterpreter]].
  	platformName = 'Mac OS' ifTrue:
  		[^((Smalltalk osVersion indexOf: $.) > 4 "i.e. not 9xx.n, but 10xx.n, 11xx.n etc"
  			and: [(Smalltalk getSystemAttribute: 3) isNil])
  				ifTrue: [MacUnicodeInputInterpreter]
  				ifFalse: [MacShiftJISInputInterpreter]].
  	platformName = 'unix' ifTrue:
  		[encoding := X11Encoding encoding.
  		(EUCJPTextConverter encodingNames includes: encoding) ifTrue:
  			[^UnixEUCJPInputInterpreter].
  		(UTF8TextConverter encodingNames includes: encoding) ifTrue:
  			[^UnixUTF8JPInputInterpreter].
  		(ShiftJISTextConverter encodingNames includes: encoding) ifTrue:
  			[^ MacShiftJISInputInterpreter]].
  	^ MacRomanInputInterpreter!

Item was changed:
  ----- Method: NepaleseEnvironment class>>inputInterpreterClass (in category 'accessing') -----
  inputInterpreterClass
  	| platformName |
  	platformName := SmalltalkImage current platformName.
  	platformName = 'Win32'
+ 		ifTrue: [^ UTF32InputInterpreter].
- 		ifTrue: [^ UTF32NPInputInterpreter].
  	platformName = 'Mac OS'
  		ifTrue: [^ MacUnicodeInputInterpreter].
  	platformName = 'unix'
+ 		ifTrue: [^ UTF32InputInterpreter].
- 		ifTrue: [^ UTF32NPInputInterpreter].
  	^ MacRomanInputInterpreter!

Item was changed:
  ----- Method: RussianEnvironment class>>inputInterpreterClass (in category 'subclass responsibilities') -----
  inputInterpreterClass
  	| platformName  |
  	platformName := Smalltalk platformName.
  	platformName = 'Win32'
+ 		ifTrue: [^UTF32InputInterpreter].
- 		ifTrue: [^UTF32RussianInputInterpreter].
  	platformName = 'Mac OS'
  		ifTrue: [^ (((Smalltalk osVersion indexOf: $.) > 4 "i.e. not 9xx.n, but 10xx.n, 11xx.n etc")
  					and: [(Smalltalk getSystemAttribute: 3) isNil])
  				ifTrue: [MacUnicodeInputInterpreter]
  				ifFalse: [MacRomanInputInterpreter]].
  	platformName = 'unix'
+ 		ifTrue: [^ UTF32InputInterpreter].
- 		ifTrue: [^ UTF32RussianInputInterpreter].
  	^ MacRomanInputInterpreter!

Item was changed:
  ----- Method: SimplifiedChineseEnvironment class>>inputInterpreterClass (in category 'accessing') -----
  inputInterpreterClass
  	| platformName |
  	platformName := Smalltalk platformName.
  	platformName = 'Win32' ifTrue:
+ 		[^UTF32InputInterpreter].
- 		[^UTF32CNInputInterpreter].
  	platformName = 'Mac OS' ifTrue: 
  		[^((Smalltalk osVersion indexOf: $.) > 4 "i.e. not 9xx.n, but 10xx.n, 11xx.n etc") 
  			ifTrue: [MacUnicodeInputInterpreter]
  			ifFalse: [WinGB2312InputInterpreter]].
  	^MacRomanInputInterpreter!



More information about the Squeak-dev mailing list