PositionableStream.st
branchjv
changeset 20578 39641ba8d6e0
parent 20398 8cb53f870d39
parent 20423 fefb552a4ca5
child 21024 8734987eb5c7
--- a/PositionableStream.st	Tue Sep 20 11:37:33 2016 +0100
+++ b/PositionableStream.st	Mon Oct 03 12:44:41 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -240,7 +242,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
 
@@ -248,7 +250,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
 !
@@ -258,7 +260,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