--- a/devtools/PPCompositeParserGenerator.st Fri Jan 11 10:57:40 2013 +0100
+++ b/devtools/PPCompositeParserGenerator.st Fri Jan 11 10:57:49 2013 +0100
@@ -45,18 +45,27 @@
productions do:[:p|
+ | method |
+ method := MethodDefinitionChange new
+ class: klass;
+ selector: p name asSymbol;
+ source: (PPPrinter print: p);
+ category: 'grammar';
+ yourself.
+ changeset add: method.
].
"Created: / 10-01-2013 / 12:57:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 11-01-2013 / 09:52:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!PPCompositeParserGenerator class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/petitparser/devtools/PPCompositeParserGenerator.st,v 1.1 2013-01-10 13:22:22 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/petitparser/devtools/PPCompositeParserGenerator.st,v 1.2 2013-01-11 09:57:49 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/petitparser/devtools/PPCompositeParserGenerator.st,v 1.1 2013-01-10 13:22:22 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/petitparser/devtools/PPCompositeParserGenerator.st,v 1.2 2013-01-11 09:57:49 vrany Exp $'
! !