From 06d40170b9f6f25e139d93dbe947a3f8339845df Mon Sep 17 00:00:00 2001
From: Eugene Auduchinok <eugene.auduchinok@jetbrains.com>
Date: Sun, 20 Sep 2020 16:35:34 +0300
Subject: [PATCH] Include paren pattern range in tuple simple pat

---
 src/fsharp/SyntaxTreeOps.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fsharp/SyntaxTreeOps.fs b/src/fsharp/SyntaxTreeOps.fs
index a2b1949a3e6..2d43ec17ad3 100644
--- a/src/fsharp/SyntaxTreeOps.fs
+++ b/src/fsharp/SyntaxTreeOps.fs
@@ -200,7 +200,7 @@ let rec SimplePatsOfPat synArgNameGenerator p =
 
     | SynPat.Tuple (false, ps, m)
 
-    | SynPat.Paren(SynPat.Tuple (false, ps, m), _) ->
+    | SynPat.Paren(SynPat.Tuple (false, ps, _), m) ->
         let ps2, laterF =
           List.foldBack
             (fun (p', rhsf) (ps', rhsf') ->