this repo has no description
1(** Disk usage reporting by category. *)
2
3type report = {
4 base : int;
5 builds : int;
6 docs : int;
7 jtw : int;
8 solutions : int;
9 logs : int;
10 packages : int;
11 total : int;
12}
13
14val scan : os_dir:Fpath.t -> cache_dir:Fpath.t -> report
15(** [scan ~os_dir ~cache_dir] computes disk usage in bytes for
16 each category. *)
17
18val pp : report Fmt.t
19(** Pretty-print a report with human-readable sizes. *)