target  : (2,0x50) CBoolUI1
status  : emitted
from    : discovery snippet 'cast_UI1_CBool' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Byte, c As Boolean
  c = CBool(a)
End Sub

target disasm lines:
  modProbe.Sub Main | 401450    FC50                  CBoolUI1
