Rename a value

fsprojects · Jan 4, 2023 · 9b77e15 · 9b77e15
1 parent 3f59a55
commit 9b77e15
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/src/Fantomas.Core/CodePrinter.fs b/src/Fantomas.Core/CodePrinter.fs
@@ -3064,8 +3064,9 @@ let genType (t: Type) =
 
         fun (ctx: Context) ->
             let size = getRecordSize ctx node.Fields
+
             genNode node (isSmallExpression size smallExpression longExpression) ctx
-            |> dumpAndContinue 
+            |> dumpAndContinue
 
     | Type.Paren node ->
         genSingleTextNode node.OpeningParen
@@ -3262,7 +3263,7 @@ let genTypeDefn (td: TypeDefn) =
         let multilineExpression (ctx: Context) =
             let noMembers = List.isEmpty members
 
-            let genOtherFields =
+            let genRecordFields =
                 genSingleTextNode node.OpeningBrace
                 +> indentSepNlnUnindent (atCurrentColumn (col sepNln node.Fields genField))
                 +> sepNln
@@ -3275,7 +3276,7 @@ let genTypeDefn (td: TypeDefn) =
 
             let aligned =
                 opt (indent +> sepNln) node.Accessibility genSingleTextNode
-                +> genOtherFields
+                +> genRecordFields
                 +> optSingle (fun _ -> unindent) node.Accessibility
                 +> genMembers
 
@@ -3285,7 +3286,7 @@ let genTypeDefn (td: TypeDefn) =
             let genMultilineExpression =
                 match ctx.Config.MultilineBracketStyle with
                 | ExperimentalStroustrup when noMembers ->
-                    genAccessOpt node.Accessibility +> genOtherFields +> genMembers
+                    genAccessOpt node.Accessibility +> genRecordFields +> genMembers
                 | Aligned
                 | ExperimentalStroustrup -> aligned
                 | Cramped when anyFieldHasXmlDoc -> aligned