public-inline-1.opp.exp 369 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10
Warning: you are using the standard library and/or the %inline keyword. We
recommend switching on --infer in order to avoid obscure type error messages.
%start a
%token J
%token I

%type <int> a
%%

a:
11
| _10 = J
12
    {let _1 =
13
  let _1 = _10 in
14
                       ()
15
in
16 17
     ()}
| _10 = I
18
    {let _1 =
19
  let _1 = _10 in
20
                       ()
21
in
22
     ()}
23 24 25 26 27

%%