diff options
author | Christopher Baines <mail@cbaines.net> | 2023-03-24 09:45:10 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-03-24 09:51:28 +0000 |
commit | d6ae42f19691267d915cd66174436f33debabec0 (patch) | |
tree | bdcac7bd56cb06a2a62631e72564c7a51716cbf3 /guix-build-coordinator/agent-messaging/http.scm | |
parent | 024761d432ff84e197b49846c71ac34f5703df38 (diff) | |
download | build-coordinator-d6ae42f19691267d915cd66174436f33debabec0.tar build-coordinator-d6ae42f19691267d915cd66174436f33debabec0.tar.gz |
Add processor count to the agent status
This is useful when interpreting the load information.
Diffstat (limited to 'guix-build-coordinator/agent-messaging/http.scm')
-rw-r--r-- | guix-build-coordinator/agent-messaging/http.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix-build-coordinator/agent-messaging/http.scm b/guix-build-coordinator/agent-messaging/http.scm index 992768f..adc8102 100644 --- a/guix-build-coordinator/agent-messaging/http.scm +++ b/guix-build-coordinator/agent-messaging/http.scm @@ -264,7 +264,8 @@ interface (string-append "/agent/" (slot-ref interface 'agent-uuid)) #:method 'PUT ; TODO Should be PATCH - #:body `((status . ,status) + #:body `((status . ,status) + (processor_count . ,(current-processor-count)) ,@(if 1min-load-average `((load_average . (("1" . ,1min-load-average)))) |