ncx.c#2368	struct vax_double *const vdp =


#2387				*vdp = lim->d;


#2394		vdp->exp = exp - IEEE_DBL_BIAS + VAX_DBL_BIAS;


#2401		vdp->mantissa1 = (mant_hi >> 13);


#2402		vdp->mantissa2 = ((mant_hi & MASK(13)) << 3)


#2404		vdp->mantissa3 = (mant_lo >> 13);


#2405		vdp->mantissa4 = (mant_lo << 3);


#2408		vdp->sign = idp->sign;


#2416	const struct vax_double *const vdp =


#2421	if ((vdp->mantissa4 > (dbl_limits[0].d.mantissa4 - 3)) &&


#2422		(vdp->mantissa3 == dbl_limits[0].d.mantissa3) &&


#2423		(vdp->mantissa2 == dbl_limits[0].d.mantissa2) &&


#2424		(vdp->mantissa1 == dbl_limits[0].d.mantissa1) &&


#2425		(vdp->exp == dbl_limits[0].d.exp))


#2430	if ((vdp->mantissa4 == dbl_limits[1].d.mantissa4) &&


#2431		(vdp->mantissa3 == dbl_limits[1].d.mantissa3) &&


#2432		(vdp->mantissa2 == dbl_limits[1].d.mantissa2) &&


#2433		(vdp->mantissa1 == dbl_limits[1].d.mantissa1) &&


#2434		(vdp->exp == dbl_limits[1].d.exp))


#2441		unsigned exp = vdp->exp - VAX_DBL_BIAS + IEEE_DBL_BIAS;


#2443		unsigned mant_lo = ((vdp->mantissa2 & MASK(3)) << 29) |


#2444			(vdp->mantissa3 << 13) |


#2445			((vdp->mantissa4 >> 3) & MASK(13));


#2447		unsigned mant_hi = (vdp->mantissa1 << 13)


#2448				 | (vdp->mantissa2 >> 3);


#2450		if((vdp->mantissa4 & 7) > 4)


#2474		idp->sign = vdp->sign;


#13069	struct vax_double *const vdp =


#13088				*vdp = lim->d;


#13095		vdp->exp = exp - IEEE_DBL_BIAS + VAX_DBL_BIAS;


#13102		vdp->mantissa1 = (mant_hi >> 13);


#13103		vdp->mantissa2 = ((mant_hi & MASK(13)) << 3)


#13105		vdp->mantissa3 = (mant_lo >> 13);


#13106		vdp->mantissa4 = (mant_lo << 3);


#13109		vdp->sign = idp->sign;


#13742	const struct vax_double *const vdp =


#13747	if ((vdp->mantissa4 > (dbl_limits[0].d.mantissa4 - 3)) &&


#13748		(vdp->mantissa3 == dbl_limits[0].d.mantissa3) &&


#13749		(vdp->mantissa2 == dbl_limits[0].d.mantissa2) &&


#13750		(vdp->mantissa1 == dbl_limits[0].d.mantissa1) &&


#13751		(vdp->exp == dbl_limits[0].d.exp))


#13756	if ((vdp->mantissa4 == dbl_limits[1].d.mantissa4) &&


#13757		(vdp->mantissa3 == dbl_limits[1].d.mantissa3) &&


#13758		(vdp->mantissa2 == dbl_limits[1].d.mantissa2) &&


#13759		(vdp->mantissa1 == dbl_limits[1].d.mantissa1) &&


#13760		(vdp->exp == dbl_limits[1].d.exp))


#13767		unsigned exp = vdp->exp - VAX_DBL_BIAS + IEEE_DBL_BIAS;


#13769		unsigned mant_lo = ((vdp->mantissa2 & MASK(3)) << 29) |


#13770			(vdp->mantissa3 << 13) |


#13771			((vdp->mantissa4 >> 3) & MASK(13));


#13773		unsigned mant_hi = (vdp->mantissa1 << 13)


#13774				 | (vdp->mantissa2 >> 3);


#13776		if((vdp->mantissa4 & 7) > 4)


#13800		idp->sign = vdp->sign;




HyperKWIC - Version 7.20DA executed at 11:37 on 27 Oct 2017  | Polyhedron Solutions - INTERNAL USE | COMMERCIAL  (Any O/S) SN 4AKIed