compiler/tests/PPCOverlappingTokensTest.st
changeset 535 a8feb0f47574
parent 534 a949c4fe44df
child 537 fb212e14d1f4
equal deleted inserted replaced
534:a949c4fe44df 535:a8feb0f47574
    42 !
    42 !
    43 
    43 
    44 setUp
    44 setUp
    45     options := PPCCompilationOptions default
    45     options := PPCCompilationOptions default
    46         profile: true;
    46         profile: true;
       
    47         tokenize: true;
    47         yourself.
    48         yourself.
    48         
    49         
    49     configuration := PPCTokenizingConfiguration new.
    50     configuration := PPCConfiguration new.
    50     configuration context options: options.
    51     configuration context options: options.
    51         
    52         
    52     self cleanClass.
    53     self cleanClass.
    53     
    54     
    54     fooToken := 'foo' asParser token trim name: 'foo'; yourself.
    55     fooToken := 'foo' asParser token trim name: 'foo'; yourself.
    55     idToken := (#word asParser plus) token trim name: 'id'; yourself.
    56     idToken := (#word asParser plus) token trim name: 'id'; yourself.
    56     unaryToken := (#word asParser plus, $: asParser not) token trim name: 'unary'; yourself.
    57     unaryToken := (#word asParser plus, $: asParser not) token trim name: 'unary'; yourself.
    57     keywordToken := (#word asParser plus, $: asParser) token trim name: 'kw'; yourself.
    58     keywordToken := (#word asParser plus, $: asParser) token trim name: 'kw'; yourself.
    58     assignmentToken := (':=' asParser) token trim name: 'assignment'; yourself.
    59     assignmentToken := (':=' asParser) token trim name: 'assignment'; yourself.
    59 
    60 
    60     "Modified: / 28-08-2015 / 14:19:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    61     "Modified: / 04-09-2015 / 16:21:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    61 !
    62 !
    62 
    63 
    63 tearDown
    64 tearDown
    64     "self cleanClass"
    65     "self cleanClass"
    65 !
    66 !