Parent Directory | Revision Log | Patch
revision 1.14.4.1.2.2.2.4.6.1.6.1 by camm, Sat Jan 15 16:28:50 2005 UTC | revision 1.14.4.1.2.2.2.4.6.1.6.1.4.1 by camm, Fri Oct 21 16:50:47 2005 UTC | |
---|---|---|
# | Line 2259 READ: | Line 2259 READ: |
2259 | else if (strm == Ct) | else if (strm == Ct) |
2260 | strm = symbol_value(sLAterminal_ioA); | strm = symbol_value(sLAterminal_ioA); |
2261 | check_type_stream(&strm); | check_type_stream(&strm); |
2262 | if (!listen_stream(strm)) | if (!listen_stream(strm)) { |
2263 | /* Incomplete! */ | if (eof_errorp == Cnil) |
2264 | @(return Cnil) | @(return eof_value) |
2265 | else | |
2266 | end_of_stream(strm); | |
2267 | } | |
2268 | @(return `read_char(strm)`) | @(return `read_char(strm)`) |
2269 | @) | @) |
2270 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |