[squeak-dev] The Inbox: KernelTests-HenrikSperreJohansen.152.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Jun 11 19:21:59 UTC 2010


A new version of KernelTests was added to project The Inbox:
http://source.squeak.org/inbox/KernelTests-HenrikSperreJohansen.152.mcz

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

Name: KernelTests-HenrikSperreJohansen.152
Author: HenrikSperreJohansen
Time: 11 June 2010, 9:21:51.574 pm
UUID: 1c779df0-38f5-664b-b09e-f57cc1cac842
Ancestors: KernelTests-nice.151

Test for temp values when restarting blocks, fixed in Kernel-HenrikSperreJohansen.458

=============== Diff against KernelTests-nice.151 ===============

Item was added:
+ ----- Method: MethodContextTest>>testRestart (in category 'tests') -----
+ testRestart
+ 	self should: [self privRestartTest] notTakeMoreThan: 0.1 second!

Item was added:
+ ----- Method: MethodContextTest>>privRestartTest (in category 'private') -----
+ privRestartTest
+ 	"This tests may loop endlessly if incorrect, so call it from another method testing it does not time out"
+ 	|a firstTimeThrough |
+ 	firstTimeThrough := true.
+ 	a := 10.
+ 	
+ 	self assert: 30 equals: [|b| 
+ 		self assert: 10 == a .
+ 		self assert: nil == b.
+ 		b := a + 20. 
+ 		firstTimeThrough ifTrue: [
+ 			firstTimeThrough := false.
+ 			thisContext restart.].
+ 		b] value
+ !




More information about the Squeak-dev mailing list