equal
deleted
inserted
replaced
32 ^ character asParser |
32 ^ character asParser |
33 ! |
33 ! |
34 |
34 |
35 firstCharSet |
35 firstCharSet |
36 ^ PPCharSetPredicate on: [:e | e = character ] |
36 ^ PPCharSetPredicate on: [:e | e = character ] |
|
37 ! ! |
|
38 |
|
39 !PPCAbstractCharacterNode methodsFor:'comparison'! |
|
40 |
|
41 = anotherNode |
|
42 super = anotherNode ifFalse: [ ^ false ]. |
|
43 ^ character = anotherNode character. |
|
44 ! |
|
45 |
|
46 hash |
|
47 ^ super hash bitXor: character hash |
37 ! ! |
48 ! ! |
38 |
49 |
39 !PPCAbstractCharacterNode methodsFor:'compiling'! |
50 !PPCAbstractCharacterNode methodsFor:'compiling'! |
40 |
51 |
41 body: compiler |
52 body: compiler |