equal
deleted
inserted
replaced
6 instanceVariableNames:'start stop nameRange' |
6 instanceVariableNames:'start stop nameRange' |
7 classVariableNames:'' |
7 classVariableNames:'' |
8 poolDictionaries:'' |
8 poolDictionaries:'' |
9 category:'PetitCompiler-Extras-Tests-LRP' |
9 category:'PetitCompiler-Extras-Tests-LRP' |
10 ! |
10 ! |
|
11 |
11 |
12 |
12 !PPCLRPNode methodsFor:'accessing'! |
13 !PPCLRPNode methodsFor:'accessing'! |
13 |
14 |
14 nameRange |
15 nameRange |
15 nameRange ifNil: [self halt: 'Error in setting up range info for styling.' ]. |
16 nameRange ifNil: [self halt: 'Error in setting up range info for styling.' ]. |
59 |
60 |
60 acceptVisitor: aPPCLRPNodeVisitor |
61 acceptVisitor: aPPCLRPNodeVisitor |
61 aPPCLRPNodeVisitor visitAnyNode: self. |
62 aPPCLRPNodeVisitor visitAnyNode: self. |
62 ! ! |
63 ! ! |
63 |
64 |
|
65 !PPCLRPNode class methodsFor:'documentation'! |
|
66 |
|
67 version_HG |
|
68 |
|
69 ^ '$Changeset: <not expanded> $' |
|
70 ! ! |
|
71 |