let lexeme lexbuf = LexBuffer.LexemeString lexbuf ... rule tokenize = parse | ['a'-'z' 'A'-'Z'] { TOKEN1 } | [u0100u0101] { TOKEN2 } | [u0102-u01FF] { TOKEN3 } ... | [eof] { EOF }