--- a/WriteStream.st Wed Feb 25 15:07:57 2015 +0100
+++ b/WriteStream.st Wed Feb 25 15:12:46 2015 +0100
@@ -51,6 +51,11 @@
Thus it is slightly incompatible to ST-80 since 'aStream contents' does
not always return the original collection. This may change.
+ [caveat:]
+ Basing capabilities like readability/writability/positionability/peekability on inheritance makes
+ the class hierarchy ugly and leads to strange and hard to teach redefinitions (aka. NonPositionableStream
+ below PositionableStream or ExternalReadStream under WriteStream)
+
[author:]
Claus Gittinger
@@ -203,6 +208,7 @@
"Modified: 19.2.1997 / 08:57:00 / stefan"
! !
+
!WriteStream methodsFor:'positioning'!
position:index0Based
@@ -650,10 +656,10 @@
!WriteStream class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/WriteStream.st,v 1.91 2015-02-24 20:07:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/WriteStream.st,v 1.92 2015-02-25 14:12:46 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/WriteStream.st,v 1.91 2015-02-24 20:07:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/WriteStream.st,v 1.92 2015-02-25 14:12:46 cg Exp $'
! !