# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1393963966 -3600
# Node ID 3f2ec5ba05001a4279634d3144e302eda8c4ab49
# Parent  0f1afe24888593c27f1512205231ec8ce5d32922
class: PPParserReplaceRule
added: #foundMatchFor:

diff -r 0f1afe248885 -r 3f2ec5ba0500 analyzer/PPParserReplaceRule.st
--- a/analyzer/PPParserReplaceRule.st	Tue Mar 04 21:10:20 2014 +0100
+++ b/analyzer/PPParserReplaceRule.st	Tue Mar 04 21:12:46 2014 +0100
@@ -23,13 +23,19 @@
 	replaceParser := aParser
 ! !
 
+!PPParserReplaceRule methodsFor:'matching'!
+
+foundMatchFor:aParser
+    ^ replaceParser copyInContext: owner context
+! !
+
 !PPParserReplaceRule class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPParserReplaceRule.st,v 1.1 2014-03-04 15:41:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPParserReplaceRule.st,v 1.2 2014-03-04 20:12:46 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPParserReplaceRule.st,v 1.1 2014-03-04 15:41:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/PPParserReplaceRule.st,v 1.2 2014-03-04 20:12:46 cg Exp $'
 ! !