sig type token = Kwd of string | Ident of string | Int of int | Float of float | String of string | Char of char val make_lexer : string list -> char Stdlib.Stream.t -> Genlex.token Stdlib.Stream.t end