xdef    __ieeefltswd
    xref    ___floatsidf
__ieeefltswd:
    move.w  4(a7),d0
    ext.l   d0
    move.l  d0,4(a7)
    jmp     ___floatsidf