diff --git a/flap/src/hopix/hopixParser.mly b/flap/src/hopix/hopixParser.mly index 92772d3..cd1cec1 100644 --- a/flap/src/hopix/hopixParser.mly +++ b/flap/src/hopix/hopixParser.mly @@ -21,6 +21,7 @@ %left LPAREN %left let1 + %left FUN %left STRING %left INT CID CHAR WHILE @@ -44,6 +45,7 @@ %left SLASH STAR %left fun1 +%left app1 %% @@ -343,7 +345,7 @@ expression: Fun(FunctionDefinition(p, e)) } /* Application */ -| e1=located(expression) e2=located(expression) { +| e1=located(expression) e2=located(expression) %prec app1 { Apply(e1, e2) }