我有以下解析器:
%{
open t
open Lexer
%}
%token <int> INT
%token <float> FLOAT
%token <char> CHAR
%token <bool> BOOL
%token PLUS Menos Mult Div Bigger Smaller MINUS TIMES
%token Equals Atribuicao SoE BoE And Or
%token IF THEN ELSE BEGIN END FUNCTION WHILE SEQ RANGE DEF RETURN OF TO PV VIR DD
%token RP LP SPL SPR LB RB
%token EOL
%left PLUS MINUS /* lowest precedence */
%left TIMES Div /* medium precedence */
%nonassoc UMINUS /* highest precedence */
%start main /* the entry point */
%type <int> main %%
main:
| expr EOL { $1 }
expr:
INT { $1 }
| IF LP expr RP { $3 }
| BEGIN expr END { $2 }
| RETURN expr PV { $2 }
| LP expr RP { $2 }
| expr PLUS expr { $1 + $3 }
| expr MINUS expr { $1 - $3 }
| expr TIMES expr { $1 * $3 }
| expr Div expr { $1 / $3 }
| MINUS expr %prec UMINUS { - $2 }
我知道它不完整,我仍在构建它并学习如何正确使用ocamlyacc / menhir。
当我添加这一行时:| expr Bigger expr {$1 > $3}
它给了我10个移位/减少冲突......但是当我用这样的括号添加这一行时:
| LP expr RP Bigger LP expr RP {$2 > $6}
LP代表&#39;(&#39; RP代表&#39;)&#39;
它完全适合,没有错误,也没有转移/减少冲突
这是问题的正确解决方案吗?如果是,那为什么呢? 还有一个问题,我在解析器上做错了吗?或者它只是不完整?
感谢和抱歉!
答案 0 :(得分:1)
Bigger
和Smaller
需要声明为%left
或%right
关联以及数学运算:
%left Bigger Smaller
%left PLUS MINUS
%left TIMES Div
%nonassoc UMINUS