提交 c5365353 编写于 作者: A Andrew Casey

Unswitch files

上级 dd960718
' Copyright (c) Microsoft. All Rights Reserved. Licensed under the Apache License, Version 2.0. See License.txt in the project root for license information.
Imports System.Reflection
Imports Microsoft.CodeAnalysis.Scripting.Hosting
Namespace Microsoft.CodeAnalysis.VisualBasic.Scripting.Hosting
Public Class VisualBasicObjectFormatter
Inherits CommonObjectFormatter
Public Class VisualBasicMemberFilter
Inherits CommonMemberFilter
Protected Overrides ReadOnly Property TypeNameFormatter As CommonTypeNameFormatter
Protected Overrides ReadOnly Property PrimitiveFormatter As CommonPrimitiveFormatter
Protected Overrides ReadOnly Property Filter As MemberFilter
Public Sub New()
PrimitiveFormatter = New VisualBasicPrimitiveFormatter()
TypeNameFormatter = New VisualBasicTypeNameFormatter(PrimitiveFormatter)
Filter = New VisualBasicMemberFilter()
End Sub
Protected Overrides Function FormatRefKind(parameter As ParameterInfo) As String
Return If(parameter.IsOut, "ByRef", "")
Protected Overrides Function IsGeneratedMemberName(name As String) As Boolean
' TODO (tomat)
Return MyBase.IsGeneratedMemberName(name)
End Function
End Class
End Namespace
' Copyright (c) Microsoft. All Rights Reserved. Licensed under the Apache License, Version 2.0. See License.txt in the project root for license information.
Imports System.Reflection
Imports Microsoft.CodeAnalysis.Scripting.Hosting
Namespace Microsoft.CodeAnalysis.VisualBasic.Scripting.Hosting
Public Class VisualBasicMemberFilter
Inherits CommonMemberFilter
Public Class VisualBasicObjectFormatter
Inherits CommonObjectFormatter
Protected Overrides Function IsGeneratedMemberName(name As String) As Boolean
' TODO (tomat)
Return MyBase.IsGeneratedMemberName(name)
Protected Overrides ReadOnly Property TypeNameFormatter As CommonTypeNameFormatter
Protected Overrides ReadOnly Property PrimitiveFormatter As CommonPrimitiveFormatter
Protected Overrides ReadOnly Property Filter As MemberFilter
Public Sub New()
PrimitiveFormatter = New VisualBasicPrimitiveFormatter()
TypeNameFormatter = New VisualBasicTypeNameFormatter(PrimitiveFormatter)
Filter = New VisualBasicMemberFilter()
End Sub
Protected Overrides Function FormatRefKind(parameter As ParameterInfo) As String
Return If(parameter.IsOut, "ByRef", "")
End Function
End Class
End Namespace
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册