On 25 Jul 2015, at 19:40, Esteban Lorenzano <estebanlm@gmail.com> wrote:
(From my vacations)
Doesn't this solves the problem?
stream << $( << name << $)
It is already there :)
Yes, indeed: String streamContents: [ :out | out <<$( << 'test-' << 123 << $) ] (But it is not perfect, there is still confusion there) We are trying to reduce the String and Stream API, so any addition should be really important/significant.
Now I comeback to watch the see...
On 25 Jul 2015, at 18:39, Hernán Morales Durand <hernan.morales@gmail.com> wrote:
In BioSmalltalk I use this pattern a lot:
aStream nextPutAll: self name between: $[ -> $].
so yes, that would be a nice inclusion for me :)
Cheers,
Hernán
2015-07-24 17:48 GMT-03:00 stepharo <stepharo@free.fr>: HI
while working on a lecture I saw that we have about 75 cases like:
aStream nextPut: $(. .... aStream nextPut: $).
storeOn: aStream "Store a description of the elements of the complement rather than self."
aStream nextPut: $(. absent storeOn: aStream. aStream nextPut: $); space; nextPutAll: #complement.
printElementsOn: aStream aStream nextPut: $(. self size > 100 ifTrue: [aStream nextPutAll: 'size '. self size printOn: aStream] ifFalse: [self keysSortedSafely do: [:key | aStream print: key; nextPutAll: '->'; print: (self at: key); space]]. aStream nextPut: $)
we have surroundedBy: aString
surroundedBy: aString ^ self class streamContents: [ :s| s nextPutAll: aString. s nextPutAll: self. s nextPutAll: aString ].
But only working on aString. To me it looks like it ia class for having it on stream.
What do you think?