equal
deleted
inserted
replaced
14 asPPCTree: parser |
14 asPPCTree: parser |
15 ^ parser compileWithConfiguration: configuration |
15 ^ parser compileWithConfiguration: configuration |
16 ! |
16 ! |
17 |
17 |
18 setUp |
18 setUp |
19 | arguments | |
19 | options | |
20 super setUp. |
20 super setUp. |
21 |
21 |
22 visitor := PPCOptimizeChoices new. |
22 visitor := PPCOptimizeChoices new. |
23 |
23 |
24 arguments := PPCArguments default |
24 options := PPCCompilationOptions default |
25 profile: true. |
25 profile: true. |
26 |
26 |
27 configuration := PPCPluggableConfiguration on: [ :_self | |
27 configuration := PPCPluggableConfiguration on: [ :_self | |
28 _self toPPCIr. |
28 _self toPPCIr. |
29 _self cacheFirstFollow. |
29 _self cacheFirstFollow. |
30 ]. |
30 ]. |
31 configuration arguments: arguments. |
31 configuration options: options. |
32 |
32 |
|
33 "Modified: / 24-08-2015 / 23:40:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
33 ! |
34 ! |
34 |
35 |
35 testHasCommonPrefix |
36 testHasCommonPrefix |
36 | foo bar | |
37 | foo bar | |
37 foo := 'foo' asParser name: 'foo'; yourself. |
38 foo := 'foo' asParser name: 'foo'; yourself. |