package core_bench

  1. Overview
  2. Docs

Source file display_config.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
(** A module internal to [Core_bench]. Please look at {!Bench}. *)

type t = {
  don't_display_table   : bool;
  limit_width_to        : int;
  display               : Ascii_table.Display.t;
  ascii_table           : bool;
  show_output_as_sexp   : bool;
  show_absolute_ci      : bool;
  show_percentage       : bool;
  show_speedup          : bool;
  show_samples          : bool;
  show_all_values       : bool;
  show_overheads        : bool;
} [@@deriving fields]

let create
    ?(don't_display_table=false)
    ?(limit_width_to=Defaults.limit_width_to)
    ?(display=Defaults.display)
    ?(ascii_table=false)
    ?(show_output_as_sexp=false)
    ?(show_absolute_ci=false)
    ?(show_percentage=false)
    ?(show_speedup=false)
    ?(show_samples=false)
    ?(show_all_values=false)
    ?(show_overheads=false)
    () =
  { don't_display_table;
    limit_width_to;
    display;
    ascii_table;
    show_output_as_sexp;
    show_absolute_ci;
    show_percentage;
    show_samples;
    show_speedup;
    show_all_values;
    show_overheads;
  }