From e8eeec591568e808e9fe239218a8d76d6080742e Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Thu, 18 Jan 2024 23:37:16 -0500 Subject: [PATCH] fix GC metrics --- src/prometheus/tiny_httpd_prometheus.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/prometheus/tiny_httpd_prometheus.ml b/src/prometheus/tiny_httpd_prometheus.ml index b7caf220..88c35e07 100644 --- a/src/prometheus/tiny_httpd_prometheus.ml +++ b/src/prometheus/tiny_httpd_prometheus.ml @@ -227,5 +227,5 @@ module GC_metrics = struct let stats = Gc.quick_stat () in Counter.incr_to self.major_coll stats.major_collections; Counter.incr_to self.compactions stats.compactions; - Gauge.set self.major_heap (int_of_float (stats.major_words *. 8.)) + Gauge.set self.major_heap (stats.heap_words * 8) end