author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Fri, 07 Nov 2014 02:14:26 +0000 | |
changeset 417 | 3c0a91182e65 |
parent 377 | 6112a403a52d |
permissions | -rw-r--r-- |
"{ Package: 'stx:goodies/petitparser' }" PPParser subclass:#PPStartOfLine instanceVariableNames:'' classVariableNames:'' poolDictionaries:'' category:'PetitParser-Parsers' ! !PPStartOfLine methodsFor:'parsing'! parseOn: aPPContext (aPPContext isStartOfLine) ifTrue: [ ^ #startOfLine ]. ^ PPFailure message: 'Start of line expected' context: aPPContext at: aPPContext position ! !