Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim code = "rate = 0.05; print(""rate""); // a rate"
      
      Console.WriteLine("--- uCalc Transformer (Token-Aware & Correct) ---")
      Dim t As New uCalc.Transformer()
      t.Tokens.Add("//.*", TokenType.Whitespace)
      '// Rule targets only the alphanumeric token 'rate'
      t.FromTo("rate", "annual_rate")
      Console.WriteLine(t.Transform(code))
      
      Console.WriteLine("")
      Console.WriteLine("--- Simulated Regex (Character-Aware & Incorrect) ---")
      '// This simulates a simple find-and-replace for the word 'rate'
      '// which incorrectly changes the string literal and comment.
      Dim incorrect_result = "annual_rate = 0.05; print(""annual_rate""); // a annual_rate"
      Console.WriteLine(incorrect_result)
   End Sub
End Module