equal
deleted
inserted
replaced
4 |
4 |
5 PPExpressionGrammarTest subclass:#PPCExpressionGrammarTest |
5 PPExpressionGrammarTest subclass:#PPCExpressionGrammarTest |
6 instanceVariableNames:'' |
6 instanceVariableNames:'' |
7 classVariableNames:'' |
7 classVariableNames:'' |
8 poolDictionaries:'' |
8 poolDictionaries:'' |
9 category:'PetitCompiler-Extras-Tests-Expressions' |
9 category:'PetitCompiler-Extras-Tests-Misc' |
10 ! |
10 ! |
|
11 |
11 |
12 |
12 !PPCExpressionGrammarTest class methodsFor:'resources'! |
13 !PPCExpressionGrammarTest class methodsFor:'resources'! |
13 |
14 |
14 resources |
15 resources |
15 ^ Array with: (PPCSetUpBeforeTearDownAfterResource for: self) |
16 ^ Array with: (PPCSetUpBeforeTearDownAfterResource for: self) |
89 | time compiler | |
90 | time compiler | |
90 |
91 |
91 compiler := self compiler. |
92 compiler := self compiler. |
92 compiler options parserName: self compiledParserClassName. |
93 compiler options parserName: self compiledParserClassName. |
93 time := Time millisecondsToRun: [ |
94 time := Time millisecondsToRun: [ |
94 self petitParser compileUsingCompiler:compiler. |
95 compiler compile: self petitParser. |
95 ]. |
96 ]. |
96 Transcript show: self petitParserClass name ; show:' compiled in: '; show: time asString; show: 'ms'; cr. |
97 Transcript show: self petitParserClass name ; show:' compiled in: '; show: time asString; show: 'ms'; cr. |
97 |
98 |
98 "Created: / 29-07-2015 / 16:29:38 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
99 "Created: / 29-07-2015 / 16:29:38 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
99 "Modified: / 29-07-2015 / 18:40:47 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
100 "Modified: / 29-07-2015 / 18:40:47 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
103 "Called after all my tests are ryn(when resources are torn down)" |
104 "Called after all my tests are ryn(when resources are torn down)" |
104 |
105 |
105 "Created: / 29-07-2015 / 16:33:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
106 "Created: / 29-07-2015 / 16:33:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
106 ! ! |
107 ! ! |
107 |
108 |
|
109 !PPCExpressionGrammarTest class methodsFor:'documentation'! |
|
110 |
|
111 version_HG |
|
112 |
|
113 ^ '$Changeset: <not expanded> $' |
|
114 ! ! |
|
115 |