target  : (2,0x10) CUI1R4
status  : emitted
from    : discovery snippet 'cast_R8_CByte' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Double, c As Byte
  c = CByte(a)
End Sub

target disasm lines:
  modProbe.Sub Main | 40144F    FC10                  CUI1R4
