equal
deleted
inserted
replaced
19 |
19 |
20 PositionableStream comment:' |
20 PositionableStream comment:' |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.21 1995-02-24 16:37:50 claus Exp $ |
24 $Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.22 1995-02-26 18:13:54 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !PositionableStream class methodsFor:'documentation'! |
27 !PositionableStream class methodsFor:'documentation'! |
28 |
28 |
29 copyright |
29 copyright |
40 " |
40 " |
41 ! |
41 ! |
42 |
42 |
43 version |
43 version |
44 " |
44 " |
45 $Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.21 1995-02-24 16:37:50 claus Exp $ |
45 $Header: /cvs/stx/stx/libbasic/PositionableStream.st,v 1.22 1995-02-26 18:13:54 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
372 |
372 |
373 fileIn |
373 fileIn |
374 "file in from the receiver, i.e. read chunks and evaluate them - |
374 "file in from the receiver, i.e. read chunks and evaluate them - |
375 return the value of the last chunk." |
375 return the value of the last chunk." |
376 |
376 |
377 ^ self fileInNotifying:(CompilationErrorHandler on:self) passChunk:true |
377 ^ self fileInNotifying:(SourceFileLoader on:self) passChunk:true |
378 ! |
378 ! |
379 |
379 |
380 fileInNotifying:someone passChunk:passChunk |
380 fileInNotifying:someone passChunk:passChunk |
381 "file in from the receiver, i.e. read chunks and evaluate them - |
381 "file in from the receiver, i.e. read chunks and evaluate them - |
382 return the value of the last chunk. |
382 return the value of the last chunk. |