Tests refactoring - use generated test cases to make sure all posibilities are tested.
Do not generate resource for all combinations, use PPCSetUpBeforeTearDownAfterResource
instead that delegates parser compilation to the testcase itself (it calls it's #setUpBefore
method).
"{ Package: 'stx:goodies/petitparser/compiler' }"
"{ NameSpace: Smalltalk }"
PPCDelegateNode subclass:#PPCTokenNode
instanceVariableNames:'tokenClass'
classVariableNames:''
poolDictionaries:''
category:'PetitCompiler-Nodes'
!
!PPCTokenNode methodsFor:'accessing'!
prefix
^ #token
!
tokenClass
^ tokenClass
!
tokenClass: anObject
tokenClass := anObject
!
tokenType
^ self identityHash printString
! !
!PPCTokenNode methodsFor:'comparing'!
= anotherNode
super = anotherNode ifFalse: [ ^ false ].
^ tokenClass = anotherNode tokenClass.
!
hash
^ super hash bitXor: tokenClass hash
! !
!PPCTokenNode methodsFor:'testing'!
isTokenNode
^ true
! !
!PPCTokenNode methodsFor:'visiting'!
accept: visitor
^ visitor visitTokenNode: self
! !