--- a/Scanner.st	Mon Oct 08 10:27:15 2012 +0200
+++ b/Scanner.st	Mon Oct 08 14:36:16 2012 +0200
@@ -1382,8 +1382,8 @@
             requestor error:aMessage position:position to:endPos from:self.
             ^ self
         ].
-        Parser::ParseError isHandled ifTrue:[
-            Parser::ParseError new
+        Parser parseErrorSignal isHandled ifTrue:[
+            Parser parseErrorSignal new
                 errorMessage:aMessage startPosition:position endPosition:endPos;
                 parameter:self;
                 lineNumber:tokenLineNr; "lineNr"
@@ -3424,11 +3424,11 @@
 !Scanner class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.283 2012-06-13 11:44:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.284 2012-10-08 12:36:16 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.283 2012-06-13 11:44:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.284 2012-10-08 12:36:16 stefan Exp $'
 ! !
 
 Scanner initialize!