From 8604834fe0d904e9541e4c90368f9020316279c4 Mon Sep 17 00:00:00 2001 From: Mylloon Date: Sat, 21 Oct 2023 12:54:58 +0200 Subject: [PATCH] newlines --- flap/src/hopix/hopixParser.mly | 18 ++++++++++++------ 1 file changed, 12 insertions(+), 6 deletions(-) diff --git a/flap/src/hopix/hopixParser.mly b/flap/src/hopix/hopixParser.mly index 38df860..f2e55cc 100644 --- a/flap/src/hopix/hopixParser.mly +++ b/flap/src/hopix/hopixParser.mly @@ -61,8 +61,10 @@ definition_typevariablelist: tdefinition: /* Type sommes */ -/* la définition étant assez compliqué, on va utilisé d'autre terme pour réduire la taille */ -| option(PIPE) l=separated_nonempty_list(PIPE, list_constructor_and_their_ty) { +/* la définition étant assez compliqué, + * on va utilisé d'autre terme pour réduire la taille */ +| option(PIPE) + l=separated_nonempty_list(PIPE, list_constructor_and_their_ty) { DefineSumType(l) } /* Type produit étiqueté */ @@ -89,7 +91,8 @@ label_with_type: vdefinition: /* Valeur simple */ -| LET i=located(identifier) ts=option(vdef_type_scheme) EQUAL e=located(expression) { +| LET i=located(identifier) ts=option(vdef_type_scheme) + EQUAL e=located(expression) { SimpleValue(i, ts, e) } /* Fonction(s) @@ -225,7 +228,8 @@ ty: TyArrow(ty1, ty2) } /* N-uplets (N > 1) */ -| th=located(simple_ty) STAR tt=separated_nonempty_list(STAR, located(simple_ty)) { +| th=located(simple_ty) + STAR tt=separated_nonempty_list(STAR, located(simple_ty)) { TyTuple(th :: tt) } @@ -377,13 +381,15 @@ expression: } /* Do while - Boucle non bornée et non vide * do { expr } until ( expr ) */ -| DO LBRACE e1=located(expression) RBRACE UNTIL LPAREN e2=located(expression) RPAREN { +| DO LBRACE e1=located(expression) RBRACE + UNTIL LPAREN e2=located(expression) RPAREN { Sequence([e2 ; Position.unknown_pos (While(e1, e2))]) } /* Boucle for - Boucle bornée * for x in (e1 to e2) { expr } */ | FOR var=located(identifier) - FROM LPAREN e1=located(expression) RPAREN TO LPAREN e2=located(expression) RPAREN + FROM LPAREN e1=located(expression) RPAREN + TO LPAREN e2=located(expression) RPAREN LBRACE e3=located(expression) RBRACE { For(var, e1, e2, e3) }