mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2025-12-15 15:21:03 -08:00
Code Issues Projects Releases Packages Wiki Activity

Missing argument in call to socket-make-stream-inner.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2010-02-17 22:41:08 +01:00
parent 2690d92c42
commit f3fa64c038
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
contrib/sockets/sockets.lisp
View file

@ -1225,7 +1225,7 @@ also known as unix-domain sockets."))
(unless (or input-p output-p)
(setf input t output t))
(setf stream (socket-make-stream-inner (socket-file-descriptor socket)
input output))
input output buffering))
(unless (eq external-format :default)
(setf (stream-external-format stream) external-format))
(when buffering