[squeak-dev] The Trunk: Multilingual-mt.266.mczcommits at source.squeak.org commits at source.squeak.orgWed Mar 9 10:01:41 UTC 2022
Marcel Taeumel uploaded a new version of Multilingual to project The Trunk: http://source.squeak.org/trunk/Multilingual-mt.266.mcz ==================== Summary ==================== Name: Multilingual-mt.266 Author: mt Time: 9 March 2022, 11:01:38.89217 am UUID: 1df9d92a-f722-f147-b3d7-00872089abad Ancestors: Multilingual-mt.265 Clean up and extend KOI-8 converters. =============== Diff against Multilingual-mt.265 =============== Item was added: + KOI8TextConverter subclass: #KOI8BTextConverter + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Multilingual-TextConversion'! Item was added: + ----- Method: KOI8BTextConverter class>>encodingNames (in category 'utilities') ----- + encodingNames + + ^ #('koi8-b') copy + ! Item was added: + ----- Method: KOI8BTextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + super initializeDecodeTable. + decodeTable at: 16rA3 + 1 put: 16r0451. + decodeTable at: 16rB3 + 1 put: 16r0401. + decodeTable at: 16rFF + 1 put: 16r042A. + self setCurrencySignToDollar.! Item was added: + KOI8TextConverter subclass: #KOI8ETextConverter + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Multilingual-TextConversion'! Item was added: + ----- Method: KOI8ETextConverter class>>encodingNames (in category 'utilities') ----- + encodingNames + + ^ #('koi8-e' 'iso-ir-111') copy + ! Item was added: + ----- Method: KOI8ETextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + super initializeDecodeTable. + decodeTable := self createTableFrom: ((decodeTable copyFrom: 16r00+1 to: 16r9F+1) , #( + 16r00A0 16r0452 16r0453 16r0451 16r0454 16r0455 16r0456 16r0457 + 16r0458 16r0459 16r045A 16r045B 16r045C 16r00AD 16r045E 16r045F + 16r2116 16r0402 16r0403 16r0401 16r0404 16r0405 16r0406 16r0407 + 16r0408 16r0409 16r040A 16r040B 16r040C 16r00A4 16r040E 16r040F), + (decodeTable copyFrom: 16rC0 + 1 to: 16rFE + 1), + #(16r042A)). + self setCurrencySignToDollar.! Item was added: + KOI8TextConverter subclass: #KOI8FTextConverter + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Multilingual-TextConversion'! Item was added: + ----- Method: KOI8FTextConverter class>>encodingNames (in category 'utilities') ----- + encodingNames + + ^ #('koi8-f') copy + ! Item was added: + ----- Method: KOI8FTextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + super initializeDecodeTable. + decodeTable := self createTableFrom: ((decodeTable copyFrom: 1 to: 128) , #( + 16r2500 16r2502 16r250C 16r2510 16r2514 16r2518 16r251C 16r2524 + 16r252C 16r2534 16r253C 16r2580 16r2584 16r2588 16r258C 16r2590 + 16r2591 16r2018 16r2019 16r201C 16r201D 16r2219 16r2013 16r2014 + 16r00A9 16r2122 16r00A0 16r00BB 16r00AE 16r00AB 16r00B7 16r00A4 + 16r00A0 16r0452 16r0453 16r0451 16r0454 16r0455 16r0456 16r0457 + 16r0458 16r0459 16r045A 16r045B 16r045C 16r0491 16r045E 16r045F + 16r2116 16r0402 16r0403 16r0401 16r0404 16r0405 16r0406 16r0407 + 16r0408 16r0409 16r040A 16r040B 16r040C 16r0490 16r040E 16r040F), + (decodeTable copyFrom: 16rC0 + 1 to: 16rFE + 1), + #(16r042A)). + self setCurrencySignToDollar.! Item was changed: + KOI8TextConverter subclass: #KOI8RTextConverter - TextConverter subclass: #KOI8RTextConverter instanceVariableNames: '' + classVariableNames: '' - classVariableNames: 'FromTable' poolDictionaries: '' category: 'Multilingual-TextConversion'! Item was changed: + ----- Method: KOI8RTextConverter class>>encodingNames (in category 'utilities') ----- - ----- Method: KOI8RTextConverter class>>encodingNames (in category 'as yet unclassified') ----- encodingNames ^ #('koi8-r') copy ! Item was removed: - ----- Method: KOI8RTextConverter class>>initialize (in category 'as yet unclassified') ----- - initialize - " - KOI8RTextConverter initialize - " - FromTable := Dictionary new. - FromTable at: 16r2500 put: 16r80. - FromTable at: 16r2502 put: 16r81. - FromTable at: 16r250C put: 16r82. - FromTable at: 16r2510 put: 16r83. - FromTable at: 16r2514 put: 16r84. - FromTable at: 16r2518 put: 16r85. - FromTable at: 16r251C put: 16r86. - FromTable at: 16r2524 put: 16r87. - FromTable at: 16r252C put: 16r88. - FromTable at: 16r2534 put: 16r89. - FromTable at: 16r253C put: 16r8A. - FromTable at: 16r2580 put: 16r8B. - FromTable at: 16r2584 put: 16r8C. - FromTable at: 16r2588 put: 16r8D. - FromTable at: 16r258C put: 16r8E. - FromTable at: 16r2590 put: 16r8F. - FromTable at: 16r2591 put: 16r90. - FromTable at: 16r2592 put: 16r91. - FromTable at: 16r2593 put: 16r92. - FromTable at: 16r2320 put: 16r93. - FromTable at: 16r25A0 put: 16r94. - FromTable at: 16r2219 put: 16r95. - FromTable at: 16r221A put: 16r96. - FromTable at: 16r2248 put: 16r97. - FromTable at: 16r2264 put: 16r98. - FromTable at: 16r2265 put: 16r99. - FromTable at: 16r00A0 put: 16r9A. - FromTable at: 16r2321 put: 16r9B. - FromTable at: 16r00B0 put: 16r9C. - FromTable at: 16r00B2 put: 16r9D. - FromTable at: 16r00B7 put: 16r9E. - FromTable at: 16r00F7 put: 16r9F. - FromTable at: 16r2550 put: 16rA0. - FromTable at: 16r2551 put: 16rA1. - FromTable at: 16r2552 put: 16rA2. - FromTable at: 16r0451 put: 16rA3. - FromTable at: 16r2553 put: 16rA4. - FromTable at: 16r2554 put: 16rA5. - FromTable at: 16r2555 put: 16rA6. - FromTable at: 16r2556 put: 16rA7. - FromTable at: 16r2557 put: 16rA8. - FromTable at: 16r2558 put: 16rA9. - FromTable at: 16r2559 put: 16rAA. - FromTable at: 16r255A put: 16rAB. - FromTable at: 16r255B put: 16rAC. - FromTable at: 16r255C put: 16rAD. - FromTable at: 16r255D put: 16rAE. - FromTable at: 16r255E put: 16rAF. - FromTable at: 16r255F put: 16rB0. - FromTable at: 16r2560 put: 16rB1. - FromTable at: 16r2561 put: 16rB2. - FromTable at: 16r0401 put: 16rB3. - FromTable at: 16r2562 put: 16rB4. - FromTable at: 16r2563 put: 16rB5. - FromTable at: 16r2564 put: 16rB6. - FromTable at: 16r2565 put: 16rB7. - FromTable at: 16r2566 put: 16rB8. - FromTable at: 16r2567 put: 16rB9. - FromTable at: 16r2568 put: 16rBA. - FromTable at: 16r2569 put: 16rBB. - FromTable at: 16r256A put: 16rBC. - FromTable at: 16r256B put: 16rBD. - FromTable at: 16r256C put: 16rBE. - FromTable at: 16r00A9 put: 16rBF. - FromTable at: 16r044E put: 16rC0. - FromTable at: 16r0430 put: 16rC1. - FromTable at: 16r0431 put: 16rC2. - FromTable at: 16r0446 put: 16rC3. - FromTable at: 16r0434 put: 16rC4. - FromTable at: 16r0435 put: 16rC5. - FromTable at: 16r0444 put: 16rC6. - FromTable at: 16r0433 put: 16rC7. - FromTable at: 16r0445 put: 16rC8. - FromTable at: 16r0438 put: 16rC9. - FromTable at: 16r0439 put: 16rCA. - FromTable at: 16r043A put: 16rCB. - FromTable at: 16r043B put: 16rCC. - FromTable at: 16r043C put: 16rCD. - FromTable at: 16r043D put: 16rCE. - FromTable at: 16r043E put: 16rCF. - FromTable at: 16r043F put: 16rD0. - FromTable at: 16r044F put: 16rD1. - FromTable at: 16r0440 put: 16rD2. - FromTable at: 16r0441 put: 16rD3. - FromTable at: 16r0442 put: 16rD4. - FromTable at: 16r0443 put: 16rD5. - FromTable at: 16r0436 put: 16rD6. - FromTable at: 16r0432 put: 16rD7. - FromTable at: 16r044C put: 16rD8. - FromTable at: 16r044B put: 16rD9. - FromTable at: 16r0437 put: 16rDA. - FromTable at: 16r0448 put: 16rDB. - FromTable at: 16r044D put: 16rDC. - FromTable at: 16r0449 put: 16rDD. - FromTable at: 16r0447 put: 16rDE. - FromTable at: 16r044A put: 16rDF. - FromTable at: 16r042E put: 16rE0. - FromTable at: 16r0410 put: 16rE1. - FromTable at: 16r0411 put: 16rE2. - FromTable at: 16r0426 put: 16rE3. - FromTable at: 16r0414 put: 16rE4. - FromTable at: 16r0415 put: 16rE5. - FromTable at: 16r0424 put: 16rE6. - FromTable at: 16r0413 put: 16rE7. - FromTable at: 16r0425 put: 16rE8. - FromTable at: 16r0418 put: 16rE9. - FromTable at: 16r0419 put: 16rEA. - FromTable at: 16r041A put: 16rEB. - FromTable at: 16r041B put: 16rEC. - FromTable at: 16r041C put: 16rED. - FromTable at: 16r041D put: 16rEE. - FromTable at: 16r041E put: 16rEF. - FromTable at: 16r041F put: 16rF0. - FromTable at: 16r042F put: 16rF1. - FromTable at: 16r0420 put: 16rF2. - FromTable at: 16r0421 put: 16rF3. - FromTable at: 16r0422 put: 16rF4. - FromTable at: 16r0423 put: 16rF5. - FromTable at: 16r0416 put: 16rF6. - FromTable at: 16r0412 put: 16rF7. - FromTable at: 16r042C put: 16rF8. - FromTable at: 16r042B put: 16rF9. - FromTable at: 16r0417 put: 16rFA. - FromTable at: 16r0428 put: 16rFB. - FromTable at: 16r042D put: 16rFC. - FromTable at: 16r0429 put: 16rFD. - FromTable at: 16r0427 put: 16rFE. - FromTable at: 16r042A put: 16rFF. - ! Item was added: + ----- Method: KOI8RTextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + super initializeDecodeTable. + decodeTable := self createTableFrom: ((decodeTable copyFrom: 1 to: 128) , #( + 16r2500 16r2502 16r250C 16r2510 16r2514 16r2518 16r251C 16r2524 + 16r252C 16r2534 16r253C 16r2580 16r2584 16r2588 16r258C 16r2590 + 16r2591 16r2592 16r2593 16r2320 16r25A0 16r2219 16r221A 16r2248 + 16r2264 16r2265 16r00A0 16r2321 16r00B0 16r00B2 16r00B7 16r00F7 + 16r2550 16r2551 16r2552 16r0451 16r2553 16r2554 16r2555 16r2556 + 16r2557 16r2558 16r2559 16r255A 16r255B 16r255C 16r255D 16r255E + 16r255F 16r2560 16r2561 16r0401 16r2562 16r2563 16r2564 16r2565 + 16r2566 16r2567 16r2568 16r2569 16r256A 16r256B 16r256C 16r00A9), + (decodeTable copyFrom: 16rC0 + 1 to: 16rFE + 1), + #(16r042A)). + self setCurrencySignToDollar.! Item was removed: - ----- Method: KOI8RTextConverter>>fromSqueak: (in category 'as yet unclassified') ----- - fromSqueak: char - - ^ Character value: (FromTable at: char charCode ifAbsent: [char asciiValue])! Item was removed: - ----- Method: KOI8RTextConverter>>nextFromStream: (in category 'as yet unclassified') ----- - nextFromStream: aStream - - | character1 | - aStream isBinary ifTrue: [^ aStream basicNext]. - character1 := aStream basicNext. - character1 isNil ifTrue: [^ nil]. - ^ self toSqueak: character1. - ! Item was removed: - ----- Method: KOI8RTextConverter>>nextPut:toStream: (in category 'as yet unclassified') ----- - nextPut: aCharacter toStream: aStream - - | charCode | - aStream isBinary ifTrue: [ ^aCharacter storeBinaryOn: aStream ]. - (charCode := aCharacter charCode) < 256 - ifFalse: [ aStream basicNextPut: ((Character value: (self fromSqueak: aCharacter) charCode)) ] - ifTrue: [ - (latin1Encodings at: charCode + 1) - ifNil: [ aStream basicNextPut: aCharacter ] - ifNotNil: [ :encodedString | aStream basicNextPutAll: encodedString ] ]. - ^aCharacter - ! Item was removed: - ----- Method: KOI8RTextConverter>>toSqueak: (in category 'as yet unclassified') ----- - toSqueak: char - - | value | - value := char charCode. - - value < 128 ifTrue: [^ char]. - value > 255 ifTrue: [^ char]. - ^ Character leadingChar: RussianEnvironment leadingChar code: (#( - 16r2500 16r2502 16r250C 16r2510 16r2514 16r2518 16r251C 16r2524 - 16r252C 16r2534 16r253C 16r2580 16r2584 16r2588 16r258C 16r2590 - 16r2591 16r2592 16r2593 16r2320 16r25A0 16r2219 16r221A 16r2248 - 16r2264 16r2265 16r00A0 16r2321 16r00B0 16r00B2 16r00B7 16r00F7 - 16r2550 16r2551 16r2552 16r0451 16r2553 16r2554 16r2555 16r2556 - 16r2557 16r2558 16r2559 16r255A 16r255B 16r255C 16r255D 16r255E - 16r255F 16r2560 16r2561 16r0401 16r2562 16r2563 16r2564 16r2565 - 16r2566 16r2567 16r2568 16r2569 16r256A 16r256B 16r256C 16r00A9 - 16r044E 16r0430 16r0431 16r0446 16r0434 16r0435 16r0444 16r0433 - 16r0445 16r0438 16r0439 16r043A 16r043B 16r043C 16r043D 16r043E - 16r043F 16r044F 16r0440 16r0441 16r0442 16r0443 16r0436 16r0432 - 16r044C 16r044B 16r0437 16r0448 16r044D 16r0449 16r0447 16r044A - 16r042E 16r0410 16r0411 16r0426 16r0414 16r0415 16r0424 16r0413 - 16r0425 16r0418 16r0419 16r041A 16r041B 16r041C 16r041D 16r041E - 16r041F 16r042F 16r0420 16r0421 16r0422 16r0423 16r0416 16r0412 - 16r042C 16r042B 16r0417 16r0428 16r042D 16r0429 16r0427 16r042A - ) at: (value - 128 + 1)). - ! Item was added: + KOI8TextConverter subclass: #KOI8RUTextConverter + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Multilingual-TextConversion'! Item was added: + ----- Method: KOI8RUTextConverter class>>encodingNames (in category 'utilities') ----- + encodingNames + + ^ #('koi8-ru') copy + ! Item was added: + ----- Method: KOI8RUTextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + super initializeDecodeTable. + decodeTable := self createTableFrom: ((decodeTable copyFrom: 1 to: 128) , #( + 16r2500 16r2502 16r250C 16r2510 16r2514 16r2518 16r251C 16r2524 + 16r252C 16r2534 16r253C 16r2580 16r2584 16r2588 16r258C 16r2590 + 16r2591 16r2592 16r2593 16r201C 16r25A0 16r2219 16r201D 16r2014 + 16r2116 16r2122 16r00A0 16r00BB 16r00AE 16r00AB 16r00B7 16r00A4 + 16r2550 16r2551 16r2552 16r0451 16r0454 16r2554 16r0456 16r0457 + 16r2557 16r2558 16r2559 16r255A 16r255B 16r0491 16r045E 16r255E + 16r255F 16r2560 16r2561 16r0401 16r0404 16r2563 16r0406 16r0407 + 16r2566 16r2567 16r2568 16r2569 16r256A 16r0490 16r040E 16r00A9), + (decodeTable copyFrom: 16rC0 + 1 to: 16rFE + 1), + #(16r042A)). + self setCurrencySignToDollar.! Item was added: + ByteTextConverter subclass: #KOI8TextConverter + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Multilingual-TextConversion'! Item was added: + ----- Method: KOI8TextConverter class>>encodingNames (in category 'utilities') ----- + encodingNames + + ^ #('koi-8') copy! Item was added: + ----- Method: KOI8TextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + decodeTable := (0 to: 255) asArray. + decodeTable := self createTableFrom: ((decodeTable copyFrom: 1 to: 128) , #( + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 -16r001 + 16r044E 16r0430 16r0431 16r0446 16r0434 16r0435 16r0444 16r0433 + 16r0445 16r0438 16r0439 16r043A 16r043B 16r043C 16r043D 16r043E + 16r043F 16r044F 16r0440 16r0441 16r0442 16r0443 16r0436 16r0432 + 16r044C 16r044B 16r0437 16r0448 16r044D 16r0449 16r0447 16r044A + 16r042E 16r0410 16r0411 16r0426 16r0414 16r0415 16r0424 16r0413 + 16r0425 16r0418 16r0419 16r041A 16r041B 16r041C 16r041D 16r041E + 16r041F 16r042F 16r0420 16r0421 16r0422 16r0423 16r0416 16r0412 + 16r042C 16r042B 16r0417 16r0428 16r042D 16r0429 16r0427 -16r001)). + + self setCurrencySignToUniversal.! Item was added: + ----- Method: KOI8TextConverter class>>setCurrencySignToDollar (in category 'class initialization') ----- + setCurrencySignToDollar + + decodeTable at: 16r24 + 1 put: 16r24.! Item was added: + ----- Method: KOI8TextConverter class>>setCurrencySignToUniversal (in category 'class initialization') ----- + setCurrencySignToUniversal + + decodeTable at: 16r24 + 1 put: 16rA4.! Item was added: + KOI8TextConverter subclass: #KOI8UTextConverter + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Multilingual-TextConversion'! Item was added: + ----- Method: KOI8UTextConverter class>>encodingNames (in category 'utilities') ----- + encodingNames + + ^ #('koi8-u') copy + ! Item was added: + ----- Method: KOI8UTextConverter class>>initializeDecodeTable (in category 'class initialization') ----- + initializeDecodeTable + + super initializeDecodeTable. + decodeTable := self createTableFrom: ((decodeTable copyFrom: 1 to: 128) , #( + 16r2500 16r2502 16r250C 16r2510 16r2514 16r2518 16r251C 16r2524 + 16r252C 16r2534 16r253C 16r2580 16r2584 16r2588 16r258C 16r2590 + 16r2591 16r2592 16r2593 16r2320 16r25A0 16r2219 16r221A 16r2248 + 16r2264 16r2265 16r00A0 16r2321 16r00B0 16r00B2 16r00B7 16r00F7 + 16r2550 16r2551 16r2552 16r0451 16r0454 16r2554 16r0456 16r0457 + 16r2557 16r2558 16r2559 16r255A 16r255B 16r0491 16r255D 16r255E + 16r255F 16r2560 16r2561 16r0401 16r0404 16r2563 16r0406 16r0407 + 16r2566 16r2567 16r2568 16r2569 16r256A 16r0490 16r256C 16r00A9), + (decodeTable copyFrom: 16rC0 + 1 to: 16rFE + 1), + #(16r042A)). + self setCurrencySignToDollar.! Item was changed: + (PackageInfo named: 'Multilingual') postscript: 'KOI8TextConverter withAllSubclassesDo: [:ea | ea initializeTables].'! - (PackageInfo named: 'Multilingual') postscript: 'ShiftJISTextConverter initializeLatin1MapAndEncodings.'!
More information about the Squeak-dev mailing list |