diff options
| author | Christopher Baines <mail@cbaines.net> | 2022-10-09 11:13:28 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2022-10-09 11:13:28 +0100 |
| commit | 8dd164665a41b7fc4265bad8b43f28b936741bae (patch) | |
| tree | 9022b7493fc07a80250ff51386d421e1d761bd36 /guix-data-service/web | |
| parent | ff77bbea7e647a07c5601e51704c04258a73b79f (diff) | |
| download | data-service-8dd164665a41b7fc4265bad8b43f28b936741bae.tar data-service-8dd164665a41b7fc4265bad8b43f28b936741bae.tar.gz | |
Expose Guile GC metrics
As the guix-data-service process seems to be using excessive amounts of
memory, and this will be useful to track it.
Diffstat (limited to 'guix-data-service/web')
| -rw-r--r-- | guix-data-service/web/controller.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm index a29382a..7aac071 100644 --- a/guix-data-service/web/controller.scm +++ b/guix-data-service/web/controller.scm @@ -149,7 +149,11 @@ "-" "_")) #:labels '(name)))) - pg-stat-indexes-fields))) + pg-stat-indexes-fields)) + + (gc-metrics-updater + (get-gc-metrics-updater registry))) + (lambda () (letpar& ((metric-values (with-thread-postgresql-connection @@ -234,6 +238,8 @@ (state . ,state))))) load-new-guix-revision-job-metrics) + (gc-metrics-updater) + (list (build-response #:code 200 #:headers '((content-type . (text/plain)))) |