853 references to CurrentToken
Microsoft.CodeAnalysis.VisualBasic (853)
Parser\BlockContexts\BlockContext.vb (1)
438If ifStmt.ThenKeyword IsNot Nothing AndAlso Not SyntaxFacts.IsTerminator(Parser.CurrentToken.Kind) Then
Parser\BlockContexts\ExecutableStatementContext.vb (1)
208Dim kind = Parser.CurrentToken.Kind
Parser\BlockContexts\IfPartContext.vb (1)
78If Not SyntaxFacts.IsTerminator(Parser.CurrentToken.Kind) Then
Parser\BlockContexts\SingleLineElseContext.vb (3)
32If ifStmt.ThenKeyword IsNot Nothing AndAlso Not SyntaxFacts.IsTerminator(Parser.CurrentToken.Kind) Then 81Dim token = Parser.CurrentToken 104Dim token = Parser.CurrentToken
Parser\BlockContexts\SingleLineIfBlockContext.vb (3)
32If ifStmt.ThenKeyword IsNot Nothing AndAlso Not SyntaxFacts.IsTerminator(Parser.CurrentToken.Kind) Then 87Dim token = Parser.CurrentToken 106Dim token = Parser.CurrentToken
Parser\BlockContexts\SingleLineLambdaContext.vb (1)
71Dim token = Parser.CurrentToken
Parser\ParseConditional.vb (44)
24If CurrentToken.Kind = SyntaxKind.DateLiteralToken OrElse 25CurrentToken.Kind = SyntaxKind.BadToken Then 28missingHash = missingHash.AddLeadingSyntax(New CodeAnalysis.Syntax.InternalSyntax.SyntaxList(Of SyntaxToken)(CurrentToken)) 33Debug.Assert(CurrentToken.Kind = SyntaxKind.HashToken, "Conditional compilation lines start with '#'.") 38Dim hashToken = DirectCast(CurrentToken, PunctuationSyntax) 41Select Case CurrentToken.Kind 68Select Case DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind 113Debug.Assert(CurrentToken.Kind = SyntaxKind.ElseKeyword) 115Dim elseKeyword = DirectCast(CurrentToken, KeywordSyntax) 118If CurrentToken.Kind <> SyntaxKind.IfKeyword Then 133Debug.Assert(CurrentToken.Kind = SyntaxKind.ElseIfKeyword) 140Debug.Assert(CurrentToken.Kind = SyntaxKind.IfKeyword OrElse CurrentToken.Kind = SyntaxKind.ElseIfKeyword) 142Dim ifKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 152If CurrentToken.Kind = SyntaxKind.ThenKeyword Then 153thenKeyword = DirectCast(CurrentToken, KeywordSyntax) 169Debug.Assert(CurrentToken.Kind = SyntaxKind.EndKeyword) 171Dim endKeyword = DirectCast(CurrentToken, KeywordSyntax) 176If CurrentToken.Kind = SyntaxKind.IfKeyword Then 178Dim ifKeyword = DirectCast(CurrentToken, KeywordSyntax) 183ElseIf CurrentToken.Kind = SyntaxKind.IdentifierToken Then 185Dim identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 188Dim regionKeyword = _scanner.MakeKeyword(DirectCast(CurrentToken, IdentifierTokenSyntax)) 194Dim externalSourceKeyword = _scanner.MakeKeyword(DirectCast(CurrentToken, IdentifierTokenSyntax)) 211Debug.Assert(CurrentToken.Kind = SyntaxKind.EndIfKeyword) 213Dim endIfKeyword = DirectCast(CurrentToken, KeywordSyntax) 226Debug.Assert(CurrentToken.Kind = SyntaxKind.ConstKeyword) 228Dim constKeyword = DirectCast(CurrentToken, KeywordSyntax) 256Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind = SyntaxKind.RegionKeyword, 259Dim identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 270Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind = SyntaxKind.ExternalSourceKeyword, 273Dim identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 317Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind = SyntaxKind.ExternalChecksumKeyword, 320Dim identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 385Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken, 387Dim identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 403If Not SyntaxFacts.IsTerminator(CurrentToken.Kind) Then 416If SyntaxFacts.IsTerminator(CurrentToken.Kind) Then 449Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind = SyntaxKind.ReferenceKeyword, 452Dim identifier = DirectCast(CurrentToken, IdentifierTokenSyntax)
Parser\ParseExpression.vb (96)
63Dim startToken As SyntaxToken = CurrentToken 134If Not CurrentToken.IsBinaryOperator Then 139Not IsValidOperatorForConditionalCompilationExpr(CurrentToken) Then 146precedence = KeywordTable.TokenOpPrec(CurrentToken.Kind) 184StartsValidConditionalCompilationExpr(CurrentToken), "Conditional compilation expression parsing confused!!!") 187Dim start As SyntaxToken = CurrentToken 243If CurrentToken.Kind <> SyntaxKind.DotToken Then 253If CurrentToken.Kind <> SyntaxKind.DotToken Then 263If CurrentToken.Kind <> SyntaxKind.DotToken Then 303term = term.AddTrailingSyntax(CurrentToken, ERRID.ERR_FullWidthAsXmlDelimiter) 330term = SyntaxFactory.TrueLiteralExpression(CurrentToken) 334term = SyntaxFactory.FalseLiteralExpression(CurrentToken) 338term = SyntaxFactory.NothingLiteralExpression(CurrentToken) 444If CurrentToken IsNot Nothing AndAlso CurrentToken.Kind = SyntaxKind.QuestionToken Then 445term = term.AddTrailingSyntax(CurrentToken, ERRID.ERR_NullableCharNotSupported) 454Dim [Next] As SyntaxToken = CurrentToken 490Select Case CurrentToken.Kind 549Debug.Assert(CurrentToken.Kind = SyntaxKind.IfKeyword) 550Dim IfStart = DirectCast(CurrentToken, KeywordSyntax) 554If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 639Debug.Assert(CurrentToken.Kind = SyntaxKind.GetTypeKeyword, "should be at GetType.") 641Dim [getType] As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 670Debug.Assert(CurrentToken.Kind = SyntaxKind.NameOfKeyword, "should be at NameOf.") 672Dim [nameOf] As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 731Debug.Assert(CurrentToken.Kind = SyntaxKind.GetXmlNamespaceKeyword, "should be at GetXmlNamespace.") 733Dim getXmlNamespaceKeyword = DirectCast(CurrentToken, KeywordSyntax) 736If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 743If CurrentToken.Kind = SyntaxKind.XmlNameToken Then 744name = SyntaxFactory.XmlPrefixName(DirectCast(CurrentToken, XmlNameTokenSyntax)) 770Debug.Assert(SyntaxFacts.IsPredefinedCastExpressionKeyword(CurrentToken.Kind), "ParseCastExpression called with the wrong token.") 772Dim Start = DirectCast(CurrentToken, KeywordSyntax) 791Debug.Assert(CurrentToken.Kind = SyntaxKind.NewKeyword, "must be at a New expression.") 793Dim NewKeyword = DirectCast(CurrentToken, KeywordSyntax) 796If CurrentToken.Kind = SyntaxKind.WithKeyword Then 812If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 832If Me.CurrentToken.Kind = Global.Microsoft.CodeAnalysis.VisualBasic.SyntaxKind.OpenParenToken Then 838ElseIf CurrentToken.Kind = SyntaxKind.OpenBraceToken Then 867If TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.FromKeyword, FromToken) Then 885If (CurrentToken.Kind = SyntaxKind.WithKeyword) Then 895If CurrentToken.Kind = SyntaxKind.WithKeyword Then 899If (CurrentToken.Kind = SyntaxKind.WithKeyword) Then 905If TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.FromKeyword, FromToken) AndAlso 924Debug.Assert(CurrentToken.Kind = SyntaxKind.TypeOfKeyword, "must be at TypeOf.") 925Dim [typeOf] As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 938Dim current As SyntaxToken = CurrentToken 998Debug.Assert(CurrentToken.Kind = SyntaxKind.DotToken OrElse 999CurrentToken.Kind = SyntaxKind.ExclamationToken, 1002Dim DotOrBangToken As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 1011If (CurrentToken.IsEndOfLine() AndAlso Not CurrentToken.IsEndOfParse()) Then 1013Debug.Assert(CurrentToken.Kind = SyntaxKind.StatementTerminatorToken AndAlso 1046Select Case (CurrentToken.Kind) 1049Dim atToken = DirectCast(CurrentToken, PunctuationSyntax) 1092Dim secondDotToken = DirectCast(CurrentToken, PunctuationSyntax) 1100If CurrentToken.Kind = SyntaxKind.LessThanToken Then 1122If CurrentToken.Kind = SyntaxKind.AtToken Then 1223Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken) 1232If (CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso 1247If (CurrentToken.Kind = SyntaxKind.CommaToken) Then 1264While CurrentToken.Kind = SyntaxKind.CommaToken 1271If (CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso 1311Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken, "should be at tkLParen.") 1317Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken) 1336closeParen = DirectCast(CurrentToken, PunctuationSyntax) 1398If (CurrentToken.Kind = SyntaxKind.IdentifierToken OrElse CurrentToken.IsKeyword()) AndAlso 1419ElseIf CurrentToken.Kind = SyntaxKind.CommaToken Then 1427ElseIf CurrentToken.Kind = SyntaxKind.CloseParenToken Then 1444ElseIf CurrentToken.Kind = SyntaxKind.CloseParenToken OrElse MustEndStatement(CurrentToken) Then 1455If CurrentToken.Kind = SyntaxKind.CommaToken Then 1456comma = DirectCast(CurrentToken, PunctuationSyntax) 1499If (CurrentToken.Kind = SyntaxKind.IdentifierToken OrElse CurrentToken.IsKeyword()) AndAlso 1516If CurrentToken.Kind <> SyntaxKind.CommaToken Then 1517If CurrentToken.Kind = SyntaxKind.CloseParenToken OrElse MustEndStatement(CurrentToken) Then 1527If CurrentToken.Kind <> SyntaxKind.CommaToken Then 1556If RedimOrNewParent AndAlso CurrentToken.Kind = SyntaxKind.ToKeyword Then 1557Dim toKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1585Dim keyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1647Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken) 1659Debug.Assert(CurrentToken.Kind = SyntaxKind.FunctionKeyword OrElse 1660CurrentToken.Kind = SyntaxKind.SubKeyword, 1664Dim methodKeyword = DirectCast(CurrentToken, KeywordSyntax) 1674If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 1678If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 1701If CurrentToken.Kind = SyntaxKind.AsKeyword Then 1702asKeyword = DirectCast(CurrentToken, KeywordSyntax) 1705If CurrentToken.Kind = SyntaxKind.LessThanToken Then 1727isMultiLine = isMultiLine OrElse CurrentToken.Kind = SyntaxKind.StatementTerminatorToken 1783If isMultiLine OrElse CurrentToken.Kind = SyntaxKind.ColonToken Then 1791If CurrentToken.IsEndOfParse() Then 1890Debug.Assert(DirectCast(CurrentToken, IdentifierTokenSyntax).ContextualKind = SyntaxKind.AwaitKeyword) 1893TryIdentifierAsContextualKeyword(CurrentToken, awaitKeyword)
Parser\ParseInterpolatedString.vb (32)
18Debug.Assert(CurrentToken.Kind = SyntaxKind.DollarSignDoubleQuoteToken, "ParseInterpolatedStringExpression called on the wrong token.") 22Debug.Assert(CurrentToken.Kind = SyntaxKind.DollarSignDoubleQuoteToken, "Rescanning $"" failed.") 24Dim dollarSignDoubleQuoteToken = DirectCast(CurrentToken, PunctuationSyntax) 34Select Case CurrentToken.Kind 37Dim textToken = DirectCast(CurrentToken, InterpolatedStringTextTokenSyntax) 42Debug.Assert(CurrentToken.Kind <> SyntaxKind.InterpolatedStringTextToken, 58skipped.Add(CurrentToken) 64doubleQuoteToken = DirectCast(CurrentToken, PunctuationSyntax) 101Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenBraceToken, "ParseInterpolatedStringEmbeddedExpression called on the wrong token.") 106Dim openBraceToken = DirectCast(CurrentToken, PunctuationSyntax) 111If CurrentToken.Kind = SyntaxKind.ColonToken Then 120If CurrentToken.Kind = SyntaxKind.ColonToken Then 127If CurrentToken.Kind = SyntaxKind.CommaToken Then 130Dim commaToken = DirectCast(CurrentToken, PunctuationSyntax) 133If CurrentToken.Kind = SyntaxKind.ColonToken Then 139If CurrentToken.Kind = SyntaxKind.MinusToken OrElse 140CurrentToken.Kind = SyntaxKind.PlusToken Then 142signTokenOpt = DirectCast(CurrentToken, PunctuationSyntax) 145If CurrentToken.Kind = SyntaxKind.ColonToken Then 154If CurrentToken.Kind = SyntaxKind.IntegerLiteralToken Then 156widthToken = DirectCast(CurrentToken, IntegerLiteralTokenSyntax) 159If CurrentToken.Kind = SyntaxKind.ColonToken Then 182If CurrentToken.Kind = SyntaxKind.ColonToken AndAlso colonToken IsNot Nothing Then 189If CurrentToken.Kind = SyntaxKind.InterpolatedStringTextToken Then 190formatStringToken = DirectCast(CurrentToken, InterpolatedStringTextTokenSyntax) 224If CurrentToken.Kind = SyntaxKind.ColonToken Then 232If CurrentToken.Kind = SyntaxKind.CloseBraceToken Then 237closeBraceToken = DirectCast(CurrentToken, PunctuationSyntax) 240ElseIf CurrentToken.Kind = SyntaxKind.EndOfInterpolatedStringToken Then 246If Not IsValidStatementTerminator(CurrentToken) Then 250Debug.Assert(CurrentToken.Kind <> SyntaxKind.CloseBraceToken) 253If CurrentToken.Kind = SyntaxKind.InterpolatedStringTextToken Then
Parser\ParseQuery.vb (51)
19If ((CurrentToken.Kind = SyntaxKind.IdentifierToken OrElse CurrentToken.IsKeyword()) AndAlso 30Debug.Assert(CurrentToken.Kind = SyntaxKind.EqualsToken) 32Equals = DirectCast(CurrentToken, PunctuationSyntax) 66If CurrentToken.Kind = SyntaxKind.CommaToken Then 67Dim comma = DirectCast(CurrentToken, PunctuationSyntax) 88If CurrentToken.Kind = SyntaxKind.IdentifierToken Then 89Dim curIdent = DirectCast(CurrentToken, IdentifierTokenSyntax) 103If Not aggName.ContainsDiagnostics AndAlso CurrentToken.Kind = SyntaxKind.OpenParenToken Then 104Dim lParen = DirectCast(CurrentToken, PunctuationSyntax) 110If CurrentToken.Kind <> SyntaxKind.CloseParenToken Then 145If Not CurrentToken.IsBinaryOperator AndAlso 146CurrentToken.Kind <> SyntaxKind.DotToken Then 159If CurrentToken.Kind = SyntaxKind.QuestionToken Then 160Dim unexpectedNullable As SyntaxToken = CurrentToken 176If ((CurrentToken.Kind = SyntaxKind.IdentifierToken OrElse CurrentToken.IsKeyword()) AndAlso 185Debug.Assert(CurrentToken.Kind = SyntaxKind.EqualsToken) 187Equals = DirectCast(CurrentToken, PunctuationSyntax) 194If CurrentToken.Kind = SyntaxKind.IdentifierToken OrElse CurrentToken.IsKeyword() Then 196If TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.GroupKeyword, groupKw) AndAlso 263If CurrentToken.Kind = SyntaxKind.CommaToken Then 264Dim comma = DirectCast(CurrentToken, PunctuationSyntax) 312If CurrentToken.Kind = SyntaxKind.QuestionToken AndAlso 316Dim unexpectedNullable As SyntaxToken = CurrentToken 326If CurrentToken.Kind = SyntaxKind.AsKeyword Then 327Dim AsKw As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 333If CurrentToken.Kind = SyntaxKind.InKeyword Then 433If CurrentToken.Kind = SyntaxKind.QuestionToken AndAlso 437Dim unexpectedNullable As SyntaxToken = CurrentToken 447If CurrentToken.Kind = SyntaxKind.AsKeyword Then 448Dim AsKw As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 454If CurrentToken.Kind = SyntaxKind.InKeyword Then 539Debug.Assert(CurrentToken.Text = contextualKeyword.Text) 786If CurrentToken.Kind = SyntaxKind.QuestionToken AndAlso 789Dim unexpectedNullable As SyntaxToken = CurrentToken 797If CurrentToken.Kind = SyntaxKind.AsKeyword Then 798Dim AsKw As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 866If CurrentToken.Kind <> SyntaxKind.StatementTerminatorToken Then 913ElseIf CurrentToken.Kind = SyntaxKind.AndAlsoKeyword OrElse 914CurrentToken.Kind = SyntaxKind.OrKeyword OrElse 915CurrentToken.Kind = SyntaxKind.OrElseKeyword Then 917Exprs(Exprs.Count - 1) = Exprs(Exprs.Count - 1).AddTrailingSyntax(CurrentToken, ERRID.ERR_ExpectedAnd) 1043Dim Start = CurrentToken 1057Start = CurrentToken 1090If CurrentToken.Kind = SyntaxKind.WhileKeyword Then 1092Dim whileKw = DirectCast(CurrentToken, KeywordSyntax) 1104If CurrentToken.Kind = SyntaxKind.WhileKeyword Then 1106Dim whileKw = DirectCast(CurrentToken, KeywordSyntax) 1144If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken Then
Parser\Parser.vb (267)
100Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken, "Generic parameter parsing lost!!!") 113CurrentToken.Kind <> SyntaxKind.DotToken AndAlso 175If CurrentToken.Kind = SyntaxKind.GlobalKeyword Then 177result = SyntaxFactory.GlobalName(DirectCast(CurrentToken, KeywordSyntax)) 466If CurrentToken.IsEndOfParse Then 480Dim terminator = DirectCast(CurrentToken, PunctuationSyntax) 507While CurrentToken.Kind <> SyntaxKind.EndOfFileToken 508builder.Add(CurrentToken) 536Loop While _context.Level > methodContext.Level AndAlso Not CurrentToken.IsEndOfParse 558Dim result As SyntaxToken = CurrentToken 561If CurrentToken.Kind = SyntaxKind.GreaterThanToken AndAlso 572ElseIf CurrentToken.Kind = SyntaxKind.EqualsToken Then 594result = result.AddLeadingSyntax(SyntaxList.List(CurrentToken, nextToken), ERRID.ERR_ExpectedRelational) 653Select Case CurrentToken.Kind 756Debug.Assert(False, "Unexpected terminator: " & CurrentToken.Kind.ToString()) 760If IsFirstStatementOnLine(CurrentToken) Then 773If TryIdentifierAsContextualKeyword(CurrentToken, contextualKind) Then 845Dim idf = CurrentToken 908Select Case CurrentToken.Kind 1030If Me.CurrentToken.Kind = Global.Microsoft.CodeAnalysis.VisualBasic.SyntaxKind.LessThanToken Then 1042Select Case CurrentToken.Kind 1058If TryIdentifierAsContextualKeyword(CurrentToken, contextualKind) Then 1078If IsFirstStatementOnLine(CurrentToken) Then 1094If TryIdentifierAsContextualKeyword(CurrentToken, contextualKind) Then 1178Debug.Assert(False, "Unexpected terminator: " & CurrentToken.Kind.ToString()) 1227If CanFollowStatement(CurrentToken) Then 1244Debug.Assert(CurrentToken.Kind = SyntaxKind.EmptyToken) 1245Dim emptyToken = DirectCast(CurrentToken, PunctuationSyntax) 1268If Me.CurrentToken.Kind = Global.Microsoft.CodeAnalysis.VisualBasic.SyntaxKind.LessThanToken Then 1287Select Case (CurrentToken.Kind) 1297If TryIdentifierAsContextualKeyword(CurrentToken, keyword) Then 1399ElseIf modifiers.Any AndAlso CurrentToken.IsKeyword Then 1437Debug.Assert(CurrentToken.Kind = SyntaxKind.EnumKeyword, "ParseEnumStatement called on the wrong token.") 1439Dim enumKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1446If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 1456If CurrentToken.Kind = SyntaxKind.AsKeyword Then 1457Dim asKeyword = DirectCast(CurrentToken, KeywordSyntax) 1559Dim typeKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1586If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 1638Debug.Assert(CurrentToken.Kind = SyntaxKind.NamespaceKeyword, "ParseNamespaceStatement called on the wrong token.") 1640Dim namespaceKeyword As KeywordSyntax = ReportModifiersOnStatementError(ERRID.ERR_SpecifiersInvalidOnInheritsImplOpt, attributes, Specifiers, DirectCast(CurrentToken, KeywordSyntax)) 1676Debug.Assert(CurrentToken.Kind = SyntaxKind.EndKeyword, "ParseEndStatement called on wrong token.") 1713Debug.Assert(CurrentToken.Kind = SyntaxKind.EndKeyword, "ParseGroupEndStatement called on wrong token.") 1715Dim endKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1936Dim t As SyntaxToken = CurrentToken 1984If TryTokenAsContextualKeyword(CurrentToken, possibleKeyword) Then 2189If CurrentToken.Kind = SyntaxKind.AsKeyword Then 2190asKeyword = DirectCast(CurrentToken, KeywordSyntax) 2196If CurrentToken.Kind = SyntaxKind.NewKeyword Then 2197newKeyword = DirectCast(CurrentToken, KeywordSyntax) 2200If isProperty AndAlso CurrentToken.Kind = SyntaxKind.LessThanToken Then 2204If CurrentToken.Kind = SyntaxKind.WithKeyword Then 2213If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 2225If TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.FromKeyword, fromKeyword) Then 2245If isProperty AndAlso CurrentToken.Kind = SyntaxKind.LessThanToken Then 2288If CurrentToken.Kind = SyntaxKind.WithKeyword Then 2293Dim withKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 2312If CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso TryIdentifierAsContextualKeyword(CurrentToken, possibleKeyword) Then 2367If CurrentToken.Kind <> SyntaxKind.CloseBraceToken Then 2406If CurrentToken.Kind <> SyntaxKind.CloseBraceToken Then 2431Debug.Assert(CurrentToken.Kind = SyntaxKind.WithKeyword, "ParseObjectInitializerList called with wrong token") 2436Dim withKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 2463If CurrentToken.Kind <> SyntaxKind.CloseBraceToken AndAlso 2464CurrentToken.Kind <> SyntaxKind.StatementTerminatorToken AndAlso 2465CurrentToken.Kind <> SyntaxKind.ColonToken Then 2528If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken AndAlso PeekToken(1).Kind = SyntaxKind.OpenBraceToken Then 2555TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.KeyKeyword, optionalKey) Then 2559If CurrentToken.Kind = SyntaxKind.DotToken Then 2560dot = DirectCast(CurrentToken, PunctuationSyntax) 2565If SyntaxKind.QuestionToken = CurrentToken.Kind Then 2566id = id.AddTrailingSyntax(CurrentToken) 2573If CurrentToken.Kind = SyntaxKind.EqualsToken Then 2574equals = DirectCast(CurrentToken, PunctuationSyntax) 2671Dim identifierStart As SyntaxToken = CurrentToken 2730If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 2794Dim Start As SyntaxToken = CurrentToken 2870If SyntaxKind.QuestionToken = CurrentToken.Kind Then 2873typeName = typeName.AddTrailingSyntax(CurrentToken, ERRID.ERR_BadNullTypeInCCExpression) 2885Dim questionMark As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 2907If CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso 2908(DirectCast(CurrentToken, IdentifierTokenSyntax).TypeCharacter <> TypeCharacter.None OrElse 2944ElseIf CurrentToken.Kind = SyntaxKind.CloseParenToken OrElse MustEndStatement(CurrentToken) Then 2955If CurrentToken.Kind = SyntaxKind.CommaToken Then 2956commaToken = DirectCast(CurrentToken, PunctuationSyntax) 3033Dim start As SyntaxToken = CurrentToken 3055If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 3099Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken, "Generic arguments parsing lost!!!") 3101openParen = DirectCast(CurrentToken, PunctuationSyntax) 3115If CurrentToken.Kind = SyntaxKind.CommaToken OrElse CurrentToken.Kind = SyntaxKind.CloseParenToken Then 3171Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken, "should be a (.") 3181Debug.Assert(Me.CurrentToken.Kind = Global.Microsoft.CodeAnalysis.VisualBasic.SyntaxKind.OpenParenToken) 3184If CurrentToken.Kind = SyntaxKind.CommaToken Then 3188ElseIf CurrentToken.Kind <> SyntaxKind.CloseParenToken Then 3210Loop While CurrentToken.Kind = SyntaxKind.OpenParenToken 3228Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken, "should be a (.") 3243Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken) 3246If CurrentToken.Kind = SyntaxKind.CommaToken Then 3250ElseIf CurrentToken.Kind <> SyntaxKind.CloseParenToken Then 3283Loop While CurrentToken.Kind = SyntaxKind.OpenParenToken 3324While CurrentToken.Kind = kind 3325Dim sep As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 3351ElseIf CurrentToken.Kind = SyntaxKind.ToKeyword Then 3352toKeyword = DirectCast(CurrentToken, KeywordSyntax) 3392Debug.Assert(CurrentToken.Kind = SyntaxKind.GetKeyword OrElse CurrentToken.Kind = SyntaxKind.SetKeyword OrElse 3393CurrentToken.Kind = SyntaxKind.AddHandlerKeyword OrElse CurrentToken.Kind = SyntaxKind.RemoveHandlerKeyword OrElse CurrentToken.Kind = SyntaxKind.RaiseEventKeyword) 3395Dim methodKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 3396If Not IsFirstStatementOnLine(CurrentToken) Then 3414CurrentToken.Kind = SyntaxKind.OpenParenToken Then 3450Debug.Assert(CurrentToken.Kind = SyntaxKind.ImplementsKeyword, "Implements list parsing lost.") 3452Dim implementsKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 3501Debug.Assert(CurrentToken.Kind = SyntaxKind.HandlesKeyword, "Handles list parsing lost.") 3503Dim handlesKeyword = DirectCast(CurrentToken, KeywordSyntax) 3512If CurrentToken.Kind = SyntaxKind.MyBaseKeyword OrElse 3513CurrentToken.Kind = SyntaxKind.MyClassKeyword OrElse 3514CurrentToken.Kind = SyntaxKind.MeKeyword Then 3516eventContainer = SyntaxFactory.KeywordEventContainer(DirectCast(CurrentToken, KeywordSyntax)) 3519ElseIf CurrentToken.Kind = SyntaxKind.GlobalKeyword Then 3559If CurrentToken.Kind <> SyntaxKind.CommaToken Then 3601Dim subKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 3629If CurrentToken.Kind = SyntaxKind.NewKeyword Then 3630newKeyword = DirectCast(CurrentToken, KeywordSyntax) 3715If CurrentToken.Kind = SyntaxKind.HandlesKeyword Then 3722ElseIf CurrentToken.Kind = SyntaxKind.ImplementsKeyword Then 3733If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 3766Dim functionKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 3825If CurrentToken.Kind = SyntaxKind.NewKeyword Then 3854If CurrentToken.Kind = SyntaxKind.AsKeyword Then 3855asKeyword = DirectCast(CurrentToken, KeywordSyntax) 3858If CurrentToken.Kind = SyntaxKind.LessThanToken Then 3873If CurrentToken.Kind = SyntaxKind.HandlesKeyword Then 3881ElseIf CurrentToken.Kind = SyntaxKind.ImplementsKeyword Then 3916Dim operatorKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 3937If TryTokenAsContextualKeyword(CurrentToken, keyword) Then 3940operatorToken = CurrentToken 3976If CurrentToken.Kind <> SyntaxKind.OpenParenToken Then 3982If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 4010If CurrentToken.Kind = SyntaxKind.AsKeyword Then 4011asKeyword = DirectCast(CurrentToken, KeywordSyntax) 4014If CurrentToken.Kind = SyntaxKind.LessThanToken Then 4037If CurrentToken.Kind = SyntaxKind.HandlesKeyword Then 4038handlesOrImplementsKeyword = CurrentToken 4042ElseIf CurrentToken.Kind = SyntaxKind.ImplementsKeyword Then 4043handlesOrImplementsKeyword = CurrentToken 4095Debug.Assert(CurrentToken.Kind = SyntaxKind.PropertyKeyword, "ParsePropertyDefinition called on the wrong token.") 4097Dim propertyKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 4103If CurrentToken.Kind = SyntaxKind.GetKeyword OrElse 4104CurrentToken.Kind = SyntaxKind.SetKeyword OrElse 4105CurrentToken.Kind = SyntaxKind.LetKeyword Then 4113If CurrentToken.Kind = SyntaxKind.IdentifierToken Then 4135If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 4160If CurrentToken.Kind = SyntaxKind.ImplementsKeyword Then 4171If CurrentToken.Kind <> SyntaxKind.EndOfFileToken Then 4201Debug.Assert(CurrentToken.Kind = SyntaxKind.DelegateKeyword, "ParseDelegateStatement called on the wrong token.") 4203Dim delegateKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 4216Select Case (CurrentToken.Kind) 4220methodKeyword = DirectCast(CurrentToken, KeywordSyntax) 4226methodKeyword = DirectCast(CurrentToken, KeywordSyntax) 4274Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken) 4297If CurrentToken.Kind = SyntaxKind.InKeyword Then 4298optionalVarianceModifier = DirectCast(CurrentToken, KeywordSyntax) 4304If TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.OutKeyword, outKeyword) Then 4305Dim id = DirectCast(CurrentToken, IdentifierTokenSyntax) 4312If CurrentToken.Kind = SyntaxKind.CloseParenToken OrElse CurrentToken.Kind = SyntaxKind.CommaToken OrElse CurrentToken.Kind = SyntaxKind.AsKeyword Then 4330If CurrentToken.Kind = SyntaxKind.AsKeyword Then 4332asKeyword = DirectCast(CurrentToken, KeywordSyntax) 4414If CurrentToken.Kind = SyntaxKind.NewKeyword Then 4416keyword = DirectCast(CurrentToken, KeywordSyntax) 4422ElseIf CurrentToken.Kind = SyntaxKind.ClassKeyword Then 4424keyword = DirectCast(CurrentToken, KeywordSyntax) 4428ElseIf CurrentToken.Kind = SyntaxKind.StructureKeyword Then 4431keyword = DirectCast(CurrentToken, KeywordSyntax) 4438If Not CanTokenStartTypeName(CurrentToken) Then 4473Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken, "Parameter list parsing confused.") 4478If CurrentToken.Kind <> SyntaxKind.CloseParenToken Then 4485If Me.CurrentToken.Kind = Global.Microsoft.CodeAnalysis.VisualBasic.SyntaxKind.LessThanToken Then 4502If CurrentToken.Kind <> SyntaxKind.CloseParenToken AndAlso Not MustEndStatement(CurrentToken) Then 4568Select Case (CurrentToken.Kind) 4571keyword = DirectCast(CurrentToken, KeywordSyntax) 4578keyword = DirectCast(CurrentToken, KeywordSyntax) 4588keyword = DirectCast(CurrentToken, KeywordSyntax) 4595keyword = DirectCast(CurrentToken, KeywordSyntax) 4696Debug.Assert(CurrentToken.Kind = SyntaxKind.ImportsKeyword, "called on wrong token") 4698Dim importsKeyword As KeywordSyntax = ReportModifiersOnStatementError(Attributes, Specifiers, DirectCast(CurrentToken, KeywordSyntax)) 4734If CurrentToken.Kind = SyntaxKind.LessThanToken Then 4743If CurrentToken.Kind = SyntaxKind.XmlNameToken AndAlso 4744CurrentToken.ToFullString = "xmlns" AndAlso 4777If (CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso 4779CurrentToken.Kind = SyntaxKind.EqualsToken Then 4791Dim equalsToken As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 4814If importsClause.ContainsDiagnostics AndAlso CurrentToken.Kind <> SyntaxKind.CommaToken Then 4852Debug.Assert(CurrentToken.Kind = SyntaxKind.InheritsKeyword OrElse CurrentToken.Kind = SyntaxKind.ImplementsKeyword, 4855Dim keyword As KeywordSyntax = ReportModifiersOnStatementError(Attributes, Specifiers, DirectCast(CurrentToken, KeywordSyntax)) 4914Debug.Assert(CurrentToken.Kind = SyntaxKind.OptionKeyword, "must be at Option.") 4916Dim optionKeyword = ReportModifiersOnStatementError(Attributes, Specifiers, DirectCast(CurrentToken, KeywordSyntax)) 4919If TryTokenAsContextualKeyword(CurrentToken, optionType) Then 4927If TryTokenAsContextualKeyword(CurrentToken, optionValue) Then 4953If CurrentToken.Kind = SyntaxKind.OnKeyword Then 4954optionValue = DirectCast(CurrentToken, KeywordSyntax) 4957ElseIf TryTokenAsContextualKeyword(CurrentToken, optionValue) AndAlso 4961ElseIf Not IsValidStatementTerminator(CurrentToken) Then 5019Debug.Assert(CurrentToken.Kind = SyntaxKind.DeclareKeyword, "ParseProcDeclareStatement called on wrong token. Must be at a Declare.") 5026Dim declareKeyword = DirectCast(CurrentToken, KeywordSyntax) 5034If TryTokenAsContextualKeyword(CurrentToken, contextualKeyword) Then 5047If CurrentToken.Kind = SyntaxKind.SubKeyword Then 5048methodKeyword = DirectCast(CurrentToken, KeywordSyntax) 5052ElseIf CurrentToken.Kind = SyntaxKind.FunctionKeyword Then 5053methodKeyword = DirectCast(CurrentToken, KeywordSyntax) 5073If CurrentToken.Kind <> SyntaxKind.LibKeyword Then 5121CurrentToken.Kind = SyntaxKind.AsKeyword Then 5123Dim asKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 5128If Me.CurrentToken.Kind = Global.Microsoft.CodeAnalysis.VisualBasic.SyntaxKind.LessThanToken Then 5200If CurrentToken.Kind = SyntaxKind.AliasKeyword Then 5201optionalAliasKeyword = DirectCast(CurrentToken, KeywordSyntax) 5224Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind = SyntaxKind.CustomKeyword, "ParseCustomEventDefinition called on the wrong token.") 5244optionalCustomKeyword = _scanner.MakeKeyword(DirectCast(CurrentToken, IdentifierTokenSyntax)) 5249Dim eventKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 5258If CurrentToken.Kind = SyntaxKind.AsKeyword Then 5259asKeyword = DirectCast(CurrentToken, KeywordSyntax) 5275If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 5286If CurrentToken.Kind = SyntaxKind.AsKeyword Then 5287asKeyword = DirectCast(CurrentToken, KeywordSyntax) 5301If CurrentToken.Kind = SyntaxKind.ImplementsKeyword Then 5331Debug.Assert(CurrentToken.Kind = SyntaxKind.EventKeyword, "ParseEventDefinition called on the wrong token.") 5333Dim eventKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 5348If CurrentToken.Kind = SyntaxKind.AsKeyword Then 5349asKeyword = DirectCast(CurrentToken, KeywordSyntax) 5366If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 5372If CurrentToken.Kind = SyntaxKind.AsKeyword Then 5388If CurrentToken.Kind = SyntaxKind.ImplementsKeyword Then 5401Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanGreaterThanToken) 5403Dim token = CurrentToken 5452Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanToken, "ParseAttributeSpecifier called on the wrong token.") 5467Dim assemblyOrModuleKeyword = GetTokenAsAssemblyOrModuleKeyword(CurrentToken) 5486If CurrentToken.Kind = SyntaxKind.ColonToken Then 5528ElseIf CurrentToken.Kind = SyntaxKind.OpenParenToken Then 5562Loop While CurrentToken.Kind = SyntaxKind.LessThanToken 5740If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken AndAlso 5741Not CurrentToken.HasLeadingTrivia Then 5771Debug.Assert(CurrentToken.Kind = SyntaxKind.ColonToken) 5778Debug.Assert(SyntaxFacts.IsTerminator(CurrentToken.Kind) OrElse CurrentToken.Kind = SyntaxKind.EmptyToken) 5780Select Case CurrentToken.Kind 5806Debug.Assert(SyntaxFacts.IsTerminator(CurrentToken.Kind)) 5851If CurrentToken.Kind = kind Then 5852token = DirectCast(CurrentToken, T) 5865If TryTokenAsContextualKeyword(CurrentToken, kind, keyword) Then 5899If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken AndAlso 5921If CurrentToken.Kind = kind Then 5922token = DirectCast(CurrentToken, T) 5924If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken Then 5945If CurrentToken.Kind = kind Then 5946token = DirectCast(CurrentToken, T) 5952token = DirectCast(CurrentToken, T) 6082If Me.CurrentToken.Kind = SyntaxKind.EndOfFileToken Then Return node 6084While (Me.CurrentToken.Kind <> SyntaxKind.EndOfFileToken) 6085b.Add(Me.CurrentToken)
Parser\ParseScan.vb (18)
132If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 206Dim nextToken = CurrentToken 246While CurrentToken.Kind <> SyntaxKind.EndOfFileToken 249If IsValidStatementTerminator(CurrentToken) OrElse CurrentToken.Kind = SyntaxKind.EmptyToken Then 252ElseIf CurrentToken.Kind = SyntaxKind.EndOfXmlToken OrElse CurrentToken.Kind = SyntaxKind.EndOfInterpolatedStringToken Then 256If IsTokenOrKeyword(CurrentToken, resyncTokens) Then 260skippedTokens.Add(CurrentToken) 282While CurrentToken.Kind <> SyntaxKind.EndOfFileToken AndAlso 283CurrentToken.Kind <> SyntaxKind.StatementTerminatorToken 285skippedTokens.Add(CurrentToken) 289If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken Then 290If CurrentToken.HasLeadingTrivia Then 291skippedTokens.Add(CurrentToken) 330If CurrentToken.Kind = SyntaxKind.StatementTerminatorToken AndAlso 400If CurrentToken.IsEndOfLine Then 418Debug.Assert(If(offset = 0, CurrentToken, PeekToken(offset)).IsEndOfLine)
Parser\ParseStatement.vb (138)
25Debug.Assert(CurrentToken.Kind = SyntaxKind.ContinueKeyword, "ParseContinueStatement called on wrong token") 27Dim continueKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 33Select Case (CurrentToken.Kind) 37blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 42blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 47blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 96Debug.Assert(CurrentToken.Kind = SyntaxKind.ExitKeyword, "ParseExitStatement called on wrong token") 98Dim exitKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 105Select Case (CurrentToken.Kind) 109blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 114blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 119blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 124blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 135blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 141blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 147blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 152blockKeyword = DirectCast(CurrentToken, KeywordSyntax) 207Select Case CurrentToken.Kind 220statement = statement.AddLeadingSyntax(SyntaxList.List(exitKeyword, CurrentToken), stmtError) 243Debug.Assert(CurrentToken.Kind = SyntaxKind.CaseKeyword, "ParseCaseStatement called on wrong token.") 245Dim caseKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 251If CurrentToken.Kind = SyntaxKind.ElseKeyword Then 252elseKeyword = DirectCast(CurrentToken, KeywordSyntax) 261Dim StartCase As SyntaxKind = CurrentToken.Kind ' dev10_500588 Snap the start of the expression token AFTER we've moved off the EOL (if one is present) 270If SyntaxFacts.IsRelationalOperator(CurrentToken.Kind) Then 272Dim relationalOperator = DirectCast(CurrentToken, PunctuationSyntax) 373Debug.Assert(CurrentToken.Kind = SyntaxKind.SelectKeyword, "ParseSelectStatement called on wrong token.") 375Dim selectKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 409Debug.Assert(CurrentToken.Kind = SyntaxKind.IfKeyword, "ParseIfConstruct called on wrong token.") 411Dim ifKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 431Debug.Assert(CurrentToken.Kind = SyntaxKind.ElseKeyword, "ParseIfConstruct called on wrong token.") 433Dim elseKeyword = DirectCast(CurrentToken, KeywordSyntax) 443Debug.Assert(CurrentToken.Kind = SyntaxKind.ElseIfKeyword OrElse (CurrentToken.Kind = SyntaxKind.ElseKeyword AndAlso PeekToken(1).Kind = SyntaxKind.IfKeyword), 448If CurrentToken.Kind = SyntaxKind.ElseIfKeyword Then 449elseIfKeyword = DirectCast(CurrentToken, KeywordSyntax) 453ElseIf CurrentToken.Kind = SyntaxKind.ElseKeyword Then 456Dim elseKeyword = DirectCast(CurrentToken, KeywordSyntax) 466Dim ifKeyword = DirectCast(CurrentToken, KeywordSyntax) 488Debug.Assert(CurrentToken.Kind = SyntaxKind.EndIfKeyword OrElse 489CurrentToken.Kind = SyntaxKind.GosubKeyword OrElse 490CurrentToken.Kind = SyntaxKind.WendKeyword, "ParseAnachronisticEndIfStatement called on wrong token") 492Dim keyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 527Debug.Assert(CurrentToken.Kind = SyntaxKind.DoKeyword, "ParseDoStatement called on wrong token") 529Dim doKeyword = DirectCast(CurrentToken, KeywordSyntax) 554Debug.Assert(CurrentToken.Kind = SyntaxKind.LoopKeyword, "ParseDoStatement called on wrong token") 556Dim loopKeyword = DirectCast(CurrentToken, KeywordSyntax) 580Debug.Assert(CurrentToken.Kind = SyntaxKind.ForKeyword, "ParseForStatement called on wrong token") 582Dim forKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 709Debug.Assert(CurrentToken.Kind = SyntaxKind.NextKeyword, "ParseNextStatement called on wrong token") 711Dim nextKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 715If CanFollowStatement(CurrentToken) Then 783Select Case (CurrentToken.Kind) 844If CurrentToken.Kind = SyntaxKind.AsKeyword Then 845[As] = DirectCast(CurrentToken, KeywordSyntax) 871Dim label As SyntaxToken = CurrentToken 919Debug.Assert(CurrentToken.Kind = SyntaxKind.GoToKeyword, "Alleged GOTO isn't.") 921Dim gotoKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 948Debug.Assert(CurrentToken.Kind = SyntaxKind.OnKeyword, "ON statement must start with ON.") 950Dim onKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 955If CurrentToken.Kind = SyntaxKind.ErrorKeyword Then 956errorKeyword = DirectCast(CurrentToken, KeywordSyntax) 964If CurrentToken.Kind = SyntaxKind.ResumeKeyword Then 968ElseIf CurrentToken.Kind = SyntaxKind.GoToKeyword Then 993Debug.Assert(CurrentToken.Kind = SyntaxKind.ResumeKeyword, "ParseOnErrorResumeNext called on wrong token.") 995Dim resumeKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1008Debug.Assert(CurrentToken.Kind = SyntaxKind.GoToKeyword, "ParseOnErrorGoto called on wrong token.") 1010Dim gotoKeyword = DirectCast(CurrentToken, KeywordSyntax) 1055Debug.Assert(CurrentToken.Kind = SyntaxKind.ResumeKeyword, "ParseResumeStatement called on wrong token.") 1057Dim resumeKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1063If Not IsValidStatementTerminator(CurrentToken) Then 1065If CurrentToken.Kind = SyntaxKind.NextKeyword Then 1067Dim nextKeyword = DirectCast(CurrentToken, KeywordSyntax) 1095If SyntaxFacts.IsAssignmentStatementOperatorToken(CurrentToken.Kind) Then 1097Dim operatorToken As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 1126If Not CanEndExecutableStatement(CurrentToken) AndAlso 1127CurrentToken.Kind <> SyntaxKind.BadToken AndAlso 1203Debug.Assert(CurrentToken.Kind = SyntaxKind.CallKeyword, "ParseCallStatement called on wrong token.") 1205Dim callKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1242Debug.Assert(CurrentToken.Kind = SyntaxKind.RaiseEventKeyword, "RaiseEvent statement must start with RaiseEvent.") 1244Dim raiseEventKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1255If CurrentToken.Kind = SyntaxKind.OpenParenToken Then 1270Debug.Assert(CurrentToken.Kind = SyntaxKind.ReDimKeyword, "ParseRedimStatement must start with Redim.") 1271Dim reDimKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1277If CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso 1278TryIdentifierAsContextualKeyword(CurrentToken, possibleKeyword) AndAlso possibleKeyword.Kind = SyntaxKind.PreserveKeyword Then 1328If CurrentToken.Kind = SyntaxKind.AsKeyword Then 1329statement = statement.AddTrailingSyntax(CurrentToken, ERRID.ERR_ObsoleteRedimAs) 1342Debug.Assert(CurrentToken.Kind = SyntaxKind.AddHandlerKeyword OrElse CurrentToken.Kind = SyntaxKind.RemoveHandlerKeyword, "Handler statement parsing confused.") 1344Dim keyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1380Debug.Assert(CurrentToken.Kind = SyntaxKind.WhileKeyword OrElse 1381CurrentToken.Kind = SyntaxKind.WithKeyword OrElse 1382CurrentToken.Kind = SyntaxKind.SyncLockKeyword, "ParseExpressionBlockStatement called on wrong token.") 1384Dim keyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1414Debug.Assert(CurrentToken.Kind = SyntaxKind.LetKeyword OrElse CurrentToken.Kind = SyntaxKind.SetKeyword, "Assignment statement parsing is lost.") 1417If CurrentToken.Kind = SyntaxKind.SetKeyword AndAlso 1425Dim keyword As SyntaxToken = CurrentToken 1438Debug.Assert(CurrentToken.Kind = SyntaxKind.TryKeyword, "ParseTry called on wrong token") 1440Dim tryKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1453Debug.Assert(CurrentToken.Kind = SyntaxKind.CatchKeyword, "ParseCatch called on wrong token.") 1455Dim catchKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1462If CurrentToken.Kind = SyntaxKind.IdentifierToken Then 1502Debug.Assert(CurrentToken.Kind = SyntaxKind.FinallyKeyword, "ParseFinally called on wrong token.") 1504Dim finallyKeyword = DirectCast(CurrentToken, KeywordSyntax) 1513Debug.Assert(CurrentToken.Kind = SyntaxKind.ThrowKeyword, "ParseThrowStatement called on wrong token.") 1515Dim throwKeyword = DirectCast(CurrentToken, KeywordSyntax) 1531Debug.Assert(CurrentToken.Kind = SyntaxKind.ErrorKeyword) 1533Dim errorKeyword = DirectCast(CurrentToken, KeywordSyntax) 1554Debug.Assert(CurrentToken.Kind = SyntaxKind.EraseKeyword, "Erase statement parsing lost.") 1556Dim eraseKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1569Return IsFirstStatementOnLine(CurrentToken) AndAlso PeekToken(1).Kind = SyntaxKind.ColonToken 1573Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken OrElse CurrentToken.Kind = SyntaxKind.IntegerLiteralToken) 1577If labelName.Kind = SyntaxKind.IntegerLiteralToken AndAlso CurrentToken.Kind <> SyntaxKind.ColonToken Then 1610Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso DirectCast(CurrentToken, IdentifierTokenSyntax).PossibleKeywordKind = SyntaxKind.MidKeyword) 1615Dim mid = DirectCast(CurrentToken, IdentifierTokenSyntax) 1618Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken) 1671If Not CanFollowStatement(CurrentToken) Then 1674If CurrentToken.Kind = SyntaxKind.WhileKeyword Then 1675keyword = DirectCast(CurrentToken, KeywordSyntax) 1677TryTokenAsContextualKeyword(CurrentToken, SyntaxKind.UntilKeyword, keyword) 1724Debug.Assert(CurrentToken.Kind = SyntaxKind.ReturnKeyword, "ParseReturnStatement called on wrong token.") 1726Dim returnKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1729Dim startToken = CurrentToken 1755If Not CanFollowStatement(CurrentToken) Then 1775Debug.Assert(CurrentToken.Kind = SyntaxKind.StopKeyword OrElse CurrentToken.Kind = SyntaxKind.EndKeyword, "ParseStopOrEndStatement called on wrong token.") 1777Dim stopOrEndKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1788Debug.Assert(CurrentToken.Kind = SyntaxKind.UsingKeyword, "ParseUsingStatement called on wrong token") 1790Dim usingKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1820Debug.Assert(CurrentToken.Kind = SyntaxKind.IdentifierToken AndAlso 1821DirectCast(CurrentToken, IdentifierTokenSyntax).ContextualKind = SyntaxKind.AwaitKeyword, 1839Debug.Assert(DirectCast(CurrentToken, IdentifierTokenSyntax).ContextualKind = SyntaxKind.YieldKeyword) 1843TryIdentifierAsContextualKeyword(CurrentToken, yieldKeyword) 1858Dim questionToken = DirectCast(CurrentToken, PunctuationSyntax)
Parser\ParseTerminal.vb (23)
37If CurrentToken.Kind = SyntaxKind.IdentifierToken Then 39identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 53If CurrentToken.IsKeyword Then 54Dim keyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 65If (CurrentToken.Kind = SyntaxKind.BadToken AndAlso CurrentToken.Text = "_") Then 66identifier = identifier.AddLeadingSyntax(CurrentToken, ERRID.ERR_ExpectedIdentifier) 84If SyntaxKind.QuestionToken = CurrentToken.Kind AndAlso Not identifier.ContainsDiagnostics Then 85optionalNullable = DirectCast(CurrentToken, PunctuationSyntax) 112If CurrentToken.Kind = SyntaxKind.IdentifierToken Then 113identifier = DirectCast(CurrentToken, IdentifierTokenSyntax) 116ElseIf CurrentToken.IsKeyword() Then 117Dim keyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 162Debug.Assert(CurrentToken.Kind = SyntaxKind.IntegerLiteralToken, "Expected Integer literal.") 164Dim Literal As LiteralExpressionSyntax = SyntaxFactory.NumericLiteralExpression(CurrentToken) 171Debug.Assert(CurrentToken.Kind = SyntaxKind.CharacterLiteralToken, "Expected Char literal.") 173Dim Literal As LiteralExpressionSyntax = SyntaxFactory.CharacterLiteralExpression(CurrentToken) 181Debug.Assert(CurrentToken.Kind = SyntaxKind.DecimalLiteralToken, "must be at a decimal literal.") 183Dim Literal As LiteralExpressionSyntax = SyntaxFactory.NumericLiteralExpression(CurrentToken) 205CurrentToken.Kind = SyntaxKind.FloatingLiteralToken, 208Dim Literal As LiteralExpressionSyntax = SyntaxFactory.NumericLiteralExpression(CurrentToken) 217CurrentToken.Kind = SyntaxKind.DateLiteralToken, 220Dim Literal As LiteralExpressionSyntax = SyntaxFactory.DateLiteralExpression(CurrentToken)
Parser\ParseVerify.vb (1)
166Dim current As SyntaxToken = CurrentToken
Parser\ParseXml.vb (171)
22Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanToken OrElse 23CurrentToken.Kind = SyntaxKind.LessThanGreaterThanToken OrElse 24CurrentToken.Kind = SyntaxKind.LessThanSlashToken OrElse 25CurrentToken.Kind = SyntaxKind.BeginCDataToken OrElse 26CurrentToken.Kind = SyntaxKind.LessThanExclamationMinusMinusToken OrElse 27CurrentToken.Kind = SyntaxKind.LessThanQuestionToken, "ParseXmlMarkup called on the wrong token.") 34If CurrentToken.Kind = SyntaxKind.LessThanQuestionToken Then 49Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanQuestionToken, "ParseXmlDocument called on wrong token") 69Select Case CurrentToken.Kind 103Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanQuestionToken AndAlso 107Dim beginPrologue = DirectCast(CurrentToken, PunctuationSyntax) 127Select Case CurrentToken.Kind 129Dim optionName = DirectCast(CurrentToken, XmlNameTokenSyntax) 221If CurrentToken.Kind <> SyntaxKind.QuestionGreaterThanToken Then 257Debug.Assert(IsToken(CurrentToken, 270Dim hasPrecedingWhitespace = PrevToken.GetTrailingTrivia.ContainsWhitespaceTrivia() OrElse CurrentToken.GetLeadingTrivia.ContainsWhitespaceTrivia 278If CurrentToken.Kind = SyntaxKind.LessThanPercentEqualsToken Then 296Select Case CurrentToken.Kind 324Select Case (CurrentToken.Kind) 327Dim badToken = DirectCast(CurrentToken, BadTokenSyntax) 366Debug.Assert(CurrentToken.Kind = SyntaxKind.BadToken AndAlso 367DirectCast(CurrentToken, BadTokenSyntax).SubKind = SyntaxSubKind.BeginDocTypeToken, "ParseDTD called on wrong token.") 371Dim beginDocType = DirectCast(CurrentToken, BadTokenSyntax) 393If CurrentToken.Kind = SyntaxKind.XmlNameToken Then 395Dim name = DirectCast(CurrentToken, XmlNameTokenSyntax) 419If CurrentToken.Kind <> SyntaxKind.BadToken OrElse DirectCast(CurrentToken, BadTokenSyntax).SubKind <> SyntaxSubKind.OpenBracketToken Then 433If CurrentToken.Kind = SyntaxKind.BadToken AndAlso DirectCast(CurrentToken, BadTokenSyntax).SubKind = SyntaxSubKind.OpenBracketToken Then 437builder.Add(CurrentToken) 441If CurrentToken.Kind = SyntaxKind.BadToken AndAlso DirectCast(CurrentToken, BadTokenSyntax).SubKind = SyntaxSubKind.LessThanExclamationToken Then 442builder.Add(CurrentToken) 447If CurrentToken.Kind <> SyntaxKind.BadToken OrElse DirectCast(CurrentToken, BadTokenSyntax).SubKind <> SyntaxSubKind.CloseBracketToken Then 461builder.Add(CurrentToken) 471Select Case CurrentToken.Kind 473builder.Add(CurrentToken) 474Dim badToken = DirectCast(CurrentToken, BadTokenSyntax) 489builder.Add(CurrentToken) 498builder.Add(CurrentToken) 509Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanToken, "ParseXmlElement call on wrong token.") 511Dim lessThan As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 523Select Case (CurrentToken.Kind) 527greaterThan = DirectCast(CurrentToken, PunctuationSyntax) 534endEmptyElementToken = DirectCast(CurrentToken, PunctuationSyntax) 543Dim divideToken As SyntaxToken = CurrentToken 547greaterThan = DirectCast(CurrentToken, PunctuationSyntax) 575Debug.Assert(IsToken(CurrentToken, 595Select Case CurrentToken.Kind 659textTokens.Add(DirectCast(CurrentToken, XmlTextTokenSyntax)) 662newKind = CurrentToken.Kind 672Dim badToken = DirectCast(CurrentToken, BadTokenSyntax) 789Select Case CurrentToken.Kind 791Dim endEmptyElementToken = DirectCast(CurrentToken, PunctuationSyntax) 800greaterThan = DirectCast(CurrentToken, PunctuationSyntax) 839Dim currentKind = CurrentToken.Kind 844result = SyntaxFactory.XmlText(CurrentToken) 868If CurrentToken.Kind <> SyntaxKind.LessThanSlashToken Then 878If CurrentToken.Kind = SyntaxKind.LessThanToken Then 879Dim lessThan = DirectCast(CurrentToken, PunctuationSyntax) 909If CurrentToken.Kind = SyntaxKind.XmlNameToken Then 929Select Case CurrentToken.Kind 957Debug.Assert(IsToken(CurrentToken, 967If CurrentToken.Kind = SyntaxKind.XmlNameToken OrElse 968(AllowNameAsExpression AndAlso CurrentToken.Kind = SyntaxKind.LessThanPercentEqualsToken) OrElse 969CurrentToken.Kind = SyntaxKind.EqualsToken OrElse 970CurrentToken.Kind = SyntaxKind.SingleQuoteToken OrElse 971CurrentToken.Kind = SyntaxKind.DoubleQuoteToken Then 976If CurrentToken.Kind = SyntaxKind.EqualsToken Then 978Dim equals = DirectCast(CurrentToken, PunctuationSyntax) 983If CurrentToken.Kind = SyntaxKind.LessThanPercentEqualsToken Then 1005If CurrentToken.Kind <> SyntaxKind.SingleQuoteToken AndAlso 1006CurrentToken.Kind <> SyntaxKind.DoubleQuoteToken Then 1062If CurrentToken.Kind = SyntaxKind.SingleQuoteToken Then 1063state = If(CurrentToken.Text = "'"c, ScannerState.SingleQuotedString, ScannerState.SmartSingleQuotedString) 1064startQuote = DirectCast(CurrentToken, PunctuationSyntax) 1065ElseIf CurrentToken.Kind = SyntaxKind.DoubleQuoteToken Then 1066state = If(CurrentToken.Text = """"c, ScannerState.QuotedString, ScannerState.SmartQuotedString) 1067startQuote = DirectCast(CurrentToken, PunctuationSyntax) 1098If SyntaxFacts.IsPredefinedTypeKeyword(Me.CurrentToken.Kind) Then 1099Dim type As PredefinedTypeSyntax = SyntaxFactory.PredefinedType(DirectCast(CurrentToken, KeywordSyntax)) 1120Select Case Me.CurrentToken.Kind 1124Dim endQuote = DirectCast(CurrentToken, PunctuationSyntax) 1132Dim token As SyntaxToken = CurrentToken 1168If CurrentToken.Kind = SyntaxKind.OpenParenToken AndAlso name.Kind <> SyntaxKind.PredefinedType Then 1174If CurrentToken.Kind = SyntaxKind.AsKeyword Then 1175Dim asKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1198Debug.Assert(CurrentToken.Kind = SyntaxKind.OpenParenToken) 1199Dim openParen As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 1206Dim currToken As SyntaxToken = Me.CurrentToken 1231Debug.Assert(CurrentToken.Kind = SyntaxKind.CommaToken) 1232signatureTypes.AddSeparator(CurrentToken) 1237While CurrentToken.Kind = SyntaxKind.ByValKeyword OrElse CurrentToken.Kind = SyntaxKind.ByRefKeyword 1240modifier = DirectCast(CurrentToken, KeywordSyntax) 1243modifier = modifier.AddTrailingSyntax(CurrentToken, ERRID.ERR_InvalidParameterSyntax) 1259Dim operatorKeyword As KeywordSyntax = DirectCast(CurrentToken, KeywordSyntax) 1266If TryTokenAsContextualKeyword(CurrentToken, keyword) Then 1269operatorToken = CurrentToken 1287If CurrentToken.Kind = SyntaxKind.GlobalKeyword Then 1288result = SyntaxFactory.GlobalName(DirectCast(CurrentToken, KeywordSyntax)) 1291ElseIf CurrentToken.Kind = SyntaxKind.ObjectKeyword Then 1298DirectCast(Me.CurrentToken, KeywordSyntax))) 1301ElseIf CurrentToken.Kind = SyntaxKind.OperatorKeyword Then 1305ElseIf CurrentToken.Kind = SyntaxKind.NewKeyword Then 1317Debug.Assert(Not SyntaxFacts.IsPredefinedTypeKeyword(CurrentToken.Kind)) 1332While CurrentToken.Kind = SyntaxKind.DotToken 1333Dim dotToken As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 1336If CurrentToken.Kind = SyntaxKind.OperatorKeyword Then 1385If CurrentToken.Kind = SyntaxKind.SingleQuoteToken Then 1386state = If(CurrentToken.Text = "'"c, ScannerState.SingleQuotedString, ScannerState.SmartSingleQuotedString) 1387startQuote = DirectCast(CurrentToken, PunctuationSyntax) 1388ElseIf CurrentToken.Kind = SyntaxKind.DoubleQuoteToken Then 1389state = If(CurrentToken.Text = """"c, ScannerState.QuotedString, ScannerState.SmartQuotedString) 1390startQuote = DirectCast(CurrentToken, PunctuationSyntax) 1402Dim identToken As SyntaxToken = CurrentToken 1405identToken = Me._scanner.MakeIdentifier(DirectCast(Me.CurrentToken, KeywordSyntax)) 1422Dim closingToken As SyntaxToken = Me.CurrentToken 1424Dim endQuote = DirectCast(CurrentToken, PunctuationSyntax) 1521Select Case (CurrentToken.Kind) 1541(PrevToken.GetTrailingTrivia.ContainsWhitespaceTrivia() OrElse CurrentToken.GetLeadingTrivia.ContainsWhitespaceTrivia) 1543Dim localName = DirectCast(CurrentToken, XmlNameTokenSyntax) 1552If CurrentToken.Kind = SyntaxKind.ColonToken Then 1554Dim colon As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 1558If CurrentToken.Kind = SyntaxKind.XmlNameToken Then 1560localName = DirectCast(CurrentToken, XmlNameTokenSyntax) 1593If Not IsValidXmlQualifiedNameToken(CurrentToken) Then 1597Dim localName = ToXmlNameToken(CurrentToken) 1614Debug.Assert(CurrentToken.FullWidth = 0) 1622Dim colon = DirectCast(CurrentToken, PunctuationSyntax) 1630IsValidXmlQualifiedNameToken(CurrentToken) Then 1632localName = ToXmlNameToken(CurrentToken) 1703If CurrentToken.Kind = SyntaxKind.EndOfXmlToken Then 1706If CurrentToken.Kind = SyntaxKind.DocumentationCommentLineBreakToken Then 1726Debug.Assert(IsToken(CurrentToken, 1747Select Case (CurrentToken.Kind) 1774textTokens.Add(DirectCast(CurrentToken, XmlTextTokenSyntax)) 1777newKind = CurrentToken.Kind 1791Dim badToken = DirectCast(CurrentToken, BadTokenSyntax) 1826Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanQuestionToken, "ParseXmlPI called on the wrong token.") 1828Dim beginProcessingInstruction = DirectCast(CurrentToken, PunctuationSyntax) 1853If CurrentToken.Kind = SyntaxKind.XmlTextLiteralToken OrElse CurrentToken.Kind = SyntaxKind.DocumentationCommentLineBreakToken Then 1854textToken = DirectCast(CurrentToken, XmlTextTokenSyntax) 1865If CurrentToken.Kind <> SyntaxKind.XmlTextLiteralToken AndAlso CurrentToken.Kind <> SyntaxKind.DocumentationCommentLineBreakToken Then 1868textToken = DirectCast(CurrentToken, XmlTextTokenSyntax) 1888Debug.Assert(CurrentToken.Kind = SyntaxKind.BeginCDataToken, "ParseXmlCData called on the wrong token.") 1890Dim beginCData = DirectCast(CurrentToken, PunctuationSyntax) 1896Do While CurrentToken.Kind = SyntaxKind.XmlTextLiteralToken OrElse CurrentToken.Kind = SyntaxKind.DocumentationCommentLineBreakToken 1897values.Add(DirectCast(CurrentToken, XmlTextTokenSyntax)) 1914Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanExclamationMinusMinusToken, "ParseXmlComment called on wrong token.") 1916Dim beginComment As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 1921Do While CurrentToken.Kind = SyntaxKind.XmlTextLiteralToken OrElse CurrentToken.Kind = SyntaxKind.DocumentationCommentLineBreakToken 1922Dim textToken = DirectCast(CurrentToken, XmlTextTokenSyntax) 1947If CurrentToken.Kind = SyntaxKind.SingleQuoteToken Then 1948state = If(CurrentToken.Text = "'"c, ScannerState.SingleQuotedString, ScannerState.SmartSingleQuotedString) 1949startQuote = DirectCast(CurrentToken, PunctuationSyntax) 1951ElseIf CurrentToken.Kind = SyntaxKind.DoubleQuoteToken Then 1952state = If(CurrentToken.Text = """"c, ScannerState.QuotedString, ScannerState.SmartQuotedString) 1953startQuote = DirectCast(CurrentToken, PunctuationSyntax) 1966Dim kind = CurrentToken.Kind 1972Dim endQuote = DirectCast(CurrentToken, PunctuationSyntax) 1985list.Add(DirectCast(CurrentToken, XmlTextTokenSyntax)) 2005Debug.Assert(CurrentToken.Kind = SyntaxKind.LessThanPercentEqualsToken, "ParseXmlEmbedded called on wrong token") 2007Dim beginXmlEmbedded As PunctuationSyntax = DirectCast(CurrentToken, PunctuationSyntax) 2027If CurrentToken.Kind = SyntaxKind.PercentGreaterThanToken Then 2028endXmlEmbedded = DirectCast(CurrentToken, PunctuationSyntax)
Scanner\XmlDocComments.vb (1)
102If nodes.Count = 0 AndAlso parser.CurrentToken.Kind = SyntaxKind.EndOfXmlToken Then
Syntax\SyntaxNodeFactories.vb (1)
159curTk = parser.CurrentToken