[squeak-dev] The Trunk: KernelTests-tonyg.318.mcz

Tobias Pape Das.Linux at gmx.de
Mon Feb 20 21:54:04 UTC 2017


On 20.02.2017, at 22:44, Levente Uzonyi <leves at caesar.elte.hu> wrote:

> Inbox submissions are still rare enough to not justify creating an API for squeaksource. :)

But I Must Not leave my Squeak image :D

> 
> Levente
> 
> On Sat, 18 Feb 2017, Tobias Pape wrote:
> 
>> So, I think we need a way to move from inbox to trunk/treated from the image.
>> Website-only is cumbersome…
>> 
>> Best regards
>> 	-Tobias
>> On 18.02.2017, at 08:44, commits at source.squeak.org wrote:
>> 
>>> Tobias Pape uploaded a new version of KernelTests to project The Trunk:
>>> http://source.squeak.org/trunk/KernelTests-tonyg.318.mcz
>>> ==================== Summary ====================
>>> Name: KernelTests-tonyg.318
>>> Author: tonyg
>>> Time: 17 February 2017, 2:10:54.13995 pm
>>> UUID: 550fed38-fe11-4cea-bccb-2e3c13b421d0
>>> Ancestors: KernelTests-nice.317
>>> Add tests for Promise>>wait (including proposed change from Kernel-tonyg.1059)
>>> =============== Diff against KernelTests-nice.317 ===============
>>> Item was added:
>>> + ----- Method: PromiseTest>>testWaitForRejection (in category 'testing - monad') -----
>>> + testWaitForRejection
>>> + 	| p |
>>> + 	p := Promise new.
>>> + 	[ (Delay forMilliseconds: 1) wait. p rejectWith: Error new ] fork.
>>> + 	self should: [ p wait ] raise: BrokenPromise.!
>>> Item was added:
>>> + ----- Method: PromiseTest>>testWaitForResolution (in category 'testing - monad') -----
>>> + testWaitForResolution
>>> + 	| p |
>>> + 	p := Promise new.
>>> + 	[ (Delay forMilliseconds: 1) wait. p resolveWith: #ok ] fork.
>>> + 	self assert: [ p wait = #ok ]!
>>> Item was added:
>>> + ----- Method: PromiseTest>>testWaitRejectionYieldsCorrectBrokenPromise (in category 'testing - monad') -----
>>> + testWaitRejectionYieldsCorrectBrokenPromise
>>> + 	| p |
>>> + 	p := Promise new.
>>> + 	[ (Delay forMilliseconds: 1) wait. p rejectWith: Error new ] fork.
>>> + 	[ p wait ] on: BrokenPromise do: [ :bp | ^ self assert: [ bp promise == p ] ].
>>> + 	self fail: 'Should not reach this point'!
> 



More information about the Squeak-dev mailing list