inline-with-dollar.opp.exp 369 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12
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 s
%token <unit> A

%type <unit> s
%%

s:
| _10 = A _2 = A _11 = A
    {let y =
  let _1 = _11 in
13
               (
14
  _1
15
)
16 17 18
in
let x =
  let _1 = _10 in
19
               (
20
  _1
21
)
22 23 24 25 26 27 28 29 30
in
             (
  x; y
)}

%%