Add ticks to mod identifier. Fixes #1960.

fsprojects · Nov 8, 2021 · 3e077f5 · 3e077f5
1 parent b8509dd
commit 3e077f5
Show file tree

Hide file tree

Showing 2 changed files with 20 additions and 0 deletions.
diff --git a/src/Fantomas.Tests/SignatureTests.fs b/src/Fantomas.Tests/SignatureTests.fs
@@ -1601,3 +1601,22 @@ type Foo =
           Qux: string }
     static member Baz: int
 """
+
+[<Test>]
+let ``mod name in val, 1960`` () =
+    formatSourceString
+        true
+        """
+module X
+
+val ``mod``: t -> t -> t
+"""
+        config
+    |> prepend newline
+    |> should
+        equal
+        """
+module X
+
+val ``mod``: t -> t -> t
+"""
diff --git a/src/Fantomas/SourceParser.fs b/src/Fantomas/SourceParser.fs
@@ -35,6 +35,7 @@ let (|Ident|) (s: Ident) =
     | "not" -> "not"
     | "params" -> "``params``"
     | "parallel" -> "``parallel``"
+    | "mod" -> "``mod``"
     | _ ->
         if IsActivePatternName ident then
             sprintf "(%s)" (DecompileOpName ident)