mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-04-27 11:40:45 -07:00
Code Issues Projects Releases Packages Wiki Activity

The null stream should be writable, because it is used by the pretty printer

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2008-08-19 14:18:23 +02:00
parent fc3913dabc
commit 036b5ec9ca
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/c/file.d
View file

@ -3001,6 +3001,7 @@ init_file(void)
null_stream->stream.char_stream_p = 1;
null_stream->stream.byte_size = 8;
null_stream->stream.signed_bytes = 0;
null_stream = cl_make_two_way_stream(null_stream, cl_make_broadcast_stream(0));
cl_core.null_stream = null_stream;
standard_input = cl_alloc_object(t_stream);