equal
deleted
inserted
replaced
191 chunkSeparator |
191 chunkSeparator |
192 "return the chunk-separation character" |
192 "return the chunk-separation character" |
193 |
193 |
194 ^ ChunkSeparator |
194 ^ ChunkSeparator |
195 ! ! |
195 ! ! |
196 |
|
197 |
196 |
198 !Stream methodsFor:'accessing'! |
197 !Stream methodsFor:'accessing'! |
199 |
198 |
200 contents |
199 contents |
201 "return the entire contents of the stream. |
200 "return the entire contents of the stream. |
1939 1 to:cnt do:[:index | |next| |
1938 1 to:cnt do:[:index | |next| |
1940 next := self next. |
1939 next := self next. |
1941 next isNil ifTrue:[ |
1940 next isNil ifTrue:[ |
1942 "if next did not raise EndOfStreamError, we have to do it" |
1941 "if next did not raise EndOfStreamError, we have to do it" |
1943 EndOfStreamError raiseRequestFrom:self. |
1942 EndOfStreamError raiseRequestFrom:self. |
|
1943 "if you proceed, you get what we have already collected" |
|
1944 ^ answerStream contents |
1944 ]. |
1945 ]. |
1945 answerStream nextPut:next. |
1946 answerStream nextPut:next. |
1946 ]. |
1947 ]. |
1947 ^ answerStream contents |
1948 ^ answerStream contents |
1948 |
1949 |
2535 ]. |
2536 ]. |
2536 ^ self upTo:Character cr. |
2537 ^ self upTo:Character cr. |
2537 |
2538 |
2538 "Modified: / 19.5.1998 / 17:26:25 / cg" |
2539 "Modified: / 19.5.1998 / 17:26:25 / cg" |
2539 ! ! |
2540 ! ! |
|
2541 |
2540 |
2542 |
2541 !Stream methodsFor:'testing'! |
2543 !Stream methodsFor:'testing'! |
2542 |
2544 |
2543 atEnd |
2545 atEnd |
2544 "return true if the end of the stream has been reached; |
2546 "return true if the end of the stream has been reached; |
3125 ! ! |
3127 ! ! |
3126 |
3128 |
3127 !Stream class methodsFor:'documentation'! |
3129 !Stream class methodsFor:'documentation'! |
3128 |
3130 |
3129 version |
3131 version |
3130 ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.184 2009-11-15 09:55:42 cg Exp $' |
3132 ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.185 2009-12-17 15:52:07 stefan Exp $' |
3131 ! |
3133 ! |
3132 |
3134 |
3133 version_CVS |
3135 version_CVS |
3134 ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.184 2009-11-15 09:55:42 cg Exp $' |
3136 ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.185 2009-12-17 15:52:07 stefan Exp $' |
3135 ! ! |
3137 ! ! |
3136 |
3138 |
3137 Stream initialize! |
3139 Stream initialize! |