PositionableStream.st
changeset 6230 877a8da90c7c
parent 6201 389dc86fdb80
child 6314 e1aad938d629
equal deleted inserted replaced
6229:e79f4aeff134 6230:877a8da90c7c
   997 
   997 
   998 with:aCollection
   998 with:aCollection
   999     "setup for streaming to the end of aCollection"
   999     "setup for streaming to the end of aCollection"
  1000 
  1000 
  1001     collection := aCollection.
  1001     collection := aCollection.
       
  1002     readLimit := aCollection size + 1.
  1002     self setToEnd
  1003     self setToEnd
  1003 ! !
  1004 ! !
  1004 
  1005 
  1005 !PositionableStream methodsFor:'queries'!
  1006 !PositionableStream methodsFor:'queries'!
  1006 
  1007 
  1077 ! !
  1078 ! !
  1078 
  1079 
  1079 !PositionableStream class methodsFor:'documentation'!
  1080 !PositionableStream class methodsFor:'documentation'!
  1080 
  1081 
  1081 version
  1082 version
  1082     ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.104 2001-11-16 15:25:23 cg Exp $'
  1083     ^ '$Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.105 2001-11-21 15:04:10 cg Exp $'
  1083 ! !
  1084 ! !
  1084 PositionableStream initialize!
  1085 PositionableStream initialize!