hg/stx-goodies-petitparser: analyzer/PPReplaceRule.st@869853decf31 (annotated)

201 29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	1	"{ Package: 'stx:goodies/petitparser/analyzer' }"
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	2
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	3	PPRule subclass:#PPReplaceRule
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	4	instanceVariableNames:'verificationBlock'
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	5	classVariableNames:''
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	6	poolDictionaries:''
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	7	category:'PetitAnalyzer-Core'
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	8	!
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	9
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	10
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	11	!PPReplaceRule methodsFor:'initialization'!
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	12
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	13	initialize
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	14	super initialize.
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	15	verificationBlock := [ :parser \| true ]
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	16	!
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	17
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	18	setVerificationBlock: aBlock
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	19	verificationBlock := aBlock
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	20	! !
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	21
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	22	!PPReplaceRule methodsFor:'matching'!
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	23
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	24	canMatch: aParser
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	25	^ verificationBlock cull: aParser
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	26	! !
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	27
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	28	!PPReplaceRule class methodsFor:'documentation'!
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	29
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	30	version
294 5d418170085c moved Claus Gittinger <cg@exept.de> parents: 201 diff changeset	31	^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPReplaceRule.st,v 1.2 2014-03-04 20:27:53 cg Exp $'
201 29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	32	!
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	33
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	34	version_CVS
294 5d418170085c moved Claus Gittinger <cg@exept.de> parents: 201 diff changeset	35	^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPReplaceRule.st,v 1.2 2014-03-04 20:27:53 cg Exp $'
376 a2656b27cace Added monticelloName to package definition to ease export to .mcz Jan Vrany <jan.vrany@fit.cvut.cz> parents: 294 diff changeset	36	!
a2656b27cace Added monticelloName to package definition to ease export to .mcz Jan Vrany <jan.vrany@fit.cvut.cz> parents: 294 diff changeset	37
a2656b27cace Added monticelloName to package definition to ease export to .mcz Jan Vrany <jan.vrany@fit.cvut.cz> parents: 294 diff changeset	38	version_HG
a2656b27cace Added monticelloName to package definition to ease export to .mcz Jan Vrany <jan.vrany@fit.cvut.cz> parents: 294 diff changeset	39
a2656b27cace Added monticelloName to package definition to ease export to .mcz Jan Vrany <jan.vrany@fit.cvut.cz> parents: 294 diff changeset	40	^ '$Changeset: <not expanded> $'
201 29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	41	! !
29f7cfdac492 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	42

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--