@@ -314,10 +314,10 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
314
314
LOCAL i AS LONG
315
315
//
316
316
nextSibling := node :NextSibling
317
- WHILE (((nextSibling IS WhitespaceNode) .OR. (nextSibling IS NewLineNode)))
318
- //
319
- nextSibling := nextSibling :NextSibling
320
- ENDDO
317
+ // WHILE (((nextSibling IS WhitespaceNode) .OR. (nextSibling IS NewLineNode)))
318
+ // //
319
+ // nextSibling := nextSibling:NextSibling
320
+ // ENDDO
321
321
IF (((node IS UsingDeclaration) .OR. (node IS UsingAliasDeclaration)) .AND. (! (nextSibling IS UsingDeclaration) .AND. ! (nextSibling IS UsingAliasDeclaration)))
322
322
//
323
323
i := 0
@@ -1337,7 +1337,8 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
1337
1337
SELF :StartNode (foreachStatement)
1338
1338
SELF :WriteKeyword ("FOREACH" )
1339
1339
SELF :Space ()
1340
- SELF :WriteIdentifier (foreachStatement :VariableNameToken )
1340
+ //SELF:WriteIdentifier(foreachStatement:VariableNameToken)
1341
+ foreachStatement :VariableDesignation :AcceptVisitor (SELF )
1341
1342
SELF :Space ()
1342
1343
SELF :WriteKeyword ("AS" )
1343
1344
SELF :Space ()
@@ -1407,7 +1408,7 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
1407
1408
ENDIF
1408
1409
//SELF:WriteToken(Roles.LChevron)
1409
1410
SELF :WriteCommaSeparatedList (;
1410
- functionPointerType :Parameters :Concat< AstNode> (NEW[] { functionPointerType. ReturnType }))
1411
+ functionPointerType :Parameters :Concat< AstNode> (< AstNode > { functionPointerType : ReturnType }))
1411
1412
//SELF:WriteToken(Roles.RChevron)
1412
1413
SELF :EndNode (functionPointerType)
1413
1414
@@ -1554,7 +1555,7 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
1554
1555
VIRTUAL METHOD VisitInterpolatedStringText (interpolatedStringText AS InterpolatedStringText) AS VOID
1555
1556
//
1556
1557
SELF :StartNode (interpolatedStringText)
1557
- SELF :writer :WritePrimitiveValue("" , TextWriterTokenWriter.ConvertString (interpolatedStringText :Text ))
1558
+ SELF :writer :WritePrimitiveValue(TextWriterTokenWriter.ConvertString (interpolatedStringText :Text ))
1558
1559
SELF :EndNode (interpolatedStringText)
1559
1560
1560
1561
VIRTUAL METHOD VisitInterpolation (interpolation AS Interpolation) AS VOID
@@ -1565,7 +1566,7 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
1565
1566
IF (interpolation :Suffix != NULL)
1566
1567
//
1567
1568
SELF :writer :WriteToken(NULL, ":" )
1568
- SELF :writer :WritePrimitiveValue("" , interpolation :Suffix )
1569
+ SELF :writer :WritePrimitiveValue( interpolation :Suffix )
1569
1570
ENDIF
1570
1571
SELF :writer :WriteToken(Interpolation.RBrace, "}" )
1571
1572
SELF :EndNode (interpolation)
@@ -1654,17 +1655,18 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
1654
1655
1655
1656
VIRTUAL METHOD VisitLocalFunctionDeclarationStatement (localFunctionDeclarationStatement AS LocalFunctionDeclarationStatement ) AS VOID
1656
1657
SELF :StartNode (localFunctionDeclarationStatement)
1657
- SELF :WriteModifiers (localFunctionDeclarationStatement :ModifierTokens )
1658
- localFunctionDeclarationStatement :ReturnType :AcceptVisitor (SELF )
1659
- SELF :Space ()
1660
- SELF :WriteIdentifier (localFunctionDeclarationStatement :NameToken )
1661
- SELF :WriteTypeParameters (localFunctionDeclarationStatement :TypeParameters )
1662
- SELF :Space (SELF :policy :SpaceBeforeMethodDeclarationParentheses )
1663
- SELF :WriteCommaSeparatedListInParenthesis (localFunctionDeclarationStatement :Parameters , SELF :policy :SpaceWithinMethodDeclarationParentheses )
1664
- FOREACH constraint AS Constraint IN localFunctionDeclarationStatement :Constraints
1665
- constraint :AcceptVisitor(SELF )
1666
- NEXT
1667
- SELF :WriteMethodBody (localFunctionDeclarationStatement :Body , SELF :policy :MethodBraceStyle )
1658
+ // SELF:WriteModifiers(localFunctionDeclarationStatement:ModifierTokens)
1659
+ // localFunctionDeclarationStatement:ReturnType:AcceptVisitor(SELF)
1660
+ // SELF:Space()
1661
+ // SELF:WriteIdentifier(localFunctionDeclarationStatement:NameToken)
1662
+ // SELF:WriteTypeParameters(localFunctionDeclarationStatement:TypeParameters)
1663
+ // SELF:Space(SELF:policy:SpaceBeforeMethodDeclarationParentheses)
1664
+ // SELF:WriteCommaSeparatedListInParenthesis(localFunctionDeclarationStatement:Parameters, SELF:policy:SpaceWithinMethodDeclarationParentheses)
1665
+ // FOREACH constraint AS Constraint IN localFunctionDeclarationStatement:Constraints
1666
+ // constraint:AcceptVisitor(SELF)
1667
+ // NEXT
1668
+ // SELF:WriteMethodBody(localFunctionDeclarationStatement:Body, SELF:policy:MethodBraceStyle)
1669
+ localFunctionDeclarationStatement :Declaration :AcceptVisitor (SELF )
1668
1670
SELF :EndNode (localFunctionDeclarationStatement)
1669
1671
1670
1672
@@ -1860,7 +1862,7 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
1860
1862
VIRTUAL METHOD VisitNullReferenceExpression (nullReferenceExpression AS NullReferenceExpression) AS VOID
1861
1863
//
1862
1864
SELF :StartNode (nullReferenceExpression)
1863
- SELF :writer :WritePrimitiveValue(NULL, NULL )
1865
+ SELF :writer :WritePrimitiveValue(NULL)
1864
1866
SELF :isAfterSpace := FALSE
1865
1867
SELF :EndNode (nullReferenceExpression)
1866
1868
@@ -2014,6 +2016,8 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
2014
2016
SELF :Space (SELF :policy :SpacesWithinParentheses )
2015
2017
SELF :RPar ()
2016
2018
SELF :EndNode (parenthesizedExpression)
2019
+
2020
+ VIRTUAL METHOD VisitParenthesizedVariableDesignation ( parenthesizedVariableDesignation AS ParenthesizedVariableDesignation ) AS VOID
2017
2021
2018
2022
VIRTUAL METHOD VisitPatternPlaceholder (placeholder AS AstNode, pattern AS Pattern) AS VOID
2019
2023
//
@@ -2039,12 +2043,13 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
2039
2043
VIRTUAL METHOD VisitPrimitiveExpression (primitiveExpression AS PrimitiveExpression) AS VOID
2040
2044
//
2041
2045
SELF :StartNode (primitiveExpression)
2042
- SELF :writer :WritePrimitiveValue(primitiveExpression :Value , primitiveExpression :UnsafeLiteralValue )
2043
- // Store Parameters Name
2044
- IF ( SELF :inMethodAttributes == ClipperState.Attribute) .AND. SELF :isClipper
2045
- SELF :paramsList :Add( primitiveExpression :Value :ToString () )
2046
- ENDIF
2047
- //
2046
+ // SELF:writer:WritePrimitiveValue(primitiveExpression:Value, primitiveExpression:UnsafeLiteralValue)
2047
+ // // Store Parameters Name
2048
+ // IF ( SELF:inMethodAttributes == ClipperState.Attribute) .AND. SELF:isClipper
2049
+ // SELF:paramsList:Add( primitiveExpression:Value:ToString() )
2050
+ // ENDIF
2051
+ // //
2052
+ SELF :writer :WritePrimitiveValue(primitiveExpression :Value , primitiveExpression :Format )
2048
2053
SELF :isAfterSpace := FALSE
2049
2054
SELF :EndNode (primitiveExpression)
2050
2055
@@ -2347,6 +2352,8 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
2347
2352
ENDIF
2348
2353
SELF :WriteTypeArguments (simpleType :TypeArguments )
2349
2354
SELF :EndNode (simpleType)
2355
+
2356
+ VIRTUAL METHOD VisitSingleVariableDesignation ( singleVariableDesignation AS SingleVariableDesignation ) AS VOID
2350
2357
2351
2358
VIRTUAL METHOD VisitSizeOfExpression (sizeOfExpression AS SizeOfExpression) AS VOID
2352
2359
//
@@ -2374,7 +2381,7 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
2374
2381
switchExpression :Expression :AcceptVisitor (SELF )
2375
2382
SELF :Space ()
2376
2383
SELF :WriteKeyword (SwitchExpression.SwitchKeywordRole)
2377
- FOREACH node AS AstNode IN switchExpression. SwitchSections
2384
+ FOREACH node AS AstNode IN switchExpression : SwitchSections
2378
2385
node.AcceptVisitor (SELF )
2379
2386
SELF :Comma (node)
2380
2387
SELF :NewLine ()
@@ -2387,7 +2394,7 @@ BEGIN NAMESPACE ILSpy.XSharpLanguage
2387
2394
SELF :Space ()
2388
2395
SELF :WriteToken (Roles.Arrow)
2389
2396
SELF :Space ()
2390
- switchExpressionSection. Body :AcceptVisitor(SELF )
2397
+ switchExpressionSection : Body :AcceptVisitor (SELF )
2391
2398
SELF :EndNode (switchExpressionSection)
2392
2399
2393
2400
VIRTUAL METHOD VisitSwitchSection (switchSection AS SwitchSection) AS VOID
0 commit comments