target  : (0,0xF2) CDateR8
status  : emitted
from    : discovery snippet 'imp_R4_to_Date' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Single, c As Date
  c = a
End Sub

target disasm lines:
  modProbe.Sub Main | 40144F    F2                    CDateR8
