--- a/devtools/extensions.st Fri Jan 11 10:57:49 2013 +0100
+++ b/devtools/extensions.st Fri Jan 11 10:58:24 2013 +0100
@@ -165,6 +165,12 @@
^ aVisitor visitPPLiteralParser:self
! !
+!PPLiteralParser methodsFor:'accessing'!
+
+literal
+ ^ literal
+! !
+
!PPLiteralSequenceParser methodsFor:'visiting'!
acceptVisitor:aVisitor
@@ -333,5 +339,5 @@
!stx_goodies_petitparser_devtools class methodsFor:'documentation'!
extensionsVersion_CVS
- ^ '$Header: /cvs/stx/stx/goodies/petitparser/devtools/extensions.st,v 1.2 2013-01-10 13:25:17 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/petitparser/devtools/extensions.st,v 1.3 2013-01-11 09:58:24 vrany Exp $'
! !
\ No newline at end of file