140 references to AsClause
Microsoft.CodeAnalysis.VisualBasic (37)
Analysis\FlowAnalysis\DataFlowPass.vb (2)
2026
If declarator.
AsClause
IsNot Nothing AndAlso declarator.
AsClause
.Kind = SyntaxKind.AsNewClause Then
Binding\Binder_Initializers.vb (1)
180
DirectCast(identifier.Parent, VariableDeclaratorSyntax).
AsClause
Is Nothing Then
Binding\Binder_Statements.vb (3)
1002
Dim asClauseOpt = varDecl.
AsClause
2935
Dim asClauseOpt = declaratorSyntax.
AsClause
3534
If variableDeclarator.
AsClause
Is Nothing AndAlso
Binding\BinderFactory.BinderFactoryVisitor.vb (1)
117
If IsNotNothingAndContains(node.Initializer, _position) OrElse IsNotNothingAndContains(TryCast(node.
AsClause
, AsNewClauseSyntax), _position) Then
Binding\BinderFactory.vb (1)
286
Debug.Assert(declarator.Initializer IsNot Nothing OrElse TryCast(declarator.
AsClause
, AsNewClauseSyntax) IsNot Nothing)
Binding\ForOrForEachBlockBinder.vb (1)
65
modifiedIdentifier.Identifier, modifiedIdentifier, declarator.
AsClause
,
Binding\InitializerSemanticModel.vb (2)
53
Dim initSyntax As VisualBasicSyntaxNode = declarator.
AsClause
181
Dim initSyntax As VisualBasicSyntaxNode = declarator.
AsClause
Binding\StatementListBinder.vb (3)
66
Dim asClauseOptSyntax = declarator.
AsClause
68
(declarator.
AsClause
Is Nothing OrElse declarator.
AsClause
.Kind <> SyntaxKind.AsNewClause)
Binding\UsingBlockBinder.vb (3)
50
(variableDeclarator.
AsClause
Is Nothing OrElse variableDeclarator.
AsClause
.Kind <> SyntaxKind.AsNewClause)
61
name.Identifier, name, variableDeclarator.
AsClause
,
Generated\Syntax.xml.Main.Generated.vb (2)
2451
Dim newAsClause = DirectCast(Visit(node.
AsClause
), AsClauseSyntax)
2452
If node.
AsClause
IsNot newAsClause Then anyChanges = True
Generated\Syntax.xml.Syntax.Generated.vb (4)
10255
return Update(names, Me.
AsClause
, Me.Initializer)
10303
return Update(Me.Names, Me.
AsClause
, initializer)
10324
Return Me.
AsClause
10355
If names <> Me.Names OrElse asClause IsNot Me.
AsClause
OrElse initializer IsNot Me.Initializer Then
Lowering\Instrumentation\DebugInfoInjector_SequencePoints.vb (1)
164
Debug.Assert(declarator.
AsClause
.IsKind(SyntaxKind.AsNewClause))
Lowering\LocalRewriter\LocalRewriter_AsNewLocalDeclarations.vb (1)
57
Dim asNew = DirectCast(varDecl.
AsClause
, AsNewClauseSyntax)
Operations\VisualBasicOperationFactory_Methods.vb (2)
424
initializerSyntax = declaratorSyntax.
AsClause
437
Dim initializerSyntax As AsClauseSyntax = DirectCast(asNewDeclarations.Syntax, VariableDeclaratorSyntax).
AsClause
Symbols\Source\SourceMemberFieldSymbol.vb (9)
119
binder.ReportDiagnostic(diagBag, declarator.
AsClause
.Type, ERRID.ERR_ConstAsNonConstant)
129
binder.ReportDiagnostic(diagBag, declarator.
AsClause
.Type, ERRID.ERR_RestrictedType1, restrictedType)
134
Dim errorLocation = SourceSymbolHelpers.GetAsClauseLocation(modifiedIdentifier.Identifier, declarator.
AsClause
)
150
Dim asClauseOpt = declarator.
AsClause
218
If declarator.
AsClause
IsNot Nothing Then
219
Dim typeSyntax = declarator.
AsClause
.Type
227
If declarator.
AsClause
IsNot Nothing Then
228
Dim errorLocation = SourceSymbolHelpers.GetAsClauseLocation(identifier, declarator.
AsClause
)
501
Dim asClauseOpt = declarator.
AsClause
VisualBasicDeclarationComputer.vb (1)
263
initializer = GetAsNewClauseInitializer(variableDeclarator.
AsClause
)
Microsoft.CodeAnalysis.VisualBasic.CodeStyle (11)
CastAnalyzer.vb (1)
153
Dim asClause = TryCast(variableDeclarator.
AsClause
, SimpleAsClauseSyntax)
VariableDeclaratorSyntaxExtensions.vb (8)
13
(variableDeclarator.
AsClause
IsNot Nothing AndAlso
14
TypeOf variableDeclarator.
AsClause
Is AsNewClauseSyntax)
21
ElseIf variableDeclarator.
AsClause
IsNot Nothing AndAlso TypeOf variableDeclarator.
AsClause
Is AsNewClauseSyntax Then
22
Return DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression
30
If TypeOf variableDeclarator.
AsClause
Is AsNewClauseSyntax Then
31
Dim asNewType = DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression.Type()
49
If Not semanticModel.OptionInfer OrElse variableDeclarator.
AsClause
IsNot Nothing Then
VisualBasicSimplifyObjectCreationDiagnosticAnalyzer.vb (1)
44
Dim asClauseType = variableDeclarator.
AsClause
?.Type()
VisualBasicSyntaxFacts.vb (1)
1488
Return TryCast(declarator.
AsClause
, SimpleAsClauseSyntax)?.Type
Microsoft.CodeAnalysis.VisualBasic.CodeStyle.Fixes (13)
IsStatementTerminatingTokenVisitor.vb (2)
70
ElseIf lastDeclarator.
AsClause
IsNot Nothing Then
71
Return TargetTokenMatches(GetExpressionTerminatingToken(lastDeclarator.
AsClause
.Type))
VisualBasicMakeFieldReadonlyCodeFixProvider.vb (1)
29
initializer = TryCast(CType(declaration.Parent, VariableDeclaratorSyntax).
AsClause
, AsNewClauseSyntax)?.NewExpression
VisualBasicSimplifyObjectCreationCodeFixProvider.vb (1)
39
Dim asNewClause = SyntaxFactory.AsNewClause(node.
AsClause
.AsKeyword, DirectCast(node.Initializer.Value, NewExpressionSyntax))
VisualBasicTypeInferenceService.TypeInferrer.vb (9)
604
If variableDeclarator.
AsClause
Is Nothing AndAlso variableDeclarator.IsParentKind(SyntaxKind.UsingStatement) Then
622
If TypeOf variableDeclarator.
AsClause
Is SimpleAsClauseSyntax Then
623
Dim asClause = DirectCast(variableDeclarator.
AsClause
, SimpleAsClauseSyntax)
657
If TypeOf declarator.
AsClause
Is SimpleAsClauseSyntax Then
658
Dim variableTypes = GetTypes(DirectCast(declarator.
AsClause
, SimpleAsClauseSyntax).Type, objectAsDefault:=True)
680
If TypeOf declarator.
AsClause
Is SimpleAsClauseSyntax Then
681
Return GetTypes(DirectCast(declarator.
AsClause
, SimpleAsClauseSyntax).Type, objectAsDefault:=True)
861
If variableDeclarator.
AsClause
IsNot Nothing Then
865
Return GetTypes(variableDeclarator.
AsClause
.Type)
Microsoft.CodeAnalysis.VisualBasic.Emit.UnitTests (5)
CodeGen\CodeGenScriptTests.vb (1)
30
Dim typeSyntax = DirectCast(DirectCast(tree.GetCompilationUnitRoot().Members(0), ClassBlockSyntax).Members(0), FieldDeclarationSyntax).Declarators(0).
AsClause
.Type
Semantics\StaticLocalsSemanticTests.vb (4)
1553
Dim cTypeSymbol = treeModel.GetSemanticInfoSummary(DirectCast(cDecl.Declarators(0).
AsClause
, SimpleAsClauseSyntax).Type).Type
1589
Dim cTypeSymbol = treeModel.GetSemanticInfoSummary(DirectCast(cDecl.Declarators(0).
AsClause
, SimpleAsClauseSyntax).Type).Type
1621
cTypeSymbol = treeModel.GetSemanticInfoSummary(DirectCast(cDecl.Declarators(0).
AsClause
, SimpleAsClauseSyntax).Type).Type
1657
Dim cTypeSymbol = treeModel.GetSemanticInfoSummary(DirectCast(cDecl.Declarators(0).
AsClause
, SimpleAsClauseSyntax).Type).Type
Microsoft.CodeAnalysis.VisualBasic.Features (28)
Completion\KeywordRecommenders\Declarations\InKeywordRecommender.vb (1)
30
Return DirectCast(variableDeclarator.
AsClause
, SimpleAsClauseSyntax)
ConvertForEachToFor\VisualBasicConvertForEachToForCodeRefactoringProvider.vb (1)
160
type = declarator.
AsClause
.Type
EditAndContinue\VisualBasicEditAndContinueAnalyzer.vb (14)
158
body = DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression
185
body = DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression
279
Return variableDeclarator.
AsClause
IsNot Nothing AndAlso variableDeclarator.
AsClause
.IsKind(SyntaxKind.AsNewClause)
363
Return node.DescendantTokens().Concat(DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression.DescendantTokens())
444
Dim asNewClause = DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax)
625
If leftDeclarator.
AsClause
IsNot Nothing AndAlso leftNode.SpanStart >= leftDeclarator.
AsClause
.SpanStart Then
626
Return SyntaxUtilities.FindPartner(leftDeclarator.
AsClause
, rightDeclarator.
AsClause
, leftNode)
1004
AreEquivalentIgnoringLambdaBodies(DirectCast(oldStatement.Parent, VariableDeclaratorSyntax).
AsClause
,
1005
DirectCast(newStatement.Parent, VariableDeclaratorSyntax).
AsClause
)
1071
Return GetInitializerExpression(declarator.Initializer, declarator.
AsClause
) IsNot Nothing OrElse
1086
GetInitializerExpression(declarator.Initializer, declarator.
AsClause
) IsNot Nothing
ExtractMethod\VisualBasicMethodExtractor.PostProcessor.vb (4)
63
Dim symbolInfo = Me._semanticModel.GetSpeculativeSymbolInfo(Me._contextPosition, declarator.
AsClause
.Type, SpeculativeBindingOption.BindAsTypeOrNamespace)
90
SyntaxFactory.VariableDeclarator(SyntaxFactory.SeparatedList(variables)).WithAsClause(firstDeclaration.Declarators(0).
AsClause
))
130
If declarationStatement.Declarators(0).
AsClause
Is Nothing Then
134
Dim symbolInfo = Me._semanticModel.GetSpeculativeSymbolInfo(Me._contextPosition, declarationStatement.Declarators(0).
AsClause
.Type, SpeculativeBindingOption.BindAsTypeOrNamespace)
ExtractMethod\VisualBasicMethodExtractor.VisualBasicCodeGenerator.vb (1)
215
ElseIf TypeOf variableDecl.
AsClause
Is AsNewClauseSyntax Then
IntroduceVariable\VisualBasicIntroduceLocalForExpressionCodeRefactoringProvider.vb (1)
43
localDeclaration.Declarators(0).
AsClause
,
ReplaceConditionalWithStatementsCodeRefactoringProvider\VisualBasicReplaceConditionalWithStatementsCodeRefactoringProvider.vb (1)
62
If declarator.
AsClause
Is Nothing Then
UseAutoProperty\VisualBasicUseAutoPropertyCodeFixProvider.vb (1)
92
Dim asNewClause = TryCast(declarator.
AsClause
, AsNewClauseSyntax)
VisualBasicDeclarationComputer.vb (1)
263
initializer = GetAsNewClauseInitializer(variableDeclarator.
AsClause
)
VisualBasicMakeFieldReadonlyCodeFixProvider.vb (1)
29
initializer = TryCast(CType(declaration.Parent, VariableDeclaratorSyntax).
AsClause
, AsNewClauseSyntax)?.NewExpression
VisualBasicSimplifyObjectCreationCodeFixProvider.vb (1)
39
Dim asNewClause = SyntaxFactory.AsNewClause(node.
AsClause
.AsKeyword, DirectCast(node.Initializer.Value, NewExpressionSyntax))
VisualBasicSimplifyObjectCreationDiagnosticAnalyzer.vb (1)
44
Dim asClauseType = variableDeclarator.
AsClause
?.Type()
Microsoft.CodeAnalysis.VisualBasic.Semantic.UnitTests (4)
Compilation\SemanticModelAPITests.vb (4)
779
Dim typeSyntax = DirectCast(declStatement.Declarators(0).
AsClause
, SimpleAsClauseSyntax).Type
1451
Dim typeSyntax = DirectCast(declStatement.Declarators(0).
AsClause
, SimpleAsClauseSyntax).Type
1864
TestGetSpeculativeSemanticModelForTypeSyntax_Common(model, field.Declarators.First.
AsClause
.Type.Position,
1945
Dim position = field.Declarators.First.
AsClause
.Type.Position
Microsoft.CodeAnalysis.VisualBasic.Syntax.UnitTests (5)
Generated\Syntax.Test.xml.Generated.vb (1)
19251
Dim withObj = objectUnderTest.WithNames(objectUnderTest.Names).WithAsClause(objectUnderTest.
AsClause
).WithInitializer(objectUnderTest.Initializer)
Parser\ParseDirectives.vb (4)
3187
Return CodeAnalysis.Diagnostic.Create(d, varDecl.
AsClause
.GetLocation)
3294
Return CodeAnalysis.Diagnostic.Create(d, varDecl.
AsClause
.GetLocation)
3625
Return CodeAnalysis.Diagnostic.Create(d, varDecl.
AsClause
.GetLocation)
3652
Return CodeAnalysis.Diagnostic.Create(d, varDecl.
AsClause
.GetLocation)
Microsoft.CodeAnalysis.VisualBasic.Workspaces (33)
CastAnalyzer.vb (1)
153
Dim asClause = TryCast(variableDeclarator.
AsClause
, SimpleAsClauseSyntax)
Classification\SyntaxClassification\NameSyntaxClassifier.vb (1)
249
If DirectCast(modifiedIdentifier.Parent, VariableDeclaratorSyntax).
AsClause
Is Nothing AndAlso
CodeGeneration\VisualBasicCodeGenerationService.vb (1)
736
Dim newAsClause = UpdateAsClause(variableDeclaratorSyntax.
AsClause
, newType)
CodeGeneration\VisualBasicSyntaxGenerator.vb (6)
2312
Return fd.Declarators(0).
AsClause
2317
Return ld.Declarators(0).
AsClause
2320
Return DirectCast(declaration, VariableDeclaratorSyntax).
AsClause
2324
Return vd.
AsClause
3719
Return SyntaxFactory.AreEquivalent(vd1.
AsClause
, vd2.
AsClause
) AndAlso SyntaxFactory.AreEquivalent(vd2.Initializer, vd1.Initializer) AndAlso AreSimilarExceptForSubDeclarations(decl1.Parent, decl2.Parent)
IsStatementTerminatingTokenVisitor.vb (2)
70
ElseIf lastDeclarator.
AsClause
IsNot Nothing Then
71
Return TargetTokenMatches(GetExpressionTerminatingToken(lastDeclarator.
AsClause
.Type))
Simplification\Reducers\VisualBasicVariableDeclaratorReducer.vb (4)
59
If variableDeclarator.
AsClause
Is Nothing OrElse
75
Dim simpleAsClause = TryCast(variableDeclarator.
AsClause
, SimpleAsClauseSyntax)
104
replacementNode = SyntaxFactory.VariableDeclarator(SyntaxFactory.SingletonSeparatedList(newModifiedIdentifier.WithTrailingTrivia(variableDeclarator.
AsClause
.GetTrailingTrivia())),
134
replacementNode = newIdentifierName.WithTrailingTrivia(variableDeclarator.
AsClause
.GetTrailingTrivia()) ' Trailing Trivia is copied here
VariableDeclaratorSyntaxExtensions.vb (8)
13
(variableDeclarator.
AsClause
IsNot Nothing AndAlso
14
TypeOf variableDeclarator.
AsClause
Is AsNewClauseSyntax)
21
ElseIf variableDeclarator.
AsClause
IsNot Nothing AndAlso TypeOf variableDeclarator.
AsClause
Is AsNewClauseSyntax Then
22
Return DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression
30
If TypeOf variableDeclarator.
AsClause
Is AsNewClauseSyntax Then
31
Dim asNewType = DirectCast(variableDeclarator.
AsClause
, AsNewClauseSyntax).NewExpression.Type()
49
If Not semanticModel.OptionInfer OrElse variableDeclarator.
AsClause
IsNot Nothing Then
VisualBasicSyntaxFacts.vb (1)
1488
Return TryCast(declarator.
AsClause
, SimpleAsClauseSyntax)?.Type
VisualBasicTypeInferenceService.TypeInferrer.vb (9)
604
If variableDeclarator.
AsClause
Is Nothing AndAlso variableDeclarator.IsParentKind(SyntaxKind.UsingStatement) Then
622
If TypeOf variableDeclarator.
AsClause
Is SimpleAsClauseSyntax Then
623
Dim asClause = DirectCast(variableDeclarator.
AsClause
, SimpleAsClauseSyntax)
657
If TypeOf declarator.
AsClause
Is SimpleAsClauseSyntax Then
658
Dim variableTypes = GetTypes(DirectCast(declarator.
AsClause
, SimpleAsClauseSyntax).Type, objectAsDefault:=True)
680
If TypeOf declarator.
AsClause
Is SimpleAsClauseSyntax Then
681
Return GetTypes(DirectCast(declarator.
AsClause
, SimpleAsClauseSyntax).Type, objectAsDefault:=True)
861
If variableDeclarator.
AsClause
IsNot Nothing Then
865
Return GetTypes(variableDeclarator.
AsClause
.Type)
Microsoft.VisualStudio.LanguageServices.VisualBasic (4)
CodeModel\SyntaxExtensions.vb (2)
98
Return If(variableDeclarator.
AsClause
IsNot Nothing,
99
variableDeclarator.
AsClause
.Type(),
CodeModel\VisualBasicCodeModelService.vb (2)
3403
If variableDeclarator.
AsClause
IsNot Nothing Then
3404
Dim oldType = variableDeclarator.
AsClause
.Type()