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

Commit21f7fe6

Browse files
make getKindPriority inline
1 parent1732849 commit21f7fe6

File tree

2 files changed

+13
-11
lines changed

2 files changed

+13
-11
lines changed

‎vsintegration/src/FSharp.Editor/Completion/CompletionProvider.fs‎

Lines changed: 1 addition & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -121,21 +121,12 @@ type internal FSharpCompletionProvider
121121
partialName, getAllSymbols, userOpName=userOpName)|> liftAsync
122122
letresults= List<Completion.CompletionItem>()
123123

124-
letgetKindPriority=function
125-
| CompletionItemKind.Property->0
126-
| CompletionItemKind.Field->1
127-
| CompletionItemKind.Method(isExtension=false)->2
128-
| CompletionItemKind.Event->3
129-
| CompletionItemKind.Argument->4
130-
| CompletionItemKind.Other->5
131-
| CompletionItemKind.Method(isExtension=true)->6
132-
133124
declarationItems<-
134125
declarations.Items
135126
|> Array.sortWith(fun x y->
136127
let mutablen=(not x.IsResolved).CompareTo(not y.IsResolved)
137128
if n<>0then nelse
138-
n<-(getKindPriority x.Kind).CompareTo(getKindPriority y.Kind)
129+
n<-(CompletionUtils.getKindPriority x.Kind).CompareTo(CompletionUtils.getKindPriority y.Kind)
139130
if n<>0then nelse
140131
n<-(not x.IsOwnMember).CompareTo(not y.IsOwnMember)
141132
if n<>0then nelse

‎vsintegration/src/FSharp.Editor/Completion/CompletionUtils.fs‎

Lines changed: 12 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -9,6 +9,7 @@ open Microsoft.CodeAnalysis.Classification
99
openMicrosoft.CodeAnalysis.Text
1010
openMicrosoft.CodeAnalysis.Completion
1111
openSystem.Globalization
12+
openMicrosoft.FSharp.Compiler.SourceCodeServices
1213

1314
moduleinternalCompletionUtils=
1415

@@ -97,4 +98,14 @@ module internal CompletionUtils =
9798
| ClassificationTypeNames.Operator
9899
| ClassificationTypeNames.NumericLiteral->false
99100
|_->true// anything else is a valid classification type
100-
))
101+
))
102+
103+
let inlinegetKindPriority kind=
104+
match kindwith
105+
| CompletionItemKind.Property->0
106+
| CompletionItemKind.Field->1
107+
| CompletionItemKind.Method(isExtension=false)->2
108+
| CompletionItemKind.Event->3
109+
| CompletionItemKind.Argument->4
110+
| CompletionItemKind.Other->5
111+
| CompletionItemKind.Method(isExtension=true)->6

0 commit comments

Comments
 (0)

[8]ページ先頭

©2009-2025 Movatter.jp