Updated smalltalk parser to PetitSmalltalk-JanKurs.75
Name: PetitSmalltalk-JanKurs.75
Author: JanKurs
Time: 13-10-2014, 05:00:14 AM
UUID: 6254f8f7-aa47-4ddd-a373-167bccb0d4e5
"{ 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> $'
! !