module type S = sig
  val lexeme : Sedlexing.lexbuf -> string
end