16/19: syscalls: Adjust for glibc 2.34 and later.

[guix-commits]

mbakke pushed a commit to branch core-updates
in repository guix.

commit 3c8b6fd94ceb1e898216929e8768fb518dbf1de9
Author: Marius Bakke <marius@gnu.org>
AuthorDate: Fri Sep 2 00:05:52 2022 +0200

    syscalls: Adjust for glibc 2.34 and later.
    
    * guix/build/syscalls.scm (openpty, login-tty): Remove #:library argument, 
as
    these functions have been moved to libc.so.
---
 guix/build/syscalls.scm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/guix/build/syscalls.scm b/guix/build/syscalls.scm
index 7842b0a9fc..0f939c23ad 100644
--- a/guix/build/syscalls.scm
+++ b/guix/build/syscalls.scm
@@ -2321,8 +2321,7 @@ always a positive integer."
   (terminal-dimension window-size-rows port (const 25)))
 
 (define openpty
-  (let ((proc (syscall->procedure int "openpty" '(* * * * *)
-                                  #:library "libutil")))
+  (let ((proc (syscall->procedure int "openpty" '(* * * * *))))
     (lambda ()
       "Return two file descriptors: one for the pseudo-terminal control side,
 and one for the controlled side."
@@ -2343,8 +2342,7 @@ and one for the controlled side."
           (values (* head) (* inferior)))))))
 
 (define login-tty
-  (let* ((proc (syscall->procedure int "login_tty" (list int)
-                                   #:library "libutil")))
+  (let* ((proc (syscall->procedure int "login_tty" (list int))))
     (lambda (fd)
       "Make FD the controlling terminal of the current process (with the
 TIOCSCTTY ioctl), redirect standard input, standard output and standard error