rule int = parse
| (['0'-'9']* as integer) eof { string_of_int integer }
| _ { invalid_arg "not an integer" }