mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-24 05:21:20 -08:00
Code Issues Projects Releases Packages Wiki Activity

cosmetic: don't use accessors for just-set slots

Browse source
This commit is contained in:
Daniel Kochmanski 2017-09-29 18:36:14 +02:00
parent 21147a42c7
commit 3da53b617e
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/lsp/process.lsp
View file

@ -197,8 +197,7 @@
(external-process-output process) stream-read
(external-process-error-stream process) stream-error)
(values (make-two-way-stream (external-process-output process)
(external-process-input process))
(values (make-two-way-stream stream-read stream-write)
(if wait
(nth-value 1 (si:external-process-wait process t))
(ext:set-finalizer process #'finalize-external-process))