CARAT
%left CARAT
CARAT /* '^' */
{ '|', BAR }, { '^', CARAT },
static char CARAT = '^';
write (2, &CARAT, 1);
write (2, &CARAT, 1);
{ $$.i = mn1(CARAT,$2.i); }
case CARAT:
case STAR: case QUEST: case PLUS: case CARAT:
case CARAT:
case CARAT:
case RSCON: case CARAT:
case CARAT: