--- a/Parser.st	Sat Aug 10 12:38:38 2019 +0200
+++ b/Parser.st	Sat Aug 10 14:47:52 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -8151,11 +8149,11 @@
     (val == #Error) ifTrue:[^ #Error].
     (tokenType == $) ) ifFalse:[
         tokenType isCharacter ifTrue:[
-            eMsg := 'missing '')'' (i.e. ''' , tokenType asString , ''' unexpected)'.
+            eMsg := 'missing ")" (i.e. "' , tokenType asString , '" unexpected) or missing "#" before "("'.
         ] ifFalse:[
-            eMsg := 'missing '')'''.
-        ].
-        self syntaxError:eMsg withCRs position:pos to:tokenPosition.
+            eMsg := 'missing ")" or missing "#" before "("'.
+        ].
+        self syntaxError:eMsg withCRs position:pos to:tokenPosition-1.
         ^ #Error
     ].
     self markParenthesisAt:tokenPosition.