changeset 516 | 3b81c9e53352 |
parent 515 | b5316ef15274 |
--- a/compiler/PPCDelegateNode.st Fri Jul 31 14:07:31 2015 +0100 +++ b/compiler/PPCDelegateNode.st Mon Aug 17 12:56:02 2015 +0100 @@ -17,6 +17,7 @@ ! child: whatever + self assert: (whatever == self) not. child := whatever ! @@ -45,6 +46,7 @@ !PPCDelegateNode methodsFor:'transformation'! replace: node with: anotherNode + self assert: (anotherNode == self) not. child == node ifTrue: [ child := anotherNode ] ! !