exception Error of int * int * string
-val lex : (string * string) Token.glexer
+ (** lexer
+ * @param comments if true the lexer will return COMMENT tokens, otherwise they
+ * will be ignored. Defaults to false *)
+val cic_lexer: ?comments:bool -> unit -> (string * string) Token.glexer