/
githubmirror
/
roslyn
Обзор
Документация
Войти
/
githubmirror
/
roslyn
Код
Запросы
0
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
src/VisualStudio/Core/Test/ProjectSystemShim/VisualBasicProjectTests.vb
43 строки
2 KB
Cyrus Najmabadi
Update tests
13 авг 2024, 21:02
13 авг 2024, 21:02
da36650
Код
Авторство
О чём код?
' Licensed to the .NET Foundation under one or more agreements. ' The .NET Foundation licenses this file to you under the MIT license. ' See the LICENSE file in the project root for more information. Imports Microsoft.CodeAnalysis.Test.Utilities Imports Microsoft.VisualStudio.LanguageServices.UnitTests.ProjectSystemShim.Framework Imports Microsoft.VisualStudio.LanguageServices.UnitTests.ProjectSystemShim.VisualBasicHelpers Imports Roslyn.Test.Utilities Namespace Microsoft.VisualStudio.LanguageServices.UnitTests.ProjectSystemShim <[UseExportProvider]> <Trait(Traits.Feature, Traits.Features.ProjectSystemShims)> Public Class VisualBasicProjectTests <WpfFact> Public Sub RenameProjectUpdatesWorkspace() Using environment = New TestEnvironment() Dim project = CreateVisualBasicProject(environment, "Test") Dim hierarchy = DirectCast(project.Hierarchy, MockHierarchy) Assert.Equal(environment.Workspace.CurrentSolution.Projects.Single().Name, "Test") hierarchy.RenameProject("Test2") Assert.Equal(environment.Workspace.CurrentSolution.Projects.Single().Name, "Test2") project.Disconnect() End Using End Sub <WpfFact> Public Sub DisconnectingAProjectDoesNotLeak() Using environment = New TestEnvironment() Dim project = ObjectReference.CreateFromFactory(Function() CreateVisualBasicProject(environment, "Test")) Assert.Single(environment.Workspace.CurrentSolution.Projects) project.UseReference(Sub(p) p.Disconnect()) project.AssertReleased() End Using End Sub End Class End Namespace