diff options
author | Christopher Baines <mail@cbaines.net> | 2023-05-14 10:27:22 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-05-14 10:27:22 +0100 |
commit | fa74164db0e61ceb68b1408efa02b96b48d80342 (patch) | |
tree | b49b13d99e7e9713781df66793204dd40072065f /guix-build-coordinator/agent-messaging/http | |
parent | 508b8c321747029eae83051b71134efd048f5e0a (diff) | |
download | build-coordinator-fa74164db0e61ceb68b1408efa02b96b48d80342.tar build-coordinator-fa74164db0e61ceb68b1408efa02b96b48d80342.tar.gz |
Add more logging around computing hashes
Diffstat (limited to 'guix-build-coordinator/agent-messaging/http')
-rw-r--r-- | guix-build-coordinator/agent-messaging/http/server.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/guix-build-coordinator/agent-messaging/http/server.scm b/guix-build-coordinator/agent-messaging/http/server.scm index 798e8fc..4233ebc 100644 --- a/guix-build-coordinator/agent-messaging/http/server.scm +++ b/guix-build-coordinator/agent-messaging/http/server.scm @@ -390,6 +390,8 @@ port. Also, the port used can be changed by passing the --port option.\n" (hash-ref update-channels-by-filename filename) (lambda (existing-channels) + (log-msg logger 'DEBUG build-uuid + ": adding channel to list for " filename) (hash-set! update-channels-by-filename filename (cons update-channel @@ -407,6 +409,9 @@ port. Also, the port used can be changed by passing the --port option.\n" (stat:size (stat filename)) 0)) + (log-msg logger 'DEBUG build-uuid + ": starting thread to compute hash for " filename) + (call-with-new-thread (lambda () (with-exception-handler |