Source file `perf.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
(************************************************************************)
(* Coq Language Server Protocol -- Requests                             *)
(* Copyright 2019 MINES ParisTech -- Dual License LGPL 2.1 / GPL3+      *)
(* Copyright 2019-2023 Inria      -- Dual License LGPL 2.1 / GPL3+      *)
(* Written by: Emilio J. Gallego Arias                                  *)
(************************************************************************)

module Sentence = struct
  type t =
    { loc : Lang.Range.t
    ; time : float
    ; mem : float
    }
end

type t =
  { summary : string
  ; timings : Sentence.t list
  }