diff --git a/src/passes/1-parser/reasonligo/Parser.mly b/src/passes/1-parser/reasonligo/Parser.mly index ef1e7b030..2b257d80c 100644 --- a/src/passes/1-parser/reasonligo/Parser.mly +++ b/src/passes/1-parser/reasonligo/Parser.mly @@ -278,8 +278,7 @@ let_binding: } | par(closed_irrefutable) type_annotation? "=" expr { wild_error $4; - Scoping.check_pattern $1.value.inside; - {binders = PPar $1, []; lhs_type=$2; eq=$3; let_rhs=$4} + {binders = $1.value.inside, []; lhs_type=$2; eq=$3; let_rhs=$4} } | tuple(sub_irrefutable) type_annotation? "=" expr { wild_error $4; diff --git a/src/test/contracts/expected/let_multiple.religo b/src/test/contracts/expected/let_multiple.religo index b1e1a8cf9..d961ba0ee 100644 --- a/src/test/contracts/expected/let_multiple.religo +++ b/src/test/contracts/expected/let_multiple.religo @@ -1,13 +1,13 @@ -let (((x: int), (y: int))) = (1, 2); +let ((x: int), (y: int)) = (1, 2); let main = ((p: unit)): int => x + y; -let (((x: int), (y: int))) = (3, 3); +let ((x: int), (y: int)) = (3, 3); let main_paren = ((p: unit)): int => x + y; let foobar: (int, int) = (23, 42); -let (((foo: int), (bar: int))) = foobar; +let ((foo: int), (bar: int)) = foobar; let non_tuple_rhs = ((p: unit)): int => foo + bar; diff --git a/src/test/contracts/expected/multisig.religo b/src/test/contracts/expected/multisig.religo index 364d9292b..2cb8c7bec 100644 --- a/src/test/contracts/expected/multisig.religo +++ b/src/test/contracts/expected/multisig.religo @@ -51,7 +51,7 @@ let check_message = : (nat, authorized_keys) => { - let ((valid, keys)) = vk; + let (valid, keys) = vk; switch(keys) { | [] => vk | [key, ...keys] => @@ -75,7 +75,7 @@ let check_message = } } }; - let ((valid, keys)) = + let (valid, keys) = List.fold(aux, param.signatures, (valid, keys)); if(valid < s.threshold) {