class: PositionableStream
authorClaus Gittinger <cg@exept.de>
Mon, 03 Jun 2013 20:33:49 +0200
changeset 15353 0a60d904c4c0
parent 15352 be235b8d9c9e
child 15354 21ebb380b376
class: PositionableStream comment/format in: #initialize changed: #zeroPosition ZeroPosition eliminated
PositionableStream.st
--- a/PositionableStream.st	Mon Jun 03 20:32:02 2013 +0200
+++ b/PositionableStream.st	Mon Jun 03 20:33:49 2013 +0200
@@ -58,7 +58,9 @@
 !PositionableStream class methodsFor:'initialization'!
 
 initialize
-    ZeroPosition := 0.        "/ changed with stx rel5.1
+    ZeroPosition := 0.        "/ changed with stx rel5.1; 
+                              "/ rel6.2: no longer used (i.e. 0 has now ben hardcoded)
+                              "/ class variable to be eliminated.
 
     InvalidPositionErrorSignal isNil ifTrue:[
         InvalidPositionErrorSignal := PositionOutOfBoundsError.
@@ -109,7 +111,7 @@
      Although this is confusing ST/X has been changed to now also use 0-based stream positioning.
     "
 
-    ^ ZeroPosition
+    ^ 0
 
     "Modified: / 13-07-2006 / 20:36:54 / cg"
 ! !
@@ -657,11 +659,11 @@
 !PositionableStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.157 2013-06-03 17:48:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.158 2013-06-03 18:33:49 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.157 2013-06-03 17:48:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.158 2013-06-03 18:33:49 cg Exp $'
 ! !