class: PositionableStream
comment/format in: #initialize
changed: #zeroPosition
ZeroPosition eliminated
--- 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 $'
! !