Fix metric # TYPE for histograms

2020-12-05 17:49:46 +00:00 · 2020-12-05 17:49:46 +00:00 · 6d9f8c57eb
commit 6d9f8c57eb
parent fba2005362
1 changed files with 4 additions and 1 deletions
--- a/prometheus.scm
+++ b/prometheus.scm
@ -388,7 +388,10 @@ so that it can receive and store the metric values."
                 docstring)))

       (simple-format port "# TYPE ~A ~A\n"
-                      full-name (metric-type metric))
+                      full-name
+                      (match (metric-type metric)
+                        ((? histogram-metric-type? type) 'histogram)
+                        (type type)))

       (hash-for-each
        (lambda (label-values value)