src/Compilers/VisualBasic/Portable/BoundTree/BoundLambda.vb - main - githubmirror/roslyn

src/Compilers/VisualBasic/Portable/BoundTree/BoundLambda.vb

49 строк2 KB

Youssef Victor

IDE0036 - VB

27 авг 2020, 18:40

27 авг 2020, 18:40c55795e

' 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.Text
Imports Microsoft.CodeAnalysis.VisualBasic.Symbols
Imports Microsoft.CodeAnalysis.VisualBasic.Syntax

Namespace Microsoft.CodeAnalysis.VisualBasic

    Partial Friend Class BoundLambda

        ''' <summary>
        ''' Should this lambda be treated as a single line lambda?
        ''' </summary>
        Public ReadOnly Property IsSingleLine As Boolean
            Get
                ' NOTE: the following assert fails if the lambda was compiler generated, this is 
                ' NOTE: intentional as the method is not supposed to be called for such lambdas
                Debug.Assert(TypeOf Me.Syntax Is LambdaExpressionSyntax)

                Dim kind As SyntaxKind = Me.Syntax.Kind

                Return kind = SyntaxKind.SingleLineFunctionLambdaExpression OrElse
                       kind = SyntaxKind.SingleLineSubLambdaExpression
            End Get
        End Property

        Public Overrides ReadOnly Property ExpressionSymbol As Symbol
            Get
                Return Me.LambdaSymbol
            End Get
        End Property

#If DEBUG Then
        Private Sub Validate()
            Debug.Assert((DelegateRelaxation And (Not ConversionKind.DelegateRelaxationLevelMask)) = 0)

            Debug.Assert(
                TypeOf Syntax Is LambdaExpressionSyntax OrElse
                LambdaUtilities.IsLambdaBody(Syntax) OrElse
                Syntax.IsKind(SyntaxKind.AddressOfExpression) OrElse
                LambdaUtilities.IsNonUserCodeQueryLambda(Syntax) OrElse
                (DelegateRelaxation And ConversionKind.DelegateRelaxationLevelMask) <> ConversionKind.DelegateRelaxationLevelNone)
        End Sub
#End If
    End Class

End Namespace