136 -> 30 conflicts

flap/src/hopix/hopixParser.mly

@@ -1,6 +1,7 @@
 %{ (* -*- tuareg -*- *)
 
   open HopixAST
+  (* open Position *)
 
 %}
 
@@ -15,30 +16,40 @@
 %token<char> CHAR
 
 
+
+
 %start<HopixAST.t> program
 
 /* TODO: Résoudre tout les shift/reduce conflits */
+
+%left LPAREN
+%left let1
+
 %left FUN
 %left STRING 
-%left INT
-%right WHILE REF DO
+%left INT CID CHAR WHILE
+%left ID
+%right REF DO 
 %left LET MATCH IF FOR
 %right ARROW 
 %right SEMICOLON 
+%left DOT
 %left ASSIGN 
-%left LPAREN
+%left LBRACE
 %left BACKSLASH
 
+
+
 %left EXCLA COLON 
 
-/* Priorités binop */
+/* priorités binop */
+
 %left D_OR
 %left D_AND
 %left EQUAL_OP INF_EQUAL_OP INF_OP SUP_EQUAL_OP SUP_OP
 %left PLUS MINUS
 %left SLASH STAR
 
-%left let1
 %left fun1
 
 
@@ -331,13 +342,16 @@ expression:
   }
 /* Sequence - Séquencement *
  * Pas sûr, voir s'il ne faut pas une troisième couche d'expression */
+ 
 | e=located(simple_expression)
   SEMICOLON e_list=separated_nonempty_list(SEMICOLON, located(simple_expression)) {
     Sequence(e :: e_list)
   }
-/* | e1=located(expression) SEMICOLON e2=located(expression) {
+  /*
+  |e1=located(expression) SEMICOLON e2=located(expression){
     Sequence([e1;e2])
   }*/
+
 /* Definition locale */
 | vd=vdefinition SEMICOLON e=located(expression) {
     Define(vd, e)