target  : (0,0xF0) CCyI4
status  : emitted
from    : discovery snippet 'cast_I4_CCur' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Long, c As Currency
  c = CCur(a)
End Sub

target disasm lines:
  modProbe.Sub Main | 40144F    F0                    CCyI4
