PositionableStream.st
changeset 20423 fefb552a4ca5
parent 20377 6566ced79964
child 20578 39641ba8d6e0
child 20691 1d196c7aa50e
--- a/PositionableStream.st	Thu Sep 22 15:15:40 2016 +0200
+++ b/PositionableStream.st	Thu Sep 22 15:15:59 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -218,7 +220,7 @@
 !
 
 readLimit
-    "return the read-limit; thats the position at which EOF is returned"
+    "return the read-limit; that's the position at which EOF is returned"
 
     ^ readLimit
 
@@ -226,7 +228,7 @@
 !
 
 readLimit:aNumber
-    "set the read-limit; thats the position at which EOF is returned"
+    "set the read-limit; that's the position at which EOF is returned"
 
     readLimit := aNumber
 !
@@ -236,7 +238,7 @@
 !
 
 writeLimit:aNumber
-    "set the writeLimit; thats the position after which writing is prohibited"
+    "set the writeLimit; that's the position after which writing is prohibited"
 
     writeLimit := aNumber