[squeak-dev] The Trunk: Collections-eem.804.mcz
Levente Uzonyi
leves at caesar.elte.hu
Sun Aug 26 20:39:40 UTC 2018
Hi Eliot,
This one's ancestor is Collections-eem.803, but that's still in the Inbox.
Levente
On Sat, 25 Aug 2018, commits at source.squeak.org wrote:
> Eliot Miranda uploaded a new version of Collections to project The Trunk:
> http://source.squeak.org/trunk/Collections-eem.804.mcz
>
> ==================== Summary ====================
>
> Name: Collections-eem.804
> Author: eem
> Time: 25 August 2018, 3:03:35.102786 pm
> UUID: e4fae5d7-2676-4f01-bc05-21ac3946d248
> Ancestors: Collections-eem.803
>
> Fix TranscriptStream class>>redirectToStdOut: on "platforms" where stdout is not necessarily available (Windows). The existing implementation raises an error on start up on these "platforms".
>
> =============== Diff against Collections-dtl.802 ===============
>
> Item was changed:
> ----- Method: Dictionary>>fillFrom:with: (in category 'private') -----
> fillFrom: aCollection with: aBlock
> "Evaluate aBlock with each of aCollections's elements as the argument.
> Collect the resulting values into self. Answer self."
>
> + aCollection isSequenceable
> + ifTrue:
> + [aCollection associationsDo:
> + [ :element | self add: (aBlock value: element)]]
> + ifFalse:
> + [aCollection keysAndValuesDo:
> + [ :key :value | self at: key put: (aBlock value: value)]]!
> - aCollection keysAndValuesDo: [ :key :value |
> - self at: key put: (aBlock value: value) ]!
>
> Item was changed:
> ----- Method: TranscriptStream class>>redirectToStdOut: (in category 'preferences') -----
> redirectToStdOut: aBoolean
> + "In setting up redirection, first remove all dependents that are stdout,
> + which may include stale files from the last session. Then add a dependency
> + only if asked to redirect to stdout. Blithely doing
> + Transcript removeDependent: FileStream stdout
> + raises an error if stdout is unavailable."
> + Transcript dependents do:
> + [:dep|
> + (dep isStream and: [dep name = #stdout]) ifTrue:
> + [Transcript removeDependent: dep]].
> + (RedirectToStdOut := aBoolean) ifTrue:
> + [Transcript addDependent: FileStream stdout]!
> -
> - (RedirectToStdOut := aBoolean)
> - ifTrue: [Transcript addDependent: FileStream stdout]
> - ifFalse: [Transcript removeDependent: FileStream stdout].!
More information about the Squeak-dev
mailing list
|