analyzer/PPReplaceRule.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 30 Jul 2015 08:37:37 +0100
changeset 510 869853decf31
parent 376 a2656b27cace
permissions -rw-r--r--
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/analyzer' }"

PPRule subclass:#PPReplaceRule
	instanceVariableNames:'verificationBlock'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitAnalyzer-Core'
!


!PPReplaceRule methodsFor:'initialization'!

initialize
	super initialize.
	verificationBlock := [ :parser | true ]
!

setVerificationBlock: aBlock
	verificationBlock := aBlock
! !

!PPReplaceRule methodsFor:'matching'!

canMatch: aParser 
	^ verificationBlock cull: aParser
! !

!PPReplaceRule class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPReplaceRule.st,v 1.2 2014-03-04 20:27:53 cg Exp $'
!

version_CVS
    ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPReplaceRule.st,v 1.2 2014-03-04 20:27:53 cg Exp $'
!

version_HG

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