[squeak-dev] The Trunk: Multilingual-ar.109.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Mar 26 03:51:02 UTC 2010


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

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

Name: Multilingual-ar.109
Author: ar
Time: 25 March 2010, 8:50:20.81 pm
UUID: 57df4694-dc52-d44b-9e09-295026a07e63
Ancestors: Multilingual-nice.108, Multilingual-ul.105

Merging Multilingual-ul.105

- implement MultiByteFileStream >> #back (for #backChunk)

=============== Diff against Multilingual-nice.108 ===============

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!




More information about the Squeak-dev mailing list