From ea59d096358981e4a10c3b18fd27df2ba2a4e59d Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Sat, 17 Jan 2026 21:13:49 -0500 Subject: [PATCH] track spans: sort resulting list of unclosed spans --- src/debug/track_spans.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/debug/track_spans.ml b/src/debug/track_spans.ml index 7f6c84d..ad0372b 100644 --- a/src/debug/track_spans.ml +++ b/src/debug/track_spans.ml @@ -101,7 +101,8 @@ open struct { num; by_name = - Str_map.fold (fun name id l -> (name, id) :: l) names_with_count []; + Str_map.fold (fun name id l -> (name, id) :: l) names_with_count [] + |> List.sort Stdlib.compare; } in emit self unclosed_spans