PPEndOfLineParser.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 08 Sep 2015 02:49:45 +0100
changeset 544 69b6f2f0df1d
parent 421 7e08b31e0dae
permissions -rw-r--r--
Portabiluty: use `Exception new signal: message` to throw exceptions ...instead of #signalWith: It seems that this is the only portable way to throw exceptions (at least among Pharo and Smalltalk/X)

"{ Package: 'stx:goodies/petitparser' }"

PPParser subclass:#PPEndOfLineParser
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'PetitParser-Parsers'
!

!PPEndOfLineParser methodsFor:'parsing'!

parseOn: aPPContext
	(aPPContext isEndOfLine) ifTrue: [ 
		^ #endOfLine
	].
	^ PPFailure message: 'End of line expected' context: aPPContext at: aPPContext position
! !