Skip to content

Commit e2151dd

Browse files
author
Kevin Ransom
committed
Enable F# - C# project support
1 parent 15e4521 commit e2151dd

File tree

3 files changed

+12
-1
lines changed

3 files changed

+12
-1
lines changed

vsintegration/src/FSharp.LanguageService/FSharp.LanguageService.fsproj

+1
Original file line numberDiff line numberDiff line change
@@ -67,6 +67,7 @@
6767
<GeneratedModuleName>Microsoft.VisualStudio.FSharp.LanguageService.Strings</GeneratedModuleName>
6868
</EmbeddedResource>
6969
<Compile Include="AssemblyInfo.fs" />
70+
<Compile Include="LanguageServiceConstants.fs" />
7071
<Compile Include="Error.fs" />
7172
<Compile Include="Vs.fs" />
7273
<Compile Include="Colorize.fs" />
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
// Copyright (c) Microsoft Corporation. All Rights Reserved. See License.txt in the project root for license information.
2+
3+
namespace Microsoft.VisualStudio.FSharp.LanguageService
4+
5+
[<RequireQualifiedAccess>]
6+
module internal LanguageServiceConstants =
7+
8+
/// "F#"
9+
[<Literal>]
10+
let FSharpLanguageName = "F#"

vsintegration/src/FSharp.LanguageService/ProjectSitesAndFiles.fs

+1-1
Original file line numberDiff line numberDiff line change
@@ -274,7 +274,7 @@ type internal ProjectSitesAndFiles() =
274274
if not (isNull project) then
275275
for reference in project.ProjectReferences do
276276
let project = workspace.CurrentSolution.GetProject(reference.ProjectId)
277-
if not (isNull project) then
277+
if not (isNull project) && project.Language = LanguageServiceConstants.FSharpLanguageName then
278278
let siteProvider = provideProjectSiteProvider (workspace, project, serviceProvider, projectOptionsTable)
279279
let referenceProject = workspace.ProjectTracker.GetProject(reference.ProjectId)
280280
let outputPath = referenceProject.BinOutputPath

0 commit comments

Comments
 (0)