diff options
Diffstat (limited to 'guix-build-coordinator/coordinator.scm')
| -rw-r--r-- | guix-build-coordinator/coordinator.scm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm index 962bc2b..09ffb53 100644 --- a/guix-build-coordinator/coordinator.scm +++ b/guix-build-coordinator/coordinator.scm @@ -817,7 +817,16 @@ agent-uuid status 1min-load-average - processor-count)) + processor-count) + + (build-coordinator-send-event + coordinator + "agent-status-update" + `((agent_id . ,agent-uuid) + (status . ,status) + (load_average + . ((1 . ,1min-load-average))) + (processor_count . ,processor-count)))) (define (trigger-build-allocation build-coordinator) ((build-coordinator-allocator-thread build-coordinator))) |