[shepherd] 01/03: system: Add comment regarding 'pipe2'.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository shepherd.

commit 86edd4258103b71365cf387b63650a95ad1ecd0c
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri May 26 09:49:31 2023 +0200

    system: Add comment regarding 'pipe2'.
    
    * modules/shepherd/system.scm.in (pipe2): Use 'define'.  Update comment.
---
 modules/shepherd/system.scm.in | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/modules/shepherd/system.scm.in b/modules/shepherd/system.scm.in
index c2015c7..a6e5ec7 100644
--- a/modules/shepherd/system.scm.in
+++ b/modules/shepherd/system.scm.in
@@ -169,9 +169,9 @@ only (by default, Linux binds AF_INET6 addresses on IPv4 as 
well)."
 ;; Guile 2.2.7 lacks a definition for O_CLOEXEC.
 (define-as-needed O_CLOEXEC @O_CLOEXEC@)
 
-(define-as-needed pipe2
-  ;; Use 'define-as-needed' in case Guile > 3.0.8 comes with a same-named
-  ;; binding.
+(define pipe2
+  ;; Note: Guile 3.0.9 added an optional argument to 'pipe'.  Remove this
+  ;; procedure when requiring 3.0.9+.
   (let ((proc (syscall->procedure int "pipe2" `(* ,int))))
     (lambda* (#:optional (flags 0))
       "Return a newly created pipe: a pair of ports linked together on the