提交 b0b6e709 编写于 作者: B Brett Forsgren

properly handle VB Global namespace in DeclaredSymbolInfo

上级 4f147f5b
......@@ -541,6 +541,16 @@ Namespace Microsoft.CodeAnalysis.Editor.VisualBasic.UnitTests.NavigateTo
End Using
End Sub
<WorkItem(1121267)>
<Fact, Trait(Traits.Feature, Traits.Features.NavigateTo)>
Public Sub FindClassInGlobalNamespace()
Using worker = SetupWorkspace("Namespace Global", "Public Class C(Of T)", "End Class", "End Namespace")
SetupVerifableGlyph(StandardGlyphGroup.GlyphGroupClass, StandardGlyphItem.GlyphItemPublic)
Dim item = _aggregator.GetItems("C").Single
VerifyNavigateToResultItem(item, "C", MatchKind.Exact, NavigateToItemKind.Class, displayName:="C(Of T)")
End Using
End Sub
<Fact, Trait(Traits.Feature, Traits.Features.NavigateTo)>
Public Sub StartStopSanity()
' Verify that mutliple calls to start/stop don't blow up
......
......@@ -880,8 +880,12 @@ Namespace Microsoft.CodeAnalysis.VisualBasic
name = moduleDecl.ModuleStatement.Identifier.ValueText
typeParameterList = moduleDecl.ModuleStatement.TypeParameterList
Case SyntaxKind.NamespaceBlock
Return GetNodeName(CType(node, NamespaceBlockSyntax).NamespaceStatement.Name, includeTypeParameters:=False)
typeParameterList = Nothing
Dim nameSyntax = CType(node, NamespaceBlockSyntax).NamespaceStatement.Name
If nameSyntax.Kind() = SyntaxKind.GlobalName Then
Return Nothing
Else
Return GetNodeName(nameSyntax, includeTypeParameters:=False)
End If
Case SyntaxKind.QualifiedName
Dim qualified = CType(node, QualifiedNameSyntax)
If qualified.Left.Kind() = SyntaxKind.GlobalName Then
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册