Levente Uzonyi uploaded a new version of Multilingual to project The Trunk:
http://source.squeak.org/trunk/Multilingual-ul.131.mcz

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

Name: Multilingual-ul.131
Author: ul
Time: 16 November 2010, 4:58:38.19 am
UUID: dcf47452-e964-9447-bfe8-432c7b39dd34
Ancestors: Multilingual-ul.130

- use #= for integer comparison instead of #== (http://bugs.squeak.org/view.php?id=2788 )

=============== Diff against Multilingual-ul.130 ===============

Item was changed:
  ----- Method: ShiftJISTextConverter>>nextPut:toStream: (in category 'conversion') -----
  nextPut: aCharacter toStream: aStream 
  	| value leadingChar aChar |
  	aStream isBinary ifTrue: [^aCharacter storeBinaryOn: aStream].
  	aCharacter isTraditionalDomestic ifTrue: [	
  		aChar := aCharacter.
  		value := aCharacter charCode.
  	] ifFalse: [
  		value := aCharacter charCode.
  		(16rFF61 <= value and: [value <= 16rFF9F]) ifTrue: [
  			aStream basicNextPut: (self sjisKatakanaFor: value).
  			^ aStream
  		].
  		aChar := JISX0208 charFromUnicode: value.
  		aChar ifNil: [^ aStream].
  		value := aChar charCode.
  	].
  	leadingChar := aChar leadingChar.
  	leadingChar = 0 ifTrue: [
  		aStream basicNextPut: (Character value: value).
  		^ aStream.
  	].
  	leadingChar == self leadingChar ifTrue: [
  		| upper lower | 
  		upper := value // 94 + 33.
  		lower := value \\ 94 + 33.
+ 		upper \\ 2 = 1 ifTrue: [
- 		upper \\ 2 == 1 ifTrue: [
  			upper := upper + 1 / 2 + 112.
  			lower := lower + 31
  		] ifFalse: [
  			upper := upper / 2 + 112.
  			lower := lower + 125
  		].
  		upper >= 160 ifTrue: [upper := upper + 64].
  		lower >= 127 ifTrue: [lower := lower + 1].
  		aStream basicNextPut: (Character value: upper).
  		aStream basicNextPut: (Character value: lower).
  		^ aStream
  	].
  !