equal
deleted
inserted
replaced
8 poolDictionaries:'' |
8 poolDictionaries:'' |
9 category:'PetitCompiler-Nodes' |
9 category:'PetitCompiler-Nodes' |
10 ! |
10 ! |
11 |
11 |
12 |
12 |
13 !PPCAnyNode methodsFor:'as yet unclassified'! |
13 !PPCAnyNode methodsFor:'accessing'! |
|
14 |
|
15 prefix |
|
16 ^ #any |
|
17 ! ! |
|
18 |
|
19 !PPCAnyNode methodsFor:'analysis'! |
14 |
20 |
15 acceptsEpsilon |
21 acceptsEpsilon |
16 ^ false |
22 ^ false |
17 ! |
23 ! |
18 |
24 |
19 asInlined |
|
20 ^ PPCInlineAnyNode new |
|
21 name: name; |
|
22 yourself |
|
23 ! |
|
24 |
|
25 compileWith: compiler effect: effect id: id |
|
26 compiler startMethod: id. |
|
27 compiler add: '^ context next ifNil: [ error := true. ].'. |
|
28 ^ compiler stopMethod. |
|
29 ! |
|
30 |
|
31 firstCharSet |
25 firstCharSet |
32 ^ PPCharSetPredicate on: [:e | true ] |
26 ^ PPCharSetPredicate on: [:e | true ] |
33 ! |
27 ! ! |
34 |
28 |
35 prefix |
29 !PPCAnyNode methodsFor:'visiting'! |
36 ^ #any |
30 |
|
31 accept: visitor |
|
32 ^ visitor visitAnyNode: self |
37 ! ! |
33 ! ! |
38 |
34 |
39 !PPCAnyNode class methodsFor:'documentation'! |
35 !PPCAnyNode class methodsFor:'documentation'! |
40 |
36 |
41 version_HG |
37 version_HG |