compiler/PPCEndOfFileNode.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 17 Aug 2015 23:11:56 +0100
changeset 518 a6d8b93441b0
parent 515 b5316ef15274
permissions -rw-r--r--
Portability fixes * do not use Object>>asString. Not all Smalltalks implement it. * do not use Object>>name. Not all Smalltalks implement it. * do not use Dictionary keysAndValuesRemove:. Not all Smalltalks implement it. * do not use Class>>methods The semantics is different among Smalltalks. Use `Class methodDictionary values` instead. * do not modify dictionary in #at:ifAbsentPut: block!

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

"{ NameSpace: Smalltalk }"

PPCNode subclass:#PPCEndOfFileNode
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Nodes'
!

PPCEndOfFileNode class instanceVariableNames:'Instance'

"
 No other class instance variables are inherited by this class.
"
!

!PPCEndOfFileNode class methodsFor:'as yet unclassified'!

instance
    Instance isNil ifTrue: [
        Instance := self new.
    ].

    ^ Instance
! !

!PPCEndOfFileNode methodsFor:'accessing'!

defaultName
    ^ #eof
! !

!PPCEndOfFileNode methodsFor:'analysis'!

acceptsEpsilon
    ^ false
!

acceptsEpsilonOpenSet: set
    ^ false
!

firstCharSet
    ^ PPCharSetPredicate on: [:e | true ] 
! !

!PPCEndOfFileNode methodsFor:'visiting'!

accept: visitor
    ^ visitor visitEndOfFileNode: self.
! !