--- 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