159
159
let ident = ('_'* ['a'-'z'] ['_' 'a'-'z' 'A'-'Z' '0'-'9']* | '_'+ | '_'+ ['0'-'9'] ['_' 'a'-'z' 'A'-'Z' '0'-'9']* )
160
160
let idtype = '_'* ['A'-'Z'] ['_' 'a'-'z' 'A'-'Z' '0'-'9']*
165
169
| [' ' '\t']+ { token lexbuf }
166
170
| "\r\n" { newline lexbuf; token lexbuf }
167
171
| '\n' | '\r' { newline lexbuf; token lexbuf }