From ff3cf053919099980441f523e8fe06b0657f6484 Mon Sep 17 00:00:00 2001 From: Brian Campbell Date: Mon, 19 Oct 2020 23:49:37 +0100 Subject: sailcov: Make meaning of the histogram clearer --- sailcov/main.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'sailcov') diff --git a/sailcov/main.ml b/sailcov/main.ml index 3fb11d6d..b907ea6e 100644 --- a/sailcov/main.ml +++ b/sailcov/main.ml @@ -312,7 +312,7 @@ let main () = if !opt_histogram && not (SpanMap.is_empty taken) then begin let histogram = SpanMap.fold (fun _ count m -> IntMap.update count (function None -> Some 1 | Some i -> Some (i+1)) m) taken IntMap.empty in - Printf.printf "Count | Number of spans\n"; + Printf.printf "Files | Number of spans\n"; IntMap.iter (fun count spans -> Printf.printf "%5d | %7d\n" count spans ) histogram -- cgit v1.2.3