[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/05: substitute: Ignore exceptions thrown by 'set-thread-name'.
|
From: |
Ludovic Courtès |
|
Subject: |
02/05: substitute: Ignore exceptions thrown by 'set-thread-name'. |
|
Date: |
Mon, 10 Sep 2018 11:47:59 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit 7d05868847c477c75d2c5af3aa4d7baae862191c
Author: Ludovic Courtès <address@hidden>
Date: Mon Sep 10 14:46:00 2018 +0200
substitute: Ignore exceptions thrown by 'set-thread-name'.
Fixes <https://bugs.gnu.org/32669>.
Reported by Ricardo Wurmus <address@hidden>.
* guix/scripts/substitute.scm (guix-substitute): Swallow 'system-error'
exceptions around 'set-thread-name' call.
---
guix/scripts/substitute.scm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/guix/scripts/substitute.scm b/guix/scripts/substitute.scm
index cd30019..6d31dfd 100755
--- a/guix/scripts/substitute.scm
+++ b/guix/scripts/substitute.scm
@@ -1087,7 +1087,10 @@ default value."
(#f #f)
(locale (false-if-exception (setlocale LC_ALL locale))))
- (set-thread-name "guix substitute")
+ (catch 'system-error
+ (lambda ()
+ (set-thread-name "guix substitute"))
+ (const #t)) ;GNU/Hurd lacks 'prctl'
(with-networking
(with-error-handling ; for signature errors