Module Srcloc.TYPES

type lexloc = Stdlib.Lexing.position * Stdlib.Lexing.position
type srcloc
type copylocs
type 'a with_loc = {
  1. payload : 'a;
  2. loc : srcloc;
}
val compare_with_loc : ('a -> 'a -> Ppx_deriving_runtime.int) -> 'a with_loc -> 'a with_loc -> Ppx_deriving_runtime.int