Skip to content

Commit 475ce96

Browse files
committed
One more time...
1 parent 7f95b99 commit 475ce96

File tree

3 files changed

+7
-1
lines changed

3 files changed

+7
-1
lines changed

src/FsAutoComplete.Core/SignatureFormatter.fs

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -43,7 +43,11 @@ module SignatureFormatter =
4343
let rec formatFSharpType (context: FSharpDisplayContext) (typ: FSharpType) : string =
4444
let context = context.WithPrefixGenericParameters()
4545

46-
let nullabilityClause = if typ.HasNullAnnotation then " | null" else ""
46+
let nullabilityClause =
47+
if typ.HasNullAnnotation || typ.IsNullAmbivalent then
48+
" | null"
49+
else
50+
""
4751

4852
try
4953
if typ.IsTupleType || typ.IsStructTupleType then

test/FsAutoComplete.Tests.Lsp/CoreTests.fs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -641,6 +641,7 @@ let tooltipTests state =
641641
106u
642642
7u
643643
(concatLines [ "val usesBCLNullable:"; " key: string"; " -> string | null" ])
644+
verifySignature "simple value" 107u 7u ("val envKey: string | null")
644645
#endif
645646
] ]
646647

test/FsAutoComplete.Tests.Lsp/TestCases/Tooltips/Script.fsx

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -105,3 +105,4 @@ let usesConcreteNullable (x: string | null) = nonNull x
105105
let makesNullable (x: 'x): 'x | null = null
106106
let makesConcreteNullable (x: string): string | null = null
107107
let usesBCLNullable (key: string) = System.Environment.GetEnvironmentVariable(key)
108+
let envKey = System.Environment.GetEnvironmentVariable("PATH")

0 commit comments

Comments
 (0)