From 5d44ce12cef5b80adf463b9044bf674d7634bb21 Mon Sep 17 00:00:00 2001
From: Eugene Auduchinok <eugene.auduchinok@gmail.com>
Date: Sun, 10 Mar 2019 01:45:58 +0300
Subject: [PATCH] Add field names: whenExpr to Clause, isMutable to Field
 (#6308)

---
 src/fsharp/ast.fs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fsharp/ast.fs b/src/fsharp/ast.fs
index e7b3199241..0e0f7ca0d9 100644
--- a/src/fsharp/ast.fs
+++ b/src/fsharp/ast.fs
@@ -1147,7 +1147,7 @@ and
 and
     [<NoEquality; NoComparison>]
     SynMatchClause =
-    | Clause of SynPat * SynExpr option *  SynExpr * range:range * SequencePointInfoForTarget
+    | Clause of SynPat * whenExpr: SynExpr option * SynExpr * range:range * SequencePointInfoForTarget
 
     member this.RangeOfGuardAndRhs =
         match this with
@@ -1395,7 +1395,7 @@ and
     [<NoEquality; NoComparison>]
     /// The untyped, unchecked syntax tree for a field declaration in a record or class
     SynField =
-    | Field of attrs:SynAttributes * isStatic:bool * Ident option * SynType * bool * xmlDoc:PreXmlDoc * accessibility:SynAccess option * range:range
+    | Field of attrs:SynAttributes * isStatic:bool * Ident option * SynType * isMutable: bool * xmlDoc:PreXmlDoc * accessibility:SynAccess option * range:range
 
 and
     [<NoEquality; NoComparison>]