fix GC metrics

This commit is contained in:
Simon Cruanes 2024-01-18 23:37:16 -05:00
parent 7684f67bc1
commit e8eeec5915
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -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