changeset 452 | 9f4558b3be66 |
parent 438 | 20598d7ce9fa |
child 515 | b5316ef15274 |
438:20598d7ce9fa | 452:9f4558b3be66 |
---|---|
10 ! |
10 ! |
11 |
11 |
12 !PPCAndNode methodsFor:'accessing'! |
12 !PPCAndNode methodsFor:'accessing'! |
13 |
13 |
14 prefix |
14 prefix |
15 ^ #and |
15 ^ #and |
16 ! ! |
16 ! ! |
17 |
17 |
18 !PPCAndNode methodsFor:'visiting'! |
18 !PPCAndNode methodsFor:'visiting'! |
19 |
19 |
20 accept: visitor |
20 accept: visitor |
21 ^ visitor visitAndNode: self |
21 ^ visitor visitAndNode: self |
22 ! ! |
22 ! ! |
23 |
23 |