Print value of SynConst.UserNum as string.

Fixes fsprojects#682
nojaf · Apr 19, 2020 · 79e152f · 79e152f
1 parent 83073f2
commit 79e152f
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 1 deletion.
diff --git a/src/Fantomas.Tests/SynConstTests.fs b/src/Fantomas.Tests/SynConstTests.fs
@@ -128,3 +128,9 @@ module Runner =
         class
         end
 """
+
+[<Test>]
+let ``array literals of BigInteger, 682`` () =
+    formatSourceString false "let input = [| 1I;0I;-1I |]"  config
+    |> should equal "let input = [| 1I; 0I; -1I |]
+"
diff --git a/src/Fantomas/CodePrinter.fs b/src/Fantomas/CodePrinter.fs
@@ -2705,7 +2705,7 @@ and genConstNumber (c:SynConst) (r: range) =
                 | SynConst.Decimal(v) -> !- (sprintf "%A" v)
                 | SynConst.IntPtr(v) -> !- (sprintf "%A" v)
                 | SynConst.UIntPtr(v) -> !- (sprintf "%A" v)
-                | SynConst.UserNum(v,s) -> !- (sprintf "%A%s" v s)
+                | SynConst.UserNum(v,s) -> !- (sprintf "%s%s" v s)
                 | _ -> failwithf "Cannot generating Const number for %A" c
         <| ctx