xref _MathIeeeDoubBasBase

 xdef __ieeecmpd
__ieeecmpd:
 movem.l a6/d2-d3,-(sp)
 move.l  _MathIeeeDoubBasBase,a6
 movem.l 16(sp),d0-d1
 movem.l 24(sp),d2-d3
 jsr     -42(a6)
 movem.l (sp)+,a6/d2-d3
 rts