未验证 提交 17fdbb12 编写于 作者: K Kevin Ransom (msft) 提交者: GitHub

Deploy System.Diagnostics.DiagnosticSource to Tools folder (#14417) (#14420)

* Deploy System.Diagnostics.DiagnosticSource to Tools folder (#14417)

* reapply test disable

* Update SymbolUse.fs

oops
上级 7383f62e
......@@ -98,6 +98,7 @@ folder "InstallDir:Common7\IDE\CommonExtensions\Microsoft\FSharp\Tools"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\FSharp.Compiler.Service.xml"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\System.Buffers.dll"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\System.Collections.Immutable.dll"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\System.Diagnostics.DiagnosticSource.dll"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\System.Memory.dll"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\System.Numerics.Vectors.dll"
file source="$(BinariesFolder)fsc\$(Configuration)\$(TargetFramework)\System.Reflection.Metadata.dll"
......
......@@ -68,7 +68,7 @@ val f: x: 'a -> TFirstV_1<'a>
Assert.True(symbolUse.IsPrivateToFile))
}
[<Fact>]
// [<Fact>] This is a bug - https://github.com/dotnet/fsharp/issues/14419
let ``Private function, with signature file`` () =
SyntheticProject.Create(
{ sourceFile "First" [] with ExtraSource = "let private f3 x = x + 1" }
......@@ -76,4 +76,4 @@ val f: x: 'a -> TFirstV_1<'a>
checkFile "First" (fun (typeCheckResult: FSharpCheckFileResults) ->
let symbolUse = typeCheckResult.GetSymbolUseAtLocation(6, 14, "let private f3 x = x + 1", ["f3"]) |> Option.defaultWith (fun () -> failwith "no symbol use found")
Assert.False(symbolUse.IsPrivateToFile))
}
\ No newline at end of file
}
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册