Andreas Raab uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-ar.95.mcz

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

Name: KernelTests-ar.95
Author: ar
Time: 21 September 2009, 10:17:45 am
UUID: 80a7b914-beda-c44b-8e13-7734e7c3fe2e
Ancestors: KernelTests-nice.94

Add tests for ensuring that delays raise errors when they are scheduled multiple times.

=============== Diff against KernelTests-nice.94 ===============

Item was added:
+ ----- Method: DelayTest>>testMultiSchedule (in category 'testing-limits') -----
+ testMultiSchedule
+ 	"Ensure that scheduling the same delay twice raises an error"
+ 	| delay |
+ 	delay := Delay forSeconds: 1.
+ 	delay schedule.
+ 	self should:[delay schedule] raise: Error.
+ !

Item was added:
+ ----- Method: DelayTest>>testMultiProcessWaitOnSameDelay (in category 'testing-limits') -----
+ testMultiProcessWaitOnSameDelay
+ 	"Ensure that waiting on the same delay from multiple processes raises an error"
+ 	| delay p1 p2 wasRun |
+ 	delay := Delay forSeconds: 1.
+ 	wasRun := false.
+ 	p1 := [delay wait] forkAt: Processor activePriority+1.
+ 	p2 := [
+ 		self should:[delay wait] raise: Error.
+ 		wasRun := true.
+ 	] forkAt: Processor activePriority+1.
+ 	p1 terminate.
+ 	p2 terminate.
+ 	self assert: wasRun.
+ 
+ !