[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
|