The Trunk: Collections-ul.238.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Collections-ul.238.mcz

commits-2
Levente Uzonyi uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-ul.238.mcz

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

Name: Collections-ul.238
Author: ul
Time: 2 December 2009, 5:54:41 am
UUID: 86a69c95-3e4b-5d4a-adc6-36e3f1039500
Ancestors: Collections-ul.237

- added #lf and #crlf to WriteStream (like #cr)
- updated String >> #withInternetLineEndings

=============== Diff against Collections-ul.237 ===============

Item was added:
+ ----- Method: WriteStream>>crlf (in category 'character writing') -----
+ crlf
+ "Append a line feed character to the receiver."
+
+ self nextPut: Character cr; nextPut: Character lf!

Item was added:
+ ----- Method: WriteStream>>lf (in category 'character writing') -----
+ lf
+ "Append a line feed character to the receiver."
+
+ self nextPut: Character lf!

Item was changed:
  ----- Method: String>>withInternetLineEndings (in category 'internet') -----
  withInternetLineEndings
+ "change line endings from CR's and LF's to CRLF's.  This is probably in prepration for sending a string over the Internet"
- "change line endings from CR's to CRLF's.  This is probably in prepration for sending a string over the Internet"
 
  ^self class
  new: self size * 16 // 15 "provisions for CR-LF pairs"
  streamContents: [ :stream |
  self lineIndicesDo: [:start :endWithoutDelimiters :end |
  stream nextPutAll: (self copyFrom: start to: endWithoutDelimiters).
  endWithoutDelimiters = end ifFalse: [
+ stream crlf ] ] ]!
- stream cr; nextPut: Character lf ] ] ]!