Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commit08520be

Browse files
vasily-kirichenkoKevinRansom
authored andcommitted
Fcs profiling util (dotnet#2312)
* add LanguageServiceProfiling project* the tool works* minor changes to LanguageServiceProfiling:* change target framework (so can build with vs2015)* change to x86* add <W> and <M> keys to waste some memory (loads 100mb array and put it in a resizearray) or reclaim waste (clear the resizearray) for extra memory pressure* Revert "minor changes to LanguageServiceProfiling:"This reverts commit82aefda.* it can check TypeChecker.fs* make the M/W keys actually more useful* add options for VFPT and <R> for find all references* fixes* added a crude call to GetDeclarationListInfo* remove commented codechange LanguageServiceProfiling util target framework to 4.6
1 parent3a68884 commit08520be

File tree

10 files changed

+1311
-2
lines changed

10 files changed

+1311
-2
lines changed

‎VisualFSharp.sln‎

Lines changed: 19 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11

22
Microsoft Visual Studio Solution File, Format Version 12.00
33
# Visual Studio 15
4-
VisualStudioVersion =15.0.26014.0
4+
VisualStudioVersion =15.0.26020.0
55
MinimumVisualStudioVersion =10.0.40219.1
66
Project("{F2A71F9B-5D33-465A-A702-920D77279786}") ="FSharp.Compiler","src\fsharp\FSharp.Compiler\FSharp.Compiler.fsproj","{2E4D67B4-522D-4CF7-97E4-BA940F0B18F3}"
77
EndProject
@@ -137,6 +137,10 @@ Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "HostedCompilerServer", "tes
137137
EndProject
138138
Project("{F2A71F9B-5D33-465A-A702-920D77279786}") ="ILComparer","tests\fsharpqa\testenv\src\ILComparer\ILComparer.fsproj","{2E60864A-E3FF-4BCC-810F-DC7C34E6B236}"
139139
EndProject
140+
Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") ="Utils","Utils","{D086C8C6-D00D-4C3B-9AB2-A4286C9F5922}"
141+
EndProject
142+
Project("{F2A71F9B-5D33-465A-A702-920D77279786}") ="LanguageServiceProfiling","vsintegration\Utils\LanguageServiceProfiling\LanguageServiceProfiling.fsproj","{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}"
143+
EndProject
140144
Global
141145
GlobalSection(SolutionConfigurationPlatforms) =preSolution
142146
Debug|Any CPU=Debug|Any CPU
@@ -738,6 +742,18 @@ Global
738742
{2E60864A-E3FF-4BCC-810F-DC7C34E6B236}.Release|Any CPU.Build.0=Release|Any CPU
739743
{2E60864A-E3FF-4BCC-810F-DC7C34E6B236}.Release|x86.ActiveCfg=Release|Any CPU
740744
{2E60864A-E3FF-4BCC-810F-DC7C34E6B236}.Release|x86.Build.0=Release|Any CPU
745+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Debug|Any CPU.ActiveCfg=Debug|Any CPU
746+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Debug|Any CPU.Build.0=Debug|Any CPU
747+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Debug|x86.ActiveCfg=Debug|Any CPU
748+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Debug|x86.Build.0=Debug|Any CPU
749+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Proto|Any CPU.ActiveCfg=Release|Any CPU
750+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Proto|Any CPU.Build.0=Release|Any CPU
751+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Proto|x86.ActiveCfg=Release|Any CPU
752+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Proto|x86.Build.0=Release|Any CPU
753+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Release|Any CPU.ActiveCfg=Release|Any CPU
754+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Release|Any CPU.Build.0=Release|Any CPU
755+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Release|x86.ActiveCfg=Release|Any CPU
756+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903}.Release|x86.Build.0=Release|Any CPU
741757
EndGlobalSection
742758
GlobalSection(SolutionProperties) =preSolution
743759
HideSolutionNode =FALSE
@@ -798,5 +814,7 @@ Global
798814
{E6A45CDF-B408-420F-B475-74611BEFC52B} ={141F6C23-E1B1-4D89-9F10-F0B8AD58E71F}
799815
{4239EFEA-E746-446A-BF7A-51FCBAB13946} ={CFE3259A-2D30-4EB0-80D5-E8B5F3D01449}
800816
{2E60864A-E3FF-4BCC-810F-DC7C34E6B236} ={CFE3259A-2D30-4EB0-80D5-E8B5F3D01449}
817+
{D086C8C6-D00D-4C3B-9AB2-A4286C9F5922} ={4C7B48D7-19AF-4AE7-9D1D-3BB289D5480D}
818+
{E7FA3A71-51AF-4FCA-9C2F-7C853E515903} ={D086C8C6-D00D-4C3B-9AB2-A4286C9F5922}
801819
EndGlobalSection
802820
EndGlobal

‎src/assemblyinfo/assemblyinfo.FSharp.LanguageService.Compiler.dll.fs‎

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -30,6 +30,7 @@ open Microsoft.VisualStudio.Shell
3030
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("VisualFSharp.Salsa")>]
3131
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("VisualFSharp.Unittests")>]
3232
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("fsc-proto")>]
33+
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("LanguageServiceProfiling")>]
3334
#endif
3435
#if STRONG_NAME_AND_DELAY_SIGN_FSHARP_COMPILER_WITH_MSFT_KEY
3536

@@ -47,6 +48,7 @@ open Microsoft.VisualStudio.Shell
4748
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("VisualFSharp.Unittests, PublicKey=002400000480000094000000060200000024000052534131000400000100010007D1FA57C4AED9F0A32E84AA0FAEFD0DE9E8FD6AEC8F87FB03766C834C99921EB23BE79AD9D5DCC1DD9AD236132102900B723CF980957FC4E177108FC607774F29E8320E92EA05ECE4E821C0A5EFE8F1645C4C0C93C1AB99285D622CAA652C1DFAD63D745D6F2DE5F17E5EAF0FC4963D261C8A12436518206DC093344D5AD293")>]
4849
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("Test, PublicKey=002400000480000094000000060200000024000052534131000400000100010007D1FA57C4AED9F0A32E84AA0FAEFD0DE9E8FD6AEC8F87FB03766C834C99921EB23BE79AD9D5DCC1DD9AD236132102900B723CF980957FC4E177108FC607774F29E8320E92EA05ECE4E821C0A5EFE8F1645C4C0C93C1AB99285D622CAA652C1DFAD63D745D6F2DE5F17E5EAF0FC4963D261C8A12436518206DC093344D5AD293")>]
4950
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("FSharp.Compiler.Unittests, PublicKey=002400000480000094000000060200000024000052534131000400000100010007D1FA57C4AED9F0A32E84AA0FAEFD0DE9E8FD6AEC8F87FB03766C834C99921EB23BE79AD9D5DCC1DD9AD236132102900B723CF980957FC4E177108FC607774F29E8320E92EA05ECE4E821C0A5EFE8F1645C4C0C93C1AB99285D622CAA652C1DFAD63D745D6F2DE5F17E5EAF0FC4963D261C8A12436518206DC093344D5AD293")>]
51+
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("LanguageServiceProfiling, PublicKey=0024000004800000940000000602000000240000525341310004000001000100dda0d353f027ab6adc878bfbfe4a07fb00ffd2edd5f255a14c6474b7f4e561796822b6b3cf83d81716c6afe9be5d343d7f99ef98252ead91e7c3c4df043fdd71fd3130f6611c3c0f7d4f3e698491e9b74d4de456042a737f4fc5443a98bf989b7377bee0969c58b85c26b48ef94ffbc95e68e10545fb573243e249204921afb8")>]
5052
#endif
5153

5254
#if BUILDING_WITH_LKG

‎src/fsharp/FSharp.LanguageService.Compiler/InternalsVisibleTo.fs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,6 @@ open System.Reflection
1616
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("VisualFSharp.Salsa, PublicKey=002400000480000094000000060200000024000052534131000400000100010007D1FA57C4AED9F0A32E84AA0FAEFD0DE9E8FD6AEC8F87FB03766C834C99921EB23BE79AD9D5DCC1DD9AD236132102900B723CF980957FC4E177108FC607774F29E8320E92EA05ECE4E821C0A5EFE8F1645C4C0C93C1AB99285D622CAA652C1DFAD63D745D6F2DE5F17E5EAF0FC4963D261C8A12436518206DC093344D5AD293")>]
1717
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("VisualFSharp.Unittests, PublicKey=002400000480000094000000060200000024000052534131000400000100010007D1FA57C4AED9F0A32E84AA0FAEFD0DE9E8FD6AEC8F87FB03766C834C99921EB23BE79AD9D5DCC1DD9AD236132102900B723CF980957FC4E177108FC607774F29E8320E92EA05ECE4E821C0A5EFE8F1645C4C0C93C1AB99285D622CAA652C1DFAD63D745D6F2DE5F17E5EAF0FC4963D261C8A12436518206DC093344D5AD293")>]
1818
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("FSharp.Editor, PublicKey=002400000480000094000000060200000024000052534131000400000100010007D1FA57C4AED9F0A32E84AA0FAEFD0DE9E8FD6AEC8F87FB03766C834C99921EB23BE79AD9D5DCC1DD9AD236132102900B723CF980957FC4E177108FC607774F29E8320E92EA05ECE4E821C0A5EFE8F1645C4C0C93C1AB99285D622CAA652C1DFAD63D745D6F2DE5F17E5EAF0FC4963D261C8A12436518206DC093344D5AD293")>]
19-
19+
[<assembly:System.Runtime.CompilerServices.InternalsVisibleTo("LanguageServiceProfiling, PublicKey=0024000004800000940000000602000000240000525341310004000001000100dda0d353f027ab6adc878bfbfe4a07fb00ffd2edd5f255a14c6474b7f4e561796822b6b3cf83d81716c6afe9be5d343d7f99ef98252ead91e7c3c4df043fdd71fd3130f6611c3c0f7d4f3e698491e9b74d4de456042a737f4fc5443a98bf989b7377bee0969c58b85c26b48ef94ffbc95e68e10545fb573243e249204921afb8")>]
2020
do()
2121

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
<?xml version="1.0" encoding="utf-8" ?>
2+
<configuration>
3+
<startup>
4+
<supportedRuntimeversion="v4.0"sku=".NETFramework,Version=v4.6.2" />
5+
</startup>
6+
</configuration>
Lines changed: 41 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,41 @@
1+
namespaceLanguageServiceProfiling.AssemblyInfo
2+
3+
openSystem.Reflection
4+
openSystem.Runtime.CompilerServices
5+
openSystem.Runtime.InteropServices
6+
7+
// General Information about an assembly is controlled through the following
8+
// set of attributes. Change these attribute values to modify the information
9+
// associated with an assembly.
10+
[<assembly: AssemblyTitle("LanguageServiceProfiling")>]
11+
[<assembly: AssemblyDescription("")>]
12+
[<assembly: AssemblyConfiguration("")>]
13+
[<assembly: AssemblyCompany("")>]
14+
[<assembly: AssemblyProduct("LanguageServiceProfiling")>]
15+
[<assembly: AssemblyCopyright("Copyright © 2017")>]
16+
[<assembly: AssemblyTrademark("")>]
17+
[<assembly: AssemblyCulture("")>]
18+
19+
// Setting ComVisible to false makes the types in this assembly not visible
20+
// to COM components. If you need to access a type in this assembly from
21+
// COM, set the ComVisible attribute to true on that type.
22+
[<assembly: ComVisible(true)>]
23+
24+
// The following GUID is for the ID of the typelib if this project is exposed to COM
25+
[<assembly: Guid("e7fa3a71-51af-4fca-9c2f-7c853e515903")>]
26+
27+
// Version information for an assembly consists of the following four values:
28+
//
29+
// Major Version
30+
// Minor Version
31+
// Build Number
32+
// Revision
33+
//
34+
// You can specify all the values or you can default the Build and Revision Numbers
35+
// by using the '*' as shown below:
36+
// [<assembly: AssemblyVersion("1.0.*")>]
37+
[<assembly: AssemblyVersion("1.0.0.0")>]
38+
[<assembly: AssemblyFileVersion("1.0.0.0")>]
39+
[<assembly: AssemblyKeyFileAttribute(@"..\..\..\tests\fsharp\core\internalsvisible\key.snk")>]
40+
41+
do()
Lines changed: 100 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,100 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<ProjectToolsVersion="15.0"DefaultTargets="Build"xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
3+
<ImportProject="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props"Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
4+
<PropertyGroup>
5+
<FSharpSourcesRoot>$(MSBuildProjectDirectory)\..\..\..\src</FSharpSourcesRoot>
6+
<ProjectLanguage>FSharp</ProjectLanguage>
7+
</PropertyGroup>
8+
<ImportProject="$(FSharpSourcesRoot)\FSharpSource.settings.targets" />
9+
<PropertyGroup>
10+
<ConfigurationCondition=" '$(Configuration)' == ''">Debug</Configuration>
11+
<PlatformCondition=" '$(Platform)' == ''">AnyCPU</Platform>
12+
<SchemaVersion>2.0</SchemaVersion>
13+
<ProjectGuid>e7fa3a71-51af-4fca-9c2f-7c853e515903</ProjectGuid>
14+
<OutputType>Exe</OutputType>
15+
<RootNamespace>LanguageServiceProfiling</RootNamespace>
16+
<AssemblyName>LanguageServiceProfiling</AssemblyName>
17+
<TargetFrameworkVersion>v4.6</TargetFrameworkVersion>
18+
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
19+
<TargetFSharpCoreVersion>4.4.1.0</TargetFSharpCoreVersion>
20+
<Name>LanguageServiceProfiling</Name>
21+
</PropertyGroup>
22+
<PropertyGroupCondition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU'">
23+
<DebugSymbols>true</DebugSymbols>
24+
<DebugType>full</DebugType>
25+
<Optimize>false</Optimize>
26+
<Tailcalls>false</Tailcalls>
27+
<OutputPath>bin\$(Configuration)\</OutputPath>
28+
<DefineConstants>DEBUG;TRACE</DefineConstants>
29+
<WarningLevel>3</WarningLevel>
30+
<PlatformTarget>x86</PlatformTarget>
31+
<DocumentationFile>
32+
</DocumentationFile>
33+
<Prefer32Bit>true</Prefer32Bit>
34+
</PropertyGroup>
35+
<PropertyGroupCondition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU'">
36+
<DebugType>pdbonly</DebugType>
37+
<Optimize>true</Optimize>
38+
<Tailcalls>true</Tailcalls>
39+
<OutputPath>bin\$(Configuration)\</OutputPath>
40+
<DefineConstants>TRACE</DefineConstants>
41+
<WarningLevel>3</WarningLevel>
42+
<PlatformTarget>x86</PlatformTarget>
43+
<DocumentationFile>
44+
</DocumentationFile>
45+
<Prefer32Bit>true</Prefer32Bit>
46+
</PropertyGroup>
47+
<PropertyGroup>
48+
<MinimumVisualStudioVersionCondition="'$(MinimumVisualStudioVersion)' == ''">11</MinimumVisualStudioVersion>
49+
</PropertyGroup>
50+
<Choose>
51+
<WhenCondition="'$(VisualStudioVersion)' == '11.0'">
52+
<PropertyGroupCondition="Exists('$(MSBuildExtensionsPath32)\..\Microsoft SDKs\F#\3.0\Framework\v4.0\Microsoft.FSharp.Targets')">
53+
<FSharpTargetsPath>$(MSBuildExtensionsPath32)\..\Microsoft SDKs\F#\3.0\Framework\v4.0\Microsoft.FSharp.Targets</FSharpTargetsPath>
54+
</PropertyGroup>
55+
</When>
56+
<Otherwise>
57+
<PropertyGroupCondition="Exists('$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets')">
58+
<FSharpTargetsPath>$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets</FSharpTargetsPath>
59+
</PropertyGroup>
60+
</Otherwise>
61+
</Choose>
62+
<ImportProject="$(FSharpTargetsPath)" />
63+
<ItemGroup>
64+
<CompileInclude="AssemblyInfo.fs" />
65+
<CompileInclude="ProjectCracker.fs" />
66+
<CompileInclude="Options.fs" />
67+
<CompileInclude="Program.fs" />
68+
<NoneInclude="App.config" />
69+
<ContentInclude="packages.config" />
70+
</ItemGroup>
71+
<ItemGroup>
72+
<ReferenceInclude="mscorlib" />
73+
<ReferenceInclude="System" />
74+
<ReferenceInclude="System.Core" />
75+
<ReferenceInclude="System.Numerics" />
76+
<ReferenceInclude="System.ValueTuple">
77+
<HintPath>..\..\..\packages\System.ValueTuple.4.3.0\lib\netstandard1.0\System.ValueTuple.dll</HintPath>
78+
</Reference>
79+
<ReferenceInclude="System.Xml" />
80+
</ItemGroup>
81+
<ItemGroup>
82+
<ProjectReferenceInclude="..\..\..\src\fsharp\FSharp.Core\FSharp.Core.fsproj">
83+
<Name>FSharp.Core</Name>
84+
<Project>{ded3bbd7-53f4-428a-8c9f-27968e768605}</Project>
85+
<Private>True</Private>
86+
</ProjectReference>
87+
<ProjectReferenceInclude="..\..\..\src\fsharp\FSharp.LanguageService.Compiler\FSharp.LanguageService.Compiler.fsproj">
88+
<Name>FSharp.LanguageService.Compiler</Name>
89+
<Project>{a437a6ec-5323-47c2-8f86-e2cac54ff152}</Project>
90+
<Private>True</Private>
91+
</ProjectReference>
92+
</ItemGroup>
93+
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
94+
Other similar extension points exist, see Microsoft.Common.targets.
95+
<Target Name="BeforeBuild">
96+
</Target>
97+
<Target Name="AfterBuild">
98+
</Target>
99+
-->
100+
</Project>

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp