Andreas Raab uploaded a new version of Multilingual to project The Trunk:
http://source.squeak.org/trunk/Multilingual-ar.86.mcz

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

Name: Multilingual-ar.86
Author: ar
Time: 11 February 2010, 11:42:44.158 pm
UUID: b3c6474e-ab20-df41-9818-dc251ab5c16e
Ancestors: Multilingual-ul.85

Change EncodedCharSet>>digitValue: to EncodedCharSet>>digitValueOf:. Part 1/3.

=============== Diff against Multilingual-ul.85 ===============

Item was added:
+ ----- Method: LanguageEnvironment class>>digitValueOf: (in category 'accessing') -----
+ digitValueOf: char
+ 	"Answer 0-9 if the receiver is $0-$9, 10-35 if it is $A-$Z, and < 0 
+ 	otherwise. This is used to parse literal numbers of radix 2-36."
+ 
+ 	^ Unicode digitValueOf: char.
+ !

Item was added:
+ ----- Method: EncodedCharSet class>>digitValueOf: (in category 'class methods') -----
+ digitValueOf: char
+ 	"Answer 0-9 if the receiver is $0-$9, 10-35 if it is $A-$Z, and < 0 
+ 	otherwise. This is used to parse literal numbers of radix 2-36."
+ 
+ 	| value |
+ 	value := char charCode.
+ 	value <= $9 asciiValue 
+ 		ifTrue: [^value - $0 asciiValue].
+ 	value >= $A asciiValue 
+ 		ifTrue: [value <= $Z asciiValue ifTrue: [^value - $A asciiValue + 10]].
+ 	^ -1
+ !

Item was added:
+ ----- Method: Unicode class>>digitValueOf: (in category 'class methods') -----
+ digitValueOf: char
+ 	"Answer 0-9 if the receiver is $0-$9, 10-35 if it is $A-$Z, and < 0 
+ 	otherwise. This is used to parse literal numbers of radix 2-36."
+ 
+ 	| value |
+ 	value := char charCode.
+ 	value <= $9 asciiValue 
+ 		ifTrue: [^value - $0 asciiValue].
+ 	value >= $A asciiValue 
+ 		ifTrue: [value <= $Z asciiValue ifTrue: [^value - $A asciiValue + 10]].
+ 
+ 	value > (DecimalProperty size - 1) ifTrue: [^ -1].
+ 	^ (DecimalProperty at: value+1)
+ !