sig type cookie_token = [ `ASSIGNMENT of string * string | `EOF | `SEP ] val token : Lexing.lexbuf -> Cookie_lexer.cookie_token end