Module Odoc_parser.Loc

type point = {
  1. line : int;
  2. column : int;
}
type span = {
  1. file : string;
  2. start : point;
  3. end_ : point;
}
val span : span list -> span
val nudge_start : int -> span -> span
type !'a with_location = {
  1. location : span;
  2. value : 'a;
}
val at : span -> 'a -> 'a with_location
val location : 'a with_location -> span
val value : 'a with_location -> 'a
val map : ('a -> 'b) -> 'a with_location -> 'b with_location
val same : 'a with_location -> 'b -> 'b with_location