Home | History | Annotate | Download | only in m68k

Lines Matching defs:ldl

444   union long_double_long ldl;
446   ldl.ld = a;
447   if (EXPX(ldl) == EXPXMASK
448       && ((ldl.l.middle & MANTXMASK) != 0 || ldl.l.lower != 0))
450   ldl.ld = b;
451   if (EXPX(ldl) == EXPXMASK
452       && ((ldl.l.middle & MANTXMASK) != 0 || ldl.l.lower != 0))
463   register union long_double_long ldl;
469   ldl.l.upper = SIGND (dl);
474       ldl.l.upper |= EXPXMASK << 16;
475       ldl.l.middle = 0;
476       ldl.l.lower = 0;
477       return ldl.ld;
483       ldl.l.upper = EXPXMASK << 16;
484       ldl.l.middle = QUIET_NaN;
485       ldl.l.lower = QUIET_NaN;
486       return ldl.ld;
491       ldl.l.middle = 0;
492       ldl.l.lower = 0;
493       return ldl.ld;
497   ldl.l.upper |= exp << 16;
498   ldl.l.middle = HIDDENX;
499   /* 31-20: # mantissa bits in ldl.l.middle - # mantissa bits in dl.l.upper */
500   ldl.l.middle |= (dl.l.upper & MANTDMASK) << (31 - 20);
502   ldl.l.middle |= dl.l.lower >> (1 + 20);
503   /* 32 - 21: # bits of dl.l.lower in ldl.l.middle */
504   ldl.l.lower = dl.l.lower << (32 - 21);
506   /*printf ("dfxf out: %s\n", dumpxf (ldl.ld));*/
507   return ldl.ld;
516   register union long_double_long ldl;
518   ldl.ld = ld;
521   dl.l.upper = SIGNX (ldl);
524   if ((EXPX(ldl) == EXPXMASK) && (ldl.l.middle | ldl.l.lower) == 0)
532   if (EXPX(ldl) == EXPXMASK && (ldl.l.middle | ldl.l.lower))
539   if ((ldl.l.upper & ~SIGNBIT) == 0 && !ldl.l.middle && !ldl.l.lower)
545   exp = EXPX (ldl) - EXCESSX + EXCESSD;
551   dl.l.upper |= (ldl.l.middle & MANTXMASK) >> (EXPDBITS + 1 - 1);
552   dl.l.lower = (ldl.l.middle & MANTXMASK) << (32 - (EXPDBITS + 1 - 1));
553   dl.l.lower |= ldl.l.lower >> (EXPDBITS + 1 - 1);