compiler/tests/extras/PPTokenizedExpressionGrammarResource.st
changeset 502 1e45d3c96ec5
parent 464 f6d77fee9811
child 503 ff58cd9f1f3c
equal deleted inserted replaced
464:f6d77fee9811 502:1e45d3c96ec5
     7 	classVariableNames:''
     7 	classVariableNames:''
     8 	poolDictionaries:''
     8 	poolDictionaries:''
     9 	category:'PetitCompiler-Extras-Tests-Expressions'
     9 	category:'PetitCompiler-Extras-Tests-Expressions'
    10 !
    10 !
    11 
    11 
       
    12 
    12 !PPTokenizedExpressionGrammarResource methodsFor:'as yet unclassified'!
    13 !PPTokenizedExpressionGrammarResource methodsFor:'as yet unclassified'!
    13 
    14 
    14 setUp
    15 setUp
    15     | time configuration |
    16     | time configuration |
    16     configuration := PPCTokenizingConfiguration new.
    17     configuration := PPCTokenizingConfiguration new.
    17     configuration arguments name:#PPTokenizedExpressionGrammar.
    18     configuration arguments parserName:#PPTokenizedExpressionGrammar.
    18     
    19     
    19     
    20     
    20     time := Time millisecondsToRun: [
    21     time := Time millisecondsToRun: [
    21         PPExpressionGrammar new compileWithConfiguration: configuration.
    22         PPExpressionGrammar new compileWithConfiguration: configuration.
    22     ].
    23     ].
    23     Transcript crShow: 'Expression grammar tokenized in: ', time asString, 'ms'.
    24     Transcript show: 'Expression grammar tokenized in: '; show: time asString; show: 'ms'; cr.
    24     
    25 
       
    26     "Modified: / 26-05-2015 / 07:25:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    25 ! !
    27 ! !
    26 
    28 
       
    29 !PPTokenizedExpressionGrammarResource class methodsFor:'documentation'!
       
    30 
       
    31 version_HG
       
    32 
       
    33     ^ '$Changeset: <not expanded> $'
       
    34 ! !
       
    35