%{ %} %token <int*int> MLSTUFF COMMENT%token SIGNATURE STRUCTURE EOF %start Seq %type <token list> Seq %% Seq :     MLSTUFF Seq { MLSTUFF $1 :: $2 }  | COMMENT Seq { COMMENT $1 :: $2 }  | SIGNATURE Seq { SIGNATURE :: $2 }  | STRUCTURE Seq { STRUCTURE :: $2 }  | EOF           { [EOF] };