#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Fri, 01 Feb 2019 01:04:21 +0100
changeset 4328 3ee2558d252e
parent 4327 cea16e8f47d6
child 4329 1f6f6878cbb8
#FEATURE by cg class: Parser changed: #selectorCheck:for:positions:
Parser.st
--- a/Parser.st	Fri Feb 01 00:02:58 2019 +0100
+++ b/Parser.st	Fri Feb 01 01:04:21 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -4311,7 +4309,7 @@
 
         nowhereImplemented ifFalse:[
             (receiver isConstant or:[receiver isBlock]) ifTrue:[
-                err := err, ' in ' , selClass name , ' or any of its superclasses'.
+                "/ err := err, ' in ' , selClass name , ' or any of its superclasses'.
             ] ifFalse:[(((recType := receiver type) == #GlobalVariable)
                         or:[recType == #PrivateClass]) ifTrue:[
                 rec := receiver evaluate.
@@ -4502,6 +4500,7 @@
     "Modified: / 05-09-1995 / 17:02:11 / claus"
     "Modified: / 16-03-2017 / 11:36:48 / cg"
     "Modified: / 04-12-2018 / 11:33:31 / Stefan Vogel"
+    "Modified: / 01-02-2019 / 01:01:10 / Claus Gittinger"
 !
 
 typeOfNode:aNode