[squeak-dev] The Trunk: Graphics-nice.294.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Jul 17 21:38:52 UTC 2014


Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.294.mcz

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

Name: Graphics-nice.294
Author: nice
Time: 17 July 2014, 11:37:07.225 pm
UUID: 2f4d0e12-5574-4f20-8bbb-5c742076427e
Ancestors: Graphics-nice.293

Remove an ounce of Stream complexity...
Next question is why the hell shall we return a ReadWriteStream?

=============== Diff against Graphics-nice.293 ===============

Item was changed:
  ----- Method: TextStyle>>compressedMIMEEncodedStream (in category 'mime file in/out') -----
  compressedMIMEEncodedStream
  	"Answer a ReadWriteStream with my compressed, stored representation as Base64"
  
+ 	| s ff ffcontents |
- 	| s ff ffcontents s2 gzs |
  	self fontArray do: [:f | f releaseCachedState].
  	s := RWBinaryOrTextStream on: ''.
  	ff := SmartRefStream on: s reset.
  	TextConstants at: #forceFontWriting put: true.
  	[ff nextPut: self] 
  		ensure: [TextConstants at: #forceFontWriting put: false].
  	ffcontents := s contents.
+ 	s := RWBinaryOrTextStream with: ffcontents asByteArray zipped base64Encoded.
- 	ff close.
- 	s2 := RWBinaryOrTextStream on: ''.
- 	gzs := GZipWriteStream on: s2.
- 	gzs nextPutAll: ffcontents.
- 	gzs close.
- 	s2 reset.
- 	s := RWBinaryOrTextStream on: (ByteArray new: 10000).
- 	Base64MimeConverter mimeEncode: s2 to: s.
  	^s
  		ascii;
  		reset;
  		yourself!



More information about the Squeak-dev mailing list