[shepherd] 01/04: system: pipe2: Return unbuffered ports.

[Ludovic Courtès]

civodul pushed a commit to branch main
in repository shepherd.

commit 8fbbca59a4ad9e8b221853058ccb605b6b73c842
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Dec 27 15:49:01 2023 +0100

    system: pipe2: Return unbuffered ports.
    
    * modules/shepherd/system.scm.in (pipe2): Pass “0” to ‘fdopen’.
---
 modules/shepherd/system.scm.in | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/modules/shepherd/system.scm.in b/modules/shepherd/system.scm.in
index 8cc816a..9929f38 100644
--- a/modules/shepherd/system.scm.in
+++ b/modules/shepherd/system.scm.in
@@ -189,7 +189,7 @@ The difference compared to 'pipe' is that is the optional 
FLAGS argument."
                     (out (bytevector-sint-ref bv (sizeof int)
                                               (native-endianness)
                                               (sizeof int))))
-                (cons (fdopen in "r") (fdopen out "w")))
+                (cons (fdopen in "r0") (fdopen out "w0")))
               (throw 'system-error "pipe2" "~A"
                      (list (strerror err))
                      (list err))))))))