brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Close executable binary ports explicitly.

Browse source
This commit is contained in:
Dominik Pantůček 2023-05-19 19:31:04 +02:00
parent 5d7e4a0117
commit 517e1baeb6
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/util-io.scm
View file

@ -96,6 +96,8 @@
(close-output-port stdin) (close-output-port stdin)
(let ((result (read-lines stdout))) (let ((result (read-lines stdout)))
(let-values (((pid exit-ok? exit/signal) (process-wait pid))) (let-values (((pid exit-ok? exit/signal) (process-wait pid)))
(close-input-port stdout)
(close-input-port stderr)
result)))) result))))
) )