The Inbox: Multilingual-ul.105.mcz

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!