28_writer = writer

38_writer.WriteLine() 40_writer.WriteLine("Namespace {0}", Ident(_parseTree.NamespaceName) + ".Syntax.InternalSyntax") 41_writer.WriteLine() 55_writer.WriteLine("End Namespace") 85GenerateXmlComment(_writer, nodeStructure, 4, includeRemarks:=False) 88_writer.Write(" ") 90_writer.Write("Partial ") 95_writer.WriteLine("{0} MustInherit Class {1}", visibility, StructureTypeName(nodeStructure)) 97_writer.WriteLine("{0} NotInheritable Class {1}", visibility, StructureTypeName(nodeStructure)) 99_writer.WriteLine("{0} Class {1}", visibility, StructureTypeName(nodeStructure)) 104_writer.WriteLine(" Inherits {0}", StructureTypeName(nodeStructure.ParentStructure)) 106_writer.WriteLine() 162_writer.WriteLine(" End Class") 163_writer.WriteLine() 172_writer.WriteLine(" Friend Overrides Function CreateRed(ByVal parent As SyntaxNode, ByVal startLocation As Integer) As SyntaxNode") 173_writer.WriteLine(" Return new {0}.Syntax.{1}(Me, parent, startLocation)", _parseTree.NamespaceName, StructureTypeName(nodeStructure)) 174_writer.WriteLine(" End Function") 175_writer.WriteLine() 186_writer.WriteLine(" Friend Overrides Function SetDiagnostics(ByVal newErrors As DiagnosticInfo()) As GreenNode") 187_writer.Write(" Return new {0}", StructureTypeName(nodeStructure)) 189_writer.WriteLine(" End Function") 190_writer.WriteLine() 201_writer.WriteLine(" Friend Overrides Function SetAnnotations(ByVal annotations As SyntaxAnnotation()) As GreenNode") 202_writer.Write(" Return new {0}", StructureTypeName(nodeStructure)) 204_writer.WriteLine(" End Function") 205_writer.WriteLine() 216_writer.WriteLine(" Public Overrides Function WithLeadingTrivia(ByVal trivia As GreenNode) As GreenNode") 217_writer.Write(" Return new {0}", StructureTypeName(nodeStructure)) 219_writer.WriteLine(" End Function") 220_writer.WriteLine() 222_writer.WriteLine(" Public Overrides Function WithTrailingTrivia(ByVal trivia As GreenNode) As GreenNode") 223_writer.Write(" Return new {0}", StructureTypeName(nodeStructure)) 225_writer.WriteLine(" End Function") 226_writer.WriteLine() 241_writer.WriteLine(" Friend Overrides Function GetSlot(i as Integer) as GreenNode") 247_writer.WriteLine(" Select case i") 250_writer.WriteLine(" Case {0}", i) 251_writer.WriteLine(" Return Me.{0}", ChildVarName(children(i))) 253_writer.WriteLine(" Case Else") 254_writer.WriteLine(" Debug.Assert(false, ""child index out of range"")") 255_writer.WriteLine(" Return Nothing") 256_writer.WriteLine(" End Select") 258_writer.WriteLine(" If i = 0 Then") 259_writer.WriteLine(" Return Me.{0}", ChildVarName(children(0))) 261_writer.WriteLine(" Else") 262_writer.WriteLine(" Debug.Assert(false, ""child index out of range"")") 263_writer.WriteLine(" Return Nothing") 264_writer.WriteLine(" End If") 267_writer.WriteLine(" End Function") 268_writer.WriteLine() 276_writer.WriteLine() 283_writer.WriteLine(" Friend ReadOnly {0} as {1}", FieldVarName(field), FieldTypeRef(field)) 288_writer.WriteLine(" Friend ReadOnly {0} as {1}", ChildVarName(child), ChildFieldTypeRef(child, True)) 291_writer.WriteLine() 310_writer.Write(" Friend Sub New(") 313_writer.Write("ByVal kind As {0}", NodeKindType()) 315_writer.Write(", ByVal errors as DiagnosticInfo(), ByVal annotations as SyntaxAnnotation()", NodeKindType()) 320_writer.Write(", text as String") 326_writer.Write(", leadingTrivia As GreenNode, trailingTrivia As GreenNode", StructureTypeName(_parseTree.RootStructure)) 330_writer.Write(", ") 335_writer.Write(", ") 340_writer.Write(", context As ISyntaxFactoryContext") 343_writer.WriteLine(")") 346_writer.Write(" MyBase.New(kind", NodeKindType()) 349_writer.Write(", errors, annotations") 354_writer.Write(", text") 358_writer.Write(", leadingTrivia, trailingTrivia") 365_writer.Write(", {0}", ChildParamName(child)) 369_writer.WriteLine(")") 375_writer.WriteLine(" Me.SlotCount = {0}", childrenCount) 382_writer.WriteLine(" Me.SetFactoryContext(context)") 387_writer.WriteLine(" Me.{0} = {1}", FieldVarName(allFields(i)), FieldParamName(allFields(i))) 393_writer.WriteLine() 399_writer.WriteLine(" If {0} IsNot Nothing Then", ChildParamName(child)) 404_writer.WriteLine("{0} AdjustFlagsAndWidth({1})", indent, ChildParamName(child)) 405_writer.WriteLine("{0} Me.{1} = {2}", indent, ChildVarName(child), ChildParamName(child)) 409_writer.WriteLine(" End If", ChildParamName(child)) 414_writer.WriteLine() 419_writer.WriteLine(" SetFlags(NodeFlags.ContainsDirectives)") 423_writer.WriteLine(" SetFlags(NodeFlags.ContainsAttributes)") 427_writer.WriteLine(" End Sub") 428_writer.WriteLine() 434_writer.Write("(Me.Kind") 436_writer.Write(", {0}", errorParam) 437_writer.Write(", {0}", annotationParam) 441_writer.Write(", text") 445_writer.Write(", {0}, {1}", precedingTriviaParam, followingTriviaParam) 448_writer.Write(", Me.Text") 452_writer.Write(", {0}", FieldVarName(field)) 456_writer.Write(", {0}", ChildVarName(child)) 459_writer.WriteLine(")") 464_writer.Write("{0} As {1}", FieldParamName(field, conflictName), FieldTypeRef(field)) 469_writer.Write("{0} As {1}", ChildParamName(child, conflictName), ChildConstructorTypeRef(child, isGreen)) 494GenerateXmlComment(_writer, field, 8) 496_writer.WriteLine(" Friend {2}ReadOnly Property {0} As {1}", FieldPropertyName(field), FieldTypeRef(field), GetModifiers(field.ContainingStructure, isOverride, field.Name)) 497_writer.WriteLine(" Get") 498_writer.WriteLine(" Return Me.{0}", FieldVarName(field)) 499_writer.WriteLine(" End Get") 500_writer.WriteLine(" End Property") 501_writer.WriteLine("") 507GenerateXmlComment(_writer, child, 8) 511_writer.WriteLine(" Friend {2}ReadOnly Property {0} As {1}", ChildPropertyName(child), ChildPropertyTypeRef(node, child, True), GetModifiers(child.ContainingStructure, False, child.Name)) 512_writer.WriteLine(" Get") 514_writer.WriteLine(" Return Me.{0}", ChildVarName(child)) 517_writer.WriteLine(" Return new {0}(New Microsoft.CodeAnalysis.Syntax.InternalSyntax.SyntaxList(of {1})(Me.{2}))", ChildPropertyTypeRef(node, child, True), BaseTypeReference(child), ChildVarName(child)) 520_writer.WriteLine(" Return New Microsoft.CodeAnalysis.Syntax.InternalSyntax.SyntaxList(of GreenNode)(Me.{1})", BaseTypeReference(child), ChildVarName(child)) 523_writer.WriteLine(" Return new {0}(Me.{1})", ChildPropertyTypeRef(node, child, True), ChildVarName(child)) 525_writer.WriteLine(" End Get") 526_writer.WriteLine(" End Property") 527_writer.WriteLine("") 540GenerateWithXmlComment(_writer, withChild, 8) 541_writer.WriteLine(" Friend {2}Function {0}({3} as {4}) As {1}", ChildWithFunctionName(withChild), StructureTypeName(withChild.ContainingStructure), GetModifiers(withChild.ContainingStructure, isOverride, withChild.Name), Ident(UpperFirstCharacter(withChild.Name)), ChildConstructorTypeRef(withChild)) 542_writer.WriteLine(" Ensures(Result(Of {0}) IsNot Nothing)", StructureTypeName(withChild.ContainingStructure)) 543_writer.Write(" return New {0}(", StructureTypeName(nodeStructure)) 545_writer.Write("Kind, Green.Errors") 550_writer.Write(", {0}", FieldParamName(allFields(i))) 556_writer.Write(", {0}", ChildParamName(child)) 558_writer.Write(", {0}", Ident(UpperFirstCharacter(child.Name))) 562_writer.WriteLine(")") 563_writer.WriteLine(" End Function") 566GenerateWithXmlComment(_writer, withChild, 8) 567_writer.WriteLine(" Friend {2} Function {0}({3} as {4}) As {1}", ChildWithFunctionName(withChild), StructureTypeName(withChild.ContainingStructure), "MustOverride", Ident(UpperFirstCharacter(withChild.Name)), ChildConstructorTypeRef(withChild)) 569_writer.WriteLine("") 579_writer.WriteLine(" Public {0} Function Accept(ByVal visitor As {1}) As VisualBasicSyntaxNode", If(IsRoot(nodeStructure), "Overridable", "Overrides"), _parseTree.VisitorName) 580_writer.WriteLine(" Return visitor.{0}(Me)", VisitorMethodName(nodeStructure)) 581_writer.WriteLine(" End Function") 582_writer.WriteLine() 588_writer.WriteLine() 593_writer.WriteLine(" Friend MustInherit Class {0}", Ident(_parseTree.VisitorName)) 596_writer.WriteLine(" Public Overridable Function Visit(ByVal node As {0}) As VisualBasicSyntaxNode", StructureTypeName(_parseTree.RootStructure)) 597_writer.WriteLine(" If node IsNot Nothing") 598_writer.WriteLine(" Return node.Accept(Me)") 599_writer.WriteLine(" Else") 600_writer.WriteLine(" Return Nothing") 601_writer.WriteLine(" End If") 602_writer.WriteLine(" End Function") 610_writer.WriteLine(" End Class") 611_writer.WriteLine() 622_writer.WriteLine(" Public Overridable Function {0}(ByVal node As {1}) As VisualBasicSyntaxNode", 626_writer.WriteLine(" Debug.Assert(node IsNot Nothing)") 629_writer.WriteLine(" Return {0}(node)", VisitorMethodName(nodeStructure.ParentStructure)) 631_writer.WriteLine(" Return node") 633_writer.WriteLine(" End Function") 638_writer.WriteLine(" Friend MustInherit Class {0}", Ident(_parseTree.RewriteVisitorName)) 639_writer.WriteLine(" Inherits {0}", Ident(_parseTree.VisitorName), StructureTypeName(_parseTree.RootStructure)) 640_writer.WriteLine() 646_writer.WriteLine(" End Class") 647_writer.WriteLine() 664_writer.WriteLine(" Public Overrides Function {0}(ByVal node As {1}) As {2}", 674_writer.WriteLine(" Dim anyChanges As Boolean = False") 675_writer.WriteLine() 680_writer.WriteLine(" Dim {0} = VisitList(node.{1})" + Environment.NewLine + 684_writer.WriteLine(" Dim {0} = DirectCast(Visit(node.{2}), {1})" + Environment.NewLine + 688_writer.WriteLine(" Dim {0} = DirectCast(Visit(node.{2}), {1})" + Environment.NewLine + 693_writer.WriteLine() 696_writer.WriteLine(" If anyChanges Then") 698_writer.Write(" Return New {0}(node.Kind", StructureTypeName(nodeStructure)) 700_writer.Write(", node.GetDiagnostics, node.GetAnnotations") 703_writer.Write(", node.{0}", FieldPropertyName(field)) 707_writer.Write(", {0}.Node", ChildNewVarName(child)) 709_writer.Write(", {0}", ChildNewVarName(child)) 711_writer.Write(", {0}", ChildNewVarName(child)) 714_writer.WriteLine(")") 716_writer.WriteLine(" Else") 717_writer.WriteLine(" Return node") 718_writer.WriteLine(" End If") 720_writer.WriteLine(" End Function") 721_writer.WriteLine()