compiler/PPCNotMessagePredicateNode.st
changeset 421 7e08b31e0dae
parent 414 0eaf09920532
child 422 116d2b2af905
--- a/compiler/PPCNotMessagePredicateNode.st	Wed Nov 19 10:52:37 2014 +0000
+++ b/compiler/PPCNotMessagePredicateNode.st	Mon Nov 24 00:09:23 2014 +0000
@@ -45,3 +45,14 @@
 	compiler dedent.
 ! !
 
+!PPCNotMessagePredicateNode methodsFor:'comparison'!
+
+= anotherNode
+	super = anotherNode ifFalse: [ ^ false ].
+	^ message = anotherNode message.
+!
+
+hash
+	^ super hash bitXor: message hash
+! !
+