module type Lexer =sig
..end
module Loc:Camlp4.Sig.Loc
module Token:Camlp4.Sig.Token
with module Loc = Loc
module Error:Camlp4.Sig.Error
val mk : unit ->
Camlp4.Sig.Loc.t ->
char Stream.t -> (Token.t * Camlp4.Sig.Loc.t) Stream.t