changeset 515 | b5316ef15274 |
parent 452 | 9f4558b3be66 |
502:1e45d3c96ec5 | 515:b5316ef15274 |
---|---|
9 category:'PetitCompiler-Nodes' |
9 category:'PetitCompiler-Nodes' |
10 ! |
10 ! |
11 |
11 |
12 !PPCForwardNode methodsFor:'accessing'! |
12 !PPCForwardNode methodsFor:'accessing'! |
13 |
13 |
14 prefix |
14 child: node |
15 "(node name asString beginsWith: 'symbol') ifTrue: [ self halt. ]." |
|
16 ^ super child: node |
|
17 ! |
|
18 |
|
19 defaultName |
|
15 ^ #fw |
20 ^ #fw |
16 ! ! |
21 ! ! |
17 |
22 |
18 !PPCForwardNode methodsFor:'analysis'! |
23 !PPCForwardNode methodsFor:'analysis'! |
19 |
24 |