Eliot Miranda uploaded a new version of MorphicTests to project The Trunk:
http://source.squeak.org/trunk/MorphicTests-eem.74.mcz==================== Summary ====================
Name: MorphicTests-eem.74
Author: eem
Time: 12 April 2021, 11:33:04.505845 am
UUID: 90a13e5e-0e8c-4174-b9d3-15298b6c517c
Ancestors: MorphicTests-mt.73
Fix some shadowed variable warning(s).
=============== Diff against MorphicTests-mt.73 ===============
Item was changed:
----- Method: MorphTest>>test10TransformKeepsLayer (in category 'tests - submorphs - layers') -----
test10TransformKeepsLayer
+ | aMorph transform |
+ aMorph := Morph new.
- | morph transform |
- morph := Morph new.
transform := morph addFlexShell.
+ aMorph morphicLayerNumber: 50.
- morph morphicLayerNumber: 50.
self assert: 50 equals: transform morphicLayerNumber.
transform morphicLayerNumber: 20.
self assert: 20 equals: transform morphicLayerNumber.
+ transform removeMorph: aMorph.
- transform removeMorph: morph.
transform morphicLayerNumber: 50.
self
+ assert: 20 equals: aMorph morphicLayerNumber;
+ assert: 50 equals: transform morphicLayerNumber!
- assert: 20 equals: morph morphicLayerNumber;
- assert: 50 equals: transform morphicLayerNumber.!
Item was changed:
----- Method: MorphTest>>test12ResetLayerToDefault (in category 'tests - submorphs - layers') -----
test12ResetLayerToDefault
+ | aMorph default |
+ aMorph := Morph new.
+ default := aMorph morphicLayerNumber.
- | morph default |
- morph := Morph new.
- default := morph morphicLayerNumber.
+ aMorph morphicLayerNumber: default * 2.
+ self deny: default equals: aMorph morphicLayerNumber.
- morph morphicLayerNumber: default * 2.
- self deny: default equals: morph morphicLayerNumber.
morph morphicLayerNumber: nil.
+ self assert: default equals: aMorph morphicLayerNumber!
- self assert: default equals: morph morphicLayerNumber.!