#FEATURE by cg cvs_MAIN
authorClaus Gittinger <cg@exept.de>
Fri, 15 Feb 2019 14:53:57 +0100
branchcvs_MAIN
changeset 3884 1e74f61d0310
parent 3883 f8ff4951a720
child 3887 5e3887970778
#FEATURE by cg class: JavaScanner changed: #token class: JavaScanner::Token added: #startPosition:endPosition:
tools/JavaScanner.st
--- a/tools/JavaScanner.st	Thu Feb 14 14:57:54 2019 +0100
+++ b/tools/JavaScanner.st	Fri Feb 15 14:53:57 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2003 by Claus Gittinger
 	      All Rights Reserved
@@ -241,15 +243,15 @@
 token
     "the previously scanned token"
 
-    ^Token new
+    ^ Token new
         type: tokenType;
         value: tokenValue;
-        startPosition: tokenStartPosition + 1;
-        endPosition: tokenEndPosition + 1;
+        startPosition:(tokenStartPosition + 1) endPosition:(tokenEndPosition + 1);
         yourself
 
     "Created: / 17-03-2012 / 13:32:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 03-08-2013 / 20:23:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-02-2019 / 14:40:46 / Claus Gittinger"
 ! !
 
 !JavaScanner methodsFor:'converting'!
@@ -1082,6 +1084,11 @@
     startPosition := something.
 !
 
+startPosition:startPositionArg endPosition:endPositionArg 
+    startPosition := startPositionArg.
+    endPosition := endPositionArg.
+!
+
 stopPosition
     ^ endPosition