equal
deleted
inserted
replaced
35 compiler add: 'ifFalse: [ self error: ''predicate not found'' ]'. |
35 compiler add: 'ifFalse: [ self error: ''predicate not found'' ]'. |
36 compiler add: 'ifTrue: [ context next ].'. |
36 compiler add: 'ifTrue: [ context next ].'. |
37 compiler dedent. |
37 compiler dedent. |
38 ! ! |
38 ! ! |
39 |
39 |
|
40 !PPCMessagePredicateNode methodsFor:'comparing'! |
|
41 |
|
42 = anotherNode |
|
43 super = anotherNode ifFalse: [ ^ false ]. |
|
44 ^ message = anotherNode message. |
|
45 ! |
|
46 |
|
47 hash |
|
48 ^ super hash bitXor: message hash |
|
49 ! ! |
|
50 |