compiler/tests/PPCNodeFirstFollowNextTests.st
changeset 538 16e8536f5cfb
parent 537 fb212e14d1f4
equal deleted inserted replaced
537:fb212e14d1f4 538:16e8536f5cfb
    22 
    22 
    23 
    23 
    24 !PPCNodeFirstFollowNextTests methodsFor:'setup'!
    24 !PPCNodeFirstFollowNextTests methodsFor:'setup'!
    25 
    25 
    26 setUp
    26 setUp
    27     compiler := PPCCompiler default.
    27     compiler := PPCCompiler new.
    28     compiler context options generate:false.
    28     compiler context options generate:false.
    29 
    29 
    30     "Modified: / 28-08-2015 / 14:17:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    30     "Modified: / 07-09-2015 / 11:38:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    31 ! !
    31 ! !
    32 
    32 
    33 !PPCNodeFirstFollowNextTests methodsFor:'support'!
    33 !PPCNodeFirstFollowNextTests methodsFor:'support'!
    34 
    34 
    35 assert: set anyMatchesType: whatever
    35 assert: set anyMatchesType: whatever
    73 followOfNodeIn: rootNode
    73 followOfNodeIn: rootNode
    74     ^ self followOf: 'node' in: rootNode
    74     ^ self followOf: 'node' in: rootNode
    75 !
    75 !
    76 
    76 
    77 treeFrom: parser
    77 treeFrom: parser
    78     ^ parser compileUsingCompiler: compiler
    78     ^ compiler compile: parser
    79 
    79 
    80     "Modified: / 07-09-2015 / 10:08:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    80     "Modified: / 07-09-2015 / 10:08:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    81 ! !
    81 ! !
    82 
    82 
    83 !PPCNodeFirstFollowNextTests methodsFor:'testing - first'!
    83 !PPCNodeFirstFollowNextTests methodsFor:'testing - first'!