{ 
open Parser 
exception Eof
}

rule token = parse
  [' ' '\t'] { token lexbuf }
| ['\n']     { EOL }
| "create"   { CREATE }
| "page"     { PAGE }
| eof        { raise Eof }
| _ as s  { raise (Failure("illegal character " ^ String.escaped s))}
