A new version of Multilingual was added to project The Inbox:
http://source.squeak.org/inbox/Multilingual-ul.105.mcz==================== Summary ====================
Name: Multilingual-ul.105
Author: ul
Time: 22 March 2010, 8:20:56.511 am
UUID: 111ecd46-1e98-fc47-bdea-ccc67f13f496
Ancestors: Multilingual-nice.104
- implement MultiByteFileStream >> #back (for #backChunk)
=============== Diff against Multilingual-nice.104 ===============
Item was added:
+ ----- Method: ByteTextConverter>>backFromStream: (in category 'conversion') -----
+ backFromStream: aStream
+
+ aStream position = 0 ifTrue: [ ^nil ].
+ aStream isBinary ifTrue: [ ^aStream basicBack ].
+ ^self toSqueak: aStream basicBack!
Item was added:
+ ----- Method: MultiByteFileStream>>basicBack (in category 'private basic') -----
+ basicBack
+
+ self position = 0 ifTrue: [ self errorCantGoBack ].
+ self skip: -1.
+ ^self basicPeek
+ !
Item was added:
+ ----- Method: TextConverter>>backFromStream: (in category 'conversion') -----
+ backFromStream: aStream
+
+ self subclassResponsibility
+ !
Item was added:
+ ----- Method: MultiByteFileStream>>back (in category 'public') -----
+ back
+
+ ^converter backFromStream: self!
Item was added:
+ ----- Method: UTF8TextConverter>>backFromStream: (in category 'conversion') -----
+ backFromStream: aStream
+
+ aStream position = 0 ifTrue: [ ^nil ].
+ aStream isBinary ifTrue: [ ^aStream basicBack ].
+ [ aStream position = 0 or: [
+ (aStream basicBack asciiValue bitXor: 128) >= 64 ] ] whileFalse.
+ ^aStream peek!