fix idempotency issue by adding a conditional newline after the pats

dawedawe · Dec 20, 2023 · cd04b16 · cd04b16
1 parent 09b0b5b
commit cd04b16
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 3 deletions.
diff --git a/src/Fantomas.Core.Tests/PatternMatchingTests.fs b/src/Fantomas.Core.Tests/PatternMatchingTests.fs
@@ -2281,7 +2281,8 @@ Some ident.idRange
         equal
         """
 match synExpr with
-| SynExpr.App(argExpr = SynExpr.Match _) -> // CCC
-    Some ident.idRange
+| SynExpr.App(
+    argExpr = SynExpr.Match _ // CCC
+    ) -> Some ident.idRange
 | _ -> defaultTraverse synExpr
 """
diff --git a/src/Fantomas.Core/CodePrinter.fs b/src/Fantomas.Core/CodePrinter.fs
@@ -2605,7 +2605,11 @@ let genPat (p: Pattern) =
         +> optSingle genTyparDecls node.TyparDecls
         +> addSpaceBeforeParenInPattern node.Identifier
         +> genSingleTextNode node.OpeningParen
-        +> autoIndentAndNlnIfExpressionExceedsPageWidth (sepNlnWhenWriteBeforeNewlineNotEmpty +> pats)
+        +> autoIndentAndNlnIfExpressionExceedsPageWidth (
+            sepNlnWhenWriteBeforeNewlineNotEmpty
+            +> pats
+            +> sepNlnWhenWriteBeforeNewlineNotEmpty
+        )
         +> genSingleTextNode node.ClosingParen
         |> genNode node