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