ParseWarning.st
changeset 4349 3cbb3f48bcd0
parent 4311 ca85799f3fa7
--- a/ParseWarning.st	Fri Feb 15 10:10:58 2019 +0100
+++ b/ParseWarning.st	Fri Feb 15 14:49:23 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -87,6 +85,11 @@
 
 startPosition:something
     startPosition := something.
+!
+
+startPosition:startPositionArg endPosition:endPositionArg 
+    startPosition := startPositionArg.
+    endPosition := endPositionArg.
 ! !
 
 !ParseWarning methodsFor:'default action'!