package archetype

  1. Overview
  2. Docs
type t = {
  1. loc_fname : string;
  2. loc_start : int * int;
  3. loc_end : int * int;
  4. loc_bchar : int;
  5. loc_echar : int;
}
and 'a loced = {
  1. plloc : t;
  2. pldesc : 'a;
}
val to_yojson : t -> Yojson.Safe.t
val loced_to_yojson : 'a. ('a -> Yojson.Safe.t) -> 'a loced -> Yojson.Safe.t
val pp : Ppx_deriving_runtime.Format.formatter -> t -> Ppx_deriving_runtime.unit
val show_loced : 'a. (Ppx_deriving_runtime.Format.formatter -> 'a -> Ppx_deriving_runtime.unit) -> 'a loced -> Ppx_deriving_runtime.string
include sig ... end
class virtual +'a location_map : object ... end
include sig ... end
class virtual +'a location_iter : object ... end
include sig ... end
class virtual +'a location_reduce : object ... end
include sig ... end
class virtual +'a location_reduce2 : object ... end
val dummy : t
val make : Stdlib.Lexing.position -> Stdlib.Lexing.position -> t
val of_lexbuf : Stdlib.Lexing.lexbuf -> t
val merge : t -> t -> t
val mergeall : t list -> t
val isdummy : t -> bool
val tostring : t -> string
val pp_loced : (Core.Format.formatter -> 'a -> unit) -> Core.Format.formatter -> 'a0 loced -> unit
val loc : 'a loced -> t
val unloc : 'a loced -> 'b
val unlocs : 'a loced list -> 'b list
val aspair : 'a loced -> t * 'b
val lmap : ('a -> 'b) -> 'a0 loced -> 'b0 loced
val mkloc : t -> 'a -> 'a0 loced
val dumloc : 'a -> 'a0 loced
val deloc : 'a loced -> t * 'b