changeset 524 | f6f68d32de73 |
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/compiler/PEGFsaParserState.st Mon Aug 24 15:34:14 2015 +0100 @@ -0,0 +1,21 @@ +"{ Package: 'stx:goodies/petitparser/compiler' }" + +"{ NameSpace: Smalltalk }" + +PEGFsaState subclass:#PEGFsaParserState + instanceVariableNames:'parser' + classVariableNames:'' + poolDictionaries:'' + category:'PetitCompiler-FSA' +! + +!PEGFsaParserState methodsFor:'accessing'! + +parser + ^ parser +! + +parser: anObject + parser := anObject +! ! +