Adding regression test for #631. (#1017)

fsprojects · Aug 19, 2020 · e7a9b75 · e7a9b75
1 parent 17fa4cb
commit e7a9b75
Showing 1 changed file with 31 additions and 0 deletions.
diff --git a/src/Fantomas.Tests/AttributeTests.fs b/src/Fantomas.Tests/AttributeTests.fs
@@ -574,3 +574,34 @@ type RoleAdminImportController(akkaService: AkkaService) =
             return Ok job
            }
 """
+
+[<Test>]
+let ``compiler defines around SynAttribute nodes, 631`` () =
+    formatSourceString false """
+type internal Handler() =
+  class
+    [<
+#if NETCOREAPP2_1
+      Builder.Object;
+#else
+      Widget;
+#endif
+    DefaultValue(true)>]
+    val mutable mainWindow: Window
+end
+
+"""  config
+    |> prepend newline
+    |> should equal """
+type internal Handler() =
+    class
+        [<
+#if NETCOREAPP2_1
+          Builder.Object;
+#else
+          Widget;
+#endif
+          DefaultValue(true)>]
+        val mutable mainWindow: Window
+    end
+"""