The Trunk: Tests-ct.425.mcz

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

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

Name: Tests-ct.425
Author: ct
Time: 30 December 2019, 7:19:53.668602 pm
UUID: fc85b43b-45f8-b340-b295-d43ee9de7a5f
Ancestors: Tests-mt.424

Adds regression test for a compiler bug that was fixed in Compiler-ct.414

=============== Diff against Tests-mt.424 ===============

Item was added:
+ ----- Method: CompilerTest>>testCascadeOnBlock (in category 'tests - syntax') -----
+ testCascadeOnBlock
+ "Regression test. See http://forum.world.st/BUG-Cannot-compile-cascade-sent-to-block-td5108942.html"
+
+ self
+ shouldnt: [Compiler
+ evaluate: '[true] whileFalse; whileFalse'
+ notifying: PluggableTextMorph new "dummy requestor"]
+ raise: Error.
+ self
+ assert: 2
+ equals: (Compiler
+ evaluate: '| x | x := 0. [x := x + 1] doWhileTrue: [false]; doWhileFalse: [true]. x'
+ notifying: PluggableTextMorph new "dummy requestor").!