X Tutup
Skip to content

Commit d8b8221

Browse files
author
Johan Brichau
committed
Prepare for removal of TextConverter in Pharo: pull out the GRPharoZnUtf8CodecStream from the TextConverter-based code
1 parent 21562c9 commit d8b8221

File tree

13 files changed

+47
-26
lines changed

13 files changed

+47
-26
lines changed
Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,4 @@
11
convenience
22
decode: aByteArray
3-
^ aByteArray utf8Decoded
3+
"^ super decode: aByteArray asByteArray"
4+
^ aByteArray asByteArray utf8Decoded
Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,4 @@
11
conversion
22
decoderFor: aStream
3-
^ GRPharoConverterCodecStream
4-
on: aStream
5-
converter: ZnCharacterEncoder utf8
3+
^ GRPharoZnUtf8CodecStream
4+
on: aStream
Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,4 @@
11
conversion
22
encoderFor: aStream
3-
^ GRPharoConverterCodecStream
4-
on: aStream
5-
converter: ZnCharacterEncoder utf8
3+
^ GRPharoZnUtf8CodecStream
4+
on: aStream

repository/Grease-Pharo90-Core.package/GRZnUtf8CodecStream.class/README.md renamed to repository/Grease-Pharo90-Core.package/GRPharoZnUtf8CodecStream.class/README.md

File renamed without changes.
Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
accessing
2+
greaseNext: anInteger putAll: aCollection startingAt: startIndex
3+
self nextPutAll: (aCollection copyFrom: startIndex to: startIndex + anInteger - 1)
Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,4 @@
1+
initialization
2+
initializeOn: aStream
3+
super initializeOn: aStream.
4+
encoder := ZnCharacterEncoder utf8
Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
accessing
2+
next: anInteger
3+
| writeStream |
4+
writeStream := WriteStream on: (String new: anInteger).
5+
anInteger timesRepeat: [
6+
writeStream nextPut: (self next
7+
ifNil: [ ^ writeStream contents ]) ].
8+
^ writeStream contents
Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,7 @@
1+
accessing
2+
next
3+
| character |
4+
stream atEnd ifTrue: [ ^ nil ].
5+
character := encoder nextFromStream: stream.
6+
^ character isNil
7+
ifFalse: [ character asCharacter ]
Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
accessing
2+
nextPut: aCharacter
3+
encoder nextPut: aCharacter asCharacter toStream: stream
Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
streaming
2+
nextPutAll: aString
3+
aString asString do: [ :each | self nextPut: each ]

0 commit comments

Comments
 (0)
X Tutup