Module Archetype.Location

type t = {
loc_fname : string;
loc_start : int * int;
loc_end : int * int;
loc_bchar : int;
loc_echar : int;
}
and 'a loced = {
plloc : t;
pldesc : 'a;
}
val to_yojson : t -> Yojson.Safe.t
val of_yojson : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or
val loced_to_yojson : a. ('a -> Yojson.Safe.t) -> 'a loced -> Yojson.Safe.t
val loced_of_yojson : a. (Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or) -> Yojson.Safe.t -> 'a loced Ppx_deriving_yojson_runtime.error_or
val _ : t -> Yojson.Safe.t
val _ : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or
val _ : ('a -> Yojson.Safe.t) -> 'a loced -> Yojson.Safe.t
val _ : (Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or) -> Yojson.Safe.t -> 'a loced Ppx_deriving_yojson_runtime.error_or
val pp : Ppx_deriving_runtime.Format.formatter -> t -> Ppx_deriving_runtime.unit
val show : t -> Ppx_deriving_runtime.string
val pp_loced : a. (Ppx_deriving_runtime.Format.formatter -> 'a -> Ppx_deriving_runtime.unit) -> Ppx_deriving_runtime.Format.formatter -> 'a loced -> 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 +'c location_map : object ... end
include sig ... end
class virtual +'b location_iter : object ... end
include sig ... end
class virtual +'b location_reduce : object ... end
include sig ... end
class virtual +'c 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 -> 'a loced -> unit
val loc : 'a loced -> t
val unloc : 'a loced -> 'a
val unlocs : 'a loced list -> 'a list
val aspair : 'a loced -> t * 'a
val lmap : ('a -> 'b) -> 'a loced -> 'b loced
val mkloc : t -> 'a -> 'a loced
val dumloc : 'a -> 'a loced
val deloc : 'a loced -> t * 'a