Source file `point.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
(************************************************************************)
(* Flèche => document manager: Language Support                         *)
(* Copyright 2019-2023 Inria      -- Dual License LGPL 2.1 / GPL3+      *)
(* Written by: Emilio J. Gallego Arias                                  *)
(************************************************************************)

type t =
  { line : int
  ; character : int
  ; offset : int
  }

let pp fmt { line; character; offset } =
  Format.fprintf fmt "{ l: %d, c: %d | o: %d }" line character offset