%token NUM = /(\d+)/ %token OP = /([-+*\/])/ %% T : $S { 1+int($S/2) } ; S: $S x { $S + 1 } | x { 1 } ; x: NUM | x OP NUM ; %%
%token NUM = /(\d+)/ %token OP = /([-+*\/])/ %% T : $S { 1+int($S/2) } ; S: $S x { $S + 1 } | x { 1 } ; x: NUM | x OP NUM ; %%