equal
deleted
inserted
replaced
13 !PPTokenizedSmalltalkGrammarResource methodsFor:'as yet unclassified'! |
13 !PPTokenizedSmalltalkGrammarResource methodsFor:'as yet unclassified'! |
14 |
14 |
15 setUp |
15 setUp |
16 | time configuration | |
16 | time configuration | |
17 configuration := PPCConfiguration tokenizing. |
17 configuration := PPCConfiguration tokenizing. |
18 configuration arguments name:#PPTokenizedSmalltalkGrammar. |
18 configuration arguments parserName:#PPTokenizedSmalltalkGrammar. |
19 |
19 |
20 time := Time millisecondsToRun: [ |
20 time := Time millisecondsToRun: [ |
21 PPSmalltalkGrammar new compileWithConfiguration: configuration. |
21 PPSmalltalkGrammar new compileWithConfiguration: configuration. |
22 ]. |
22 ]. |
23 Transcript show: 'Smalltalk Grammar tokenized in: '; show: time asString; show: 'ms'; cr. |
23 Transcript show: 'Smalltalk Grammar tokenized in: '; show: time asString; show: 'ms'; cr. |