"{ Package: 'stx:libcomp' }"

Object subclass:#ParseErrorNode
	instanceVariableNames:'errorString'
	classVariableNames:''
	poolDictionaries:''
	category:'System-Compiler-Support'
!


!ParseErrorNode class methodsFor:'instance creation'!

errorString:arg
    ^ self new errorString:arg
! !

!ParseErrorNode methodsFor:'accessing'!

errorString
    ^ errorString
!

errorString:something
    errorString := something.
! !

!ParseErrorNode methodsFor:'queries'!

isErrorNode
    ^ true
! !

!ParseErrorNode class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/libcomp/ParseErrorNode.st,v 1.1 2004-07-07 09:17:41 cg Exp $'
! !