fix GC metrics

c-cube · Jan 19, 2024 · e8eeec5 · e8eeec5
1 parent 7684f67
commit e8eeec5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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