--- a/ParseErrorNode.st	Sat Jul 09 13:27:07 2011 +0200
+++ b/ParseErrorNode.st	Sat Jul 09 22:09:55 2011 +0200
@@ -9,10 +9,9 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libcomp' }"
 
-Object subclass:#ParseErrorNode
+ParseNode subclass:#ParseErrorNode
 	instanceVariableNames:'errorString'
 	classVariableNames:''
 	poolDictionaries:''
@@ -41,6 +40,7 @@
     ^ self new errorString:arg
 ! !
 
+
 !ParseErrorNode methodsFor:'accessing'!
 
 errorString
@@ -51,6 +51,7 @@
     errorString := something.
 ! !
 
+
 !ParseErrorNode methodsFor:'queries'!
 
 isErrorNode
@@ -60,5 +61,5 @@
 !ParseErrorNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseErrorNode.st,v 1.2 2005-02-02 11:01:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParseErrorNode.st,v 1.3 2011-07-09 20:09:55 vrany Exp $'
 ! !