1 "{ Package: 'stx:goodies/petitparser/compiler/tests/extras' }"

     2 

     3 "{ NameSpace: Smalltalk }"

     4 

     5 TestResource subclass:#PPTokenizedExpressionGrammarResource

     6 	instanceVariableNames:''

     7 	classVariableNames:''

     8 	poolDictionaries:''

     9 	category:'PetitCompiler-Extras-Tests-Expressions'

    10 !

    11 

    12 

    13 !PPTokenizedExpressionGrammarResource methodsFor:'as yet unclassified'!

    14 

    15 setUp

    16     | time configuration |

    17     configuration := PPCTokenizingConfiguration new.

    18     configuration arguments parserName:#PPTokenizedExpressionGrammar.

    19     

    20     

    21     time := Time millisecondsToRun: [

    22         PPExpressionGrammar new compileWithConfiguration: configuration.

    23     ].

    24     Transcript show: 'Expression grammar tokenized in: '; show: time asString; show: 'ms'; cr.

    25 

    26     "Modified: / 26-05-2015 / 07:25:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"

    27 ! !

    28 

    29 !PPTokenizedExpressionGrammarResource class methodsFor:'documentation'!

    30 

    31 version_HG

    32 

    33     ^ '$Changeset: <not expanded> $'

    34 ! !

    35