sig
  type t = [ `binary ] Package.Name.t * string
  val compare : 'a -> 'a -> int
end