Commits

camlspotter committed c4e7cae

unused var

Comments (0)

Files changed (1)

     type t = string
     let show = Printf.sprintf "%S"
     let format ppf = Format.fprintf ppf "%S"
-    let position _ = Position.None.none
     include Mtypes.Make_comparable(struct
       type t = string
       let compare (x : string) y = compare x y