{ 
open Parser 
exception Eof
}

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