From 4d1044bc161d891dc8dc65fb0372acac0c45a995 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Wed, 19 Nov 2025 12:31:56 +0000 Subject: [PATCH] Check the value for metric-set --- prometheus.scm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/prometheus.scm b/prometheus.scm index 83061a7..d6caa6a 100644 --- a/prometheus.scm +++ b/prometheus.scm @@ -350,6 +350,12 @@ values are the values." '(gauge)) (error "can only set gauge metrics")) + (unless (number? value) + (raise-exception + (make-exception-with-message + (simple-format #f "metric-set value must be a number: ~A" + value)))) + (call-with-blocked-asyncs (lambda () (with-mutex (metric-mutex metric)