ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

build: syscalls: Add a SET-CHILD-SUBREAPER! procedure.

Browse source 
* guix/build/syscalls.scm (PR_SET_CHILD_SUBREAPER): New variable.
(set-child-subreaper!): New procedure.
This commit is contained in:
Maxim Cournoyer 2021-11-18 22:17:26 -05:00
parent 83580b949d
commit 8444b44a8c
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
guix/build/syscalls.scm
View file

@ -120,6 +120,8 @@ (define-module (guix build syscalls)
with-file-lock
with-file-lock/no-wait
set-child-subreaper!
set-thread-name
thread-name
@ -1421,6 +1423,11 @@ (define %prctl
(define PR_SET_NAME 15) ;<linux/prctl.h>
(define PR_GET_NAME 16)
(define PR_SET_CHILD_SUBREAPER 36)
(define (set-child-subreaper!)
"Set the CHILD_SUBREAPER capability for the current process."
(%prctl PR_SET_CHILD_SUBREAPER 1 0 0 0))
(define %max-thread-name-length
;; Maximum length in bytes of the process name, including the terminating