, , ( " true, 1 2", 2 ).
--info.
$$ : , ,
:
data TokenType = INT | SYM
data TokenLex = L TokenType String
TokenType , .
String $$
%token INTEGER {L INT $$ }
%token OTHER {L _ $$}
foo : INTEGER bar INTEGER { read $1 + read $3 }
| ...
$1 " INTEGER" 3 $" INTEGER". $2 " ( ).
$$, $1 $3 - geniune Haskell String, Happy, " INTEGER - " String " TokenLex", .