parser.ml1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19type token = | SEMI | PLUS | PIPE | MINUS | LET | INT of (int) | INF | ID of (string) | EQUAL | EOI | DATA of (string) | COMPL_LET | COMPL_FUN | COMPL_ARG_VAL | COMPL_ARG_NAME | COMMA | COLON_EQUAL