87 references to LiteralBase
Microsoft.CodeAnalysis.VisualBasic (51)
Scanner\Scanner.vb (20)
1701
Dim base As
LiteralBase
=
LiteralBase
.Decimal
1720
base =
LiteralBase
.Hexadecimal
1741
base =
LiteralBase
.Binary
1762
base =
LiteralBase
.Octal
1812
If base =
LiteralBase
.Decimal AndAlso CanGet(here) Then
1878
If base =
LiteralBase
.Decimal Then
1885
If base =
LiteralBase
.Decimal Then
1892
If base =
LiteralBase
.Decimal Then
1899
If base =
LiteralBase
.Decimal Then
1937
If base =
LiteralBase
.Decimal Then
1944
If base =
LiteralBase
.Decimal Then
2000
If base =
LiteralBase
.Decimal Then
2023
Dim Shift As Integer = If(base =
LiteralBase
.Hexadecimal, 4, If(Base =
LiteralBase
.Octal, 3, 1))
2024
Dim OverflowMask As UInt64 = If(base =
LiteralBase
.Hexadecimal, &HF000000000000000UL, If(base =
LiteralBase
.Octal, &HE000000000000000UL, &H8000000000000000UL))
2044
If (base =
LiteralBase
.Decimal AndAlso integralValue > &H7FFFFFFF) OrElse
2056
If (base =
LiteralBase
.Decimal AndAlso integralValue > &H7FFF) OrElse
2131
If base =
LiteralBase
.Binary Then
Scanner\TokenFactories.vb (1)
624
base As
LiteralBase
,
Syntax\InternalSyntax\SyntaxLiterals.vb (7)
52
Friend Sub New(kind As SyntaxKind, text As String, leadingTrivia As GreenNode, trailingTrivia As GreenNode, base As
LiteralBase
, typeSuffix As TypeCharacter, value As T)
57
Friend Sub New(kind As SyntaxKind, errors As DiagnosticInfo(), annotations As SyntaxAnnotation(), text As String, leadingTrivia As GreenNode, trailingTrivia As GreenNode, base As
LiteralBase
, typeSuffix As TypeCharacter, value As T)
120
Friend ReadOnly _base As
LiteralBase
123
Friend Sub New(kind As SyntaxKind, text As String, leadingTrivia As GreenNode, trailingTrivia As GreenNode, base As
LiteralBase
, typeSuffix As TypeCharacter)
129
Friend Sub New(kind As SyntaxKind, errors As DiagnosticInfo(), annotations As SyntaxAnnotation(), text As String, leadingTrivia As GreenNode, trailingTrivia As GreenNode, base As
LiteralBase
, typeSuffix As TypeCharacter)
137
Me._base = CType(reader.ReadByte(),
LiteralBase
)
150
Friend ReadOnly Property Base As
LiteralBase
Syntax\InternalSyntax\SyntaxNodeFactories.vb (3)
19
Friend Shared Function IntegerLiteralToken(text As String, base As
LiteralBase
, typeSuffix As TypeCharacter, value As ULong, leadingTrivia As GreenNode, trailingTrivia As GreenNode) As IntegerLiteralTokenSyntax
43
If base =
LiteralBase
.Decimal Then
142
Return IntegerLiteralToken("",
LiteralBase
.Decimal, TypeCharacter.None, Nothing, Nothing, Nothing)
Syntax\SyntaxFactory.vb (16)
230
Return CType(InternalSyntax.SyntaxFactory.IntegerLiteralToken(text, If(text.StartsWith("&H", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Hexadecimal, If(text.StartsWith("&O", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Octal, If(text.StartsWith("&B", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Binary,
LiteralBase
.Decimal))), If(text.EndsWith("I", StringComparison.OrdinalIgnoreCase), TypeCharacter.IntegerLiteral, TypeCharacter.None), CULng(value),
254
Return CType(InternalSyntax.SyntaxFactory.IntegerLiteralToken(text, If(text.StartsWith("&H", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Hexadecimal, If(text.StartsWith("&O", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Octal, If(text.StartsWith("&B", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Binary,
LiteralBase
.Decimal))), If(text.EndsWith("UI", StringComparison.OrdinalIgnoreCase), TypeCharacter.UIntegerLiteral, TypeCharacter.None), value,
277
Return CType(InternalSyntax.SyntaxFactory.IntegerLiteralToken(text, If(text.StartsWith("&H", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Hexadecimal, If(text.StartsWith("&O", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Octal, If(text.StartsWith("&B", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Binary,
LiteralBase
.Decimal))), If(text.EndsWith("L", StringComparison.OrdinalIgnoreCase), TypeCharacter.LongLiteral, TypeCharacter.None), CULng(value),
300
Return CType(InternalSyntax.SyntaxFactory.IntegerLiteralToken(text, If(text.StartsWith("&H", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Hexadecimal, If(text.StartsWith("&O", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Octal, If(text.StartsWith("&B", StringComparison.OrdinalIgnoreCase),
LiteralBase
.Binary,
LiteralBase
.Decimal))), If(text.EndsWith("UL", StringComparison.OrdinalIgnoreCase), TypeCharacter.ULongLiteral, TypeCharacter.None), value,
Syntax\SyntaxNodeFactories.vb (3)
312
Public Shared Function IntegerLiteralToken(text As String, base As
LiteralBase
, typeSuffix As TypeCharacter, value As ULong) As SyntaxToken
316
Public Shared Function IntegerLiteralToken(leadingTrivia As SyntaxTriviaList, text As String, base As
LiteralBase
, typeSuffix As TypeCharacter, value As ULong, trailingTrivia As SyntaxTriviaList) As SyntaxToken
441
Return IntegerLiteralToken(SyntaxFactory.TriviaList(ElasticMarker), "",
LiteralBase
.Decimal, TypeCharacter.None, Nothing, SyntaxFactory.TriviaList(ElasticMarker))
VisualBasicExtensions.vb (1)
332
Public Function GetBase(token As SyntaxToken) As
LiteralBase
?
Microsoft.CodeAnalysis.VisualBasic.Emit.UnitTests (1)
CodeGen\CodeGenNullable.vb (1)
6796
LiteralBase
.Decimal,
Microsoft.CodeAnalysis.VisualBasic.Syntax.UnitTests (21)
Scanner\ScannerTests.vb (14)
1366
Assert.Equal(
LiteralBase
.Decimal, tk.GetBase())
1372
Assert.Equal(
LiteralBase
.Decimal, tk.GetBase())
1379
Assert.Equal(
LiteralBase
.Decimal, tk.GetBase())
1387
Assert.Equal(
LiteralBase
.Hexadecimal, tk.GetBase())
1394
Assert.Equal(
LiteralBase
.Hexadecimal, tk.GetBase())
1401
Assert.Equal(
LiteralBase
.Hexadecimal, tk.GetBase())
1408
Assert.Equal(
LiteralBase
.Binary, tk.GetBase())
1415
Assert.Equal(
LiteralBase
.Octal, tk.GetBase())
1422
Assert.Equal(
LiteralBase
.Hexadecimal, tk.GetBase())
1429
Assert.Equal(
LiteralBase
.Binary, tk.GetBase())
1436
Assert.Equal(
LiteralBase
.Octal, tk.GetBase())
1443
Assert.Equal(
LiteralBase
.Hexadecimal, tks(1).GetBase())
1450
Assert.Equal(
LiteralBase
.Binary, tk.GetBase())
1457
Assert.Equal(
LiteralBase
.Binary, tk.GetBase())
Syntax\GeneratedTests.vb (2)
21
Return InternalSyntax.SyntaxFactory.IntegerLiteralToken(String.Empty,
LiteralBase
.Decimal, TypeCharacter.IntegerLiteral, 23, GenerateGreenWhitespaceTrivia(), GenerateGreenWhitespaceTrivia())
29
Return SyntaxFactory.IntegerLiteralToken(String.Empty,
LiteralBase
.Decimal, TypeCharacter.None, 42)
Syntax\SyntaxFactsTest.vb (1)
33
Assert.False(SyntaxFactory.IntegerLiteralToken("1",
LiteralBase
.Decimal, TypeCharacter.None, 1).IsKeyword())
Syntax\SyntaxNormalizerTests.vb (2)
530
Dim generatedLeftLiteralToken = SyntaxFactory.IntegerLiteralToken("42",
LiteralBase
.Decimal, TypeCharacter.None, 42)
531
Dim generatedRightLiteralToken = SyntaxFactory.IntegerLiteralToken("23",
LiteralBase
.Decimal, TypeCharacter.None, 23)
TestSyntaxNodes.vb (2)
22
Return SyntaxFactory.NumericLiteralExpression(SyntaxFactory.IntegerLiteralToken(value.ToString(),
LiteralBase
.Decimal, TypeCharacter.None, value))
1131
Return SyntaxFactory.IntegerLiteralToken(token.LeadingTrivia, value.ToString(),
LiteralBase
.Decimal, node.TypeSuffix, value, token.TrailingTrivia())
Microsoft.CodeAnalysis.VisualBasic.Workspaces (14)
CodeCleanup\Providers\ReduceTokensCodeCleanupProvider.vb (5)
276
Private Shared Function GetIntegerLiteralValueString(value As Object, base As
LiteralBase
) As String
278
Case
LiteralBase
.Decimal
280
Case
LiteralBase
.Hexadecimal
282
Case
LiteralBase
.Octal
285
Case
LiteralBase
.Binary
CodeGeneration\EnumMemberGenerator.vb (7)
99
left:=SyntaxFactory.NumericLiteralExpression(SyntaxFactory.IntegerLiteralToken(numericLiteral.Token.Text,
LiteralBase
.Decimal, TypeCharacter.None, 1)),
100
right:=SyntaxFactory.NumericLiteralExpression(SyntaxFactory.IntegerLiteralToken(shiftValue.ToString(),
LiteralBase
.Decimal, TypeCharacter.None, IntegerUtilities.ToUnsigned(shiftValue))))
116
SyntaxFactory.IntegerLiteralToken(firstTwoChars + ushortValue.ToString("X") + lastTwoChars,
LiteralBase
.Hexadecimal, TypeCharacter.UShortLiteral, IntegerUtilities.ToUnsigned(ushortValue)))
121
SyntaxFactory.IntegerLiteralToken(firstTwoChars + shortValue.ToString("X") + numericText.Last(),
LiteralBase
.Hexadecimal, TypeCharacter.ShortLiteral, IntegerUtilities.ToUnsigned(shortValue)))
124
SyntaxFactory.IntegerLiteralToken(firstTwoChars + value.ToString("X"),
LiteralBase
.Hexadecimal, TypeCharacter.None, IntegerUtilities.ToUnsigned(value)))
127
Return SyntaxFactory.NumericLiteralExpression(SyntaxFactory.IntegerLiteralToken(numericText.Substring(0, 2) + Convert.ToString(value, 8),
LiteralBase
.Octal, TypeCharacter.None, IntegerUtilities.ToUnsigned(value)))
129
Return SyntaxFactory.NumericLiteralExpression(SyntaxFactory.IntegerLiteralToken(numericText.Substring(0, 2) + Convert.ToString(value, 2),
LiteralBase
.Binary, TypeCharacter.None, IntegerUtilities.ToUnsigned(value)))
CodeGeneration\ExpressionGenerator.vb (2)
153
SyntaxFactory.IntegerLiteralToken(value.ToString(Nothing, CultureInfo.InvariantCulture),
LiteralBase
.Decimal, TypeCharacter.None, CULng(value))))
209
literal,
LiteralBase
.Decimal, typeSuffix,