Ticket #949: tango-ieee-warnings.patch

File tango-ieee-warnings.patch, 0.8 kB (added by afb, 9 months ago)

tango/math/IEEE.d

old	new
570	570	ve[F.EXPPOS_SHORT] = sgn;
571	571	}
572	572	}else { //static if(real.mant_dig==106) // doubledouble
573		assert(0, "Unsupported");
	573	debug assert(0, "Unsupported");
574	574	}
575	575	return value;
576	576	}
…	…
681	681	return y;
682	682	} else static if (real.mant_dig==64) { // 80-bit reals
683	683	alias floatTraits!(real) F;
684		short e = (cast(short *)&x)[F.EXPPOS_SHORT] & F.EXPMASK;
	684	short e = cast(short) (cast(short *)&x)[F.EXPPOS_SHORT] & F.EXPMASK;
685	685	if (e == F.EXPMASK) {
686	686	// BUG: should also set the invalid exception
687	687	ulong s = cast(ulong )&x;