PPStartOfLine.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 15 Jun 2015 17:12:54 +0100
changeset 485 d86e2db09346
parent 377 6112a403a52d
permissions -rw-r--r--
Fixed codegen for empty (mapped) action block. Although empty blocks are useless in practice, they may occur (and do occur in tests)

"{ 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
! !