[Pkg] The Trunk: Tests-nice.141.mcz

[commits at source.squeak.org]

Nicolas Cellier uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-nice.141.mcz

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

Name: Tests-nice.141
Author: nice
Time: 20 February 2012, 10:51:18.193 pm
UUID: fc5aab1f-fc9a-470f-adb0-b843a78c440b
Ancestors: Tests-eem.140

Add #testEvaluationOfInlinedToDo
for http://code.google.com/p/pharo/issues/detail?id=4915
The inlined and non inlined to:do: should return the same result.

=============== Diff against Tests-eem.140 ===============

Item was added:
+ ----- Method: CompilerTest>>testEvaluationOfInlinedToDo (in category 'testing') -----
+ testEvaluationOfInlinedToDo
+ 	"Whether inlined or not, #to:do: should return the same value"
+ 	| inlinedResult notInlinedResult |
+ 	inlinedResult := Compiler new
+ 				evaluate: '1+1 to: 0 do: [:i | ]'
+ 				in: nil
+ 				to: nil
+ 				notifying: nil 
+ 				ifFail: [^ #failedDoit]
+ 				logged: false.
+ 	notInlinedResult := Compiler new
+ 				evaluate: '| aBlock | aBlock := [:i | ]. 1+1 to: 0 do: aBlock'
+ 				in: nil
+ 				to: nil
+ 				notifying: nil 
+ 				ifFail: [^ #failedDoit]
+ 				logged: false.
+ 	self assert: inlinedResult = notInlinedResult!