From bc5a5cd75b1c84b9a41790d90a913a0fc9b68f7d Mon Sep 17 00:00:00 2001
From: Christian Rinderknecht <Christian.Rinderknecht@tezcore.com>
Date: Sat, 20 Jun 2020 20:03:04 +0200
Subject: [PATCH] Move ESeq back to its original semantic action.

---
 src/passes/01-parser/cameligo/Parser.mly | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/passes/01-parser/cameligo/Parser.mly b/src/passes/01-parser/cameligo/Parser.mly
index 27a75ba61..d9ee47ba4 100644
--- a/src/passes/01-parser/cameligo/Parser.mly
+++ b/src/passes/01-parser/cameligo/Parser.mly
@@ -579,7 +579,7 @@ core_expr:
 | "false"                             {  ELogic (BoolExpr (False $1)) }
 | "true"                              {  ELogic (BoolExpr (True  $1)) }
 | list__(expr)                        {          EList (EListComp $1) }
-| sequence                            {                            $1 }
+| sequence                            {                       ESeq $1 }
 | record_expr                         {                    ERecord $1 }
 | update_record                       {                    EUpdate $1 }
 | code_insert                         {                ECodeInsert $1 }
@@ -678,7 +678,7 @@ sequence:
     and compound = BeginEnd ($1,$3) in
     let elements = $2 in
     let value    = {compound; elements; terminator=None}
-    in ESeq {region; value} }
+    in {region; value} }
 
 series:
   seq_expr ";" series { Utils.nsepseq_cons $1 $2 $3 }