PositionableStream.st
changeset 7502 a0835d8616ea
parent 7363 721c2a72449a
child 7503 ddabde2900d2
equal deleted inserted replaced
7501:3b04d6b5ae78 7502:a0835d8616ea
  1112     self setToEnd
  1112     self setToEnd
  1113 ! !
  1113 ! !
  1114 
  1114 
  1115 !PositionableStream methodsFor:'queries'!
  1115 !PositionableStream methodsFor:'queries'!
  1116 
  1116 
       
  1117 contentsClass
       
  1118     "answer the class, we stream on (a collection class)"
       
  1119 
       
  1120     ^ collection class
       
  1121 !
       
  1122 
  1117 isPositionable
  1123 isPositionable
  1118     "return true, if the stream supports positioning (this one is)"
  1124     "return true, if the stream supports positioning (this one is)"
  1119 
  1125 
  1120     ^ true
  1126     ^ true
  1121 ! !
  1127 ! !
  1190 ! !
  1196 ! !
  1191 
  1197 
  1192 !PositionableStream class methodsFor:'documentation'!
  1198 !PositionableStream class methodsFor:'documentation'!
  1193 
  1199 
  1194 version
  1200 version
  1195     ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.129 2003-06-16 10:02:54 cg Exp $'
  1201     ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.130 2003-07-14 10:20:29 stefan Exp $'
  1196 ! !
  1202 ! !
  1197 
  1203 
  1198 PositionableStream initialize!
  1204 PositionableStream initialize!