トークン読み込み用クラス (C#用)

これまでC# で作成してきた「SourceToHTML」を、VB.NET に焼きなおしてみます。

TokenReaderCSharp.vb


'*******************************************************************************************************
' トークンごとに 文字列と その種類を返す ( C#用 )
'*******************************************************************************************************
Public Class TokenReaderCSharp
Inherits TokenReaderCase
'---------------------------------------------------------------------------------------------------
' 初期化
'---------------------------------------------------------------------------------------------------
Friend Sub New(ByVal aReader As Reader, ByVal langType As String)
MyBase.New(aReader, langType)
End Sub
'---------------------------------------------------------------------------------------------------
' 終了
'---------------------------------------------------------------------------------------------------
Protected Overrides Sub Finalize()
End Sub
'---------------------------------------------------------------------------------------------------
' 逐語的文字列か?
'---------------------------------------------------------------------------------------------------
Protected Overrides Function IsLiteral() As Boolean
Return ((_context.currChar = "@"c) AndAlso (_context.nextChar = """"c))
End Function
'---------------------------------------------------------------------------------------------------
' 状態を更新 (逐語的文字列)
'---------------------------------------------------------------------------------------------------
Protected Overrides Sub getNextStateStrLit()
MyBase.getNextStateStrLit()

If (_context.currToken.tokenString.Length > 1) Then
If (_context.currChar = """"c) Then
_context.State = "その他"
End If
End If
End Sub
End Class