diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-05-14 12:14:02 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-05-14 12:14:02 +0100 |
| commit | b01c959ade8c08867c2a6ed162ccb3edcda676ac (patch) | |
| tree | ba26874002e3c64e09a06af5e5e9dd20783bdd23 /guix-build-coordinator/agent-messaging | |
| parent | e0f9851522bcbd082f8a3cc7ec41dd5c3492dbe9 (diff) | |
| download | build-coordinator-b01c959ade8c08867c2a6ed162ccb3edcda676ac.tar build-coordinator-b01c959ade8c08867c2a6ed162ccb3edcda676ac.tar.gz | |
Set the name of the hash management thread
For debugging purposes.
Diffstat (limited to 'guix-build-coordinator/agent-messaging')
| -rw-r--r-- | guix-build-coordinator/agent-messaging/http/server.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix-build-coordinator/agent-messaging/http/server.scm b/guix-build-coordinator/agent-messaging/http/server.scm index 5c5e8af..7efeec8 100644 --- a/guix-build-coordinator/agent-messaging/http/server.scm +++ b/guix-build-coordinator/agent-messaging/http/server.scm @@ -377,6 +377,8 @@ port. Also, the port used can be changed by passing the --port option.\n" (call-with-new-thread (lambda () + (set-thread-name "hash thread") + (while #t (with-exception-handler (lambda (exn) |