view run/i/ieee_754_int2flt_B.d @ 1576:b3e16c86558e

[Issue 1398] New: GDC doesn't generate correct code <mariusmuja@gmail.com> 2007-08-04 http://d.puremagic.com/issues/show_bug.cgi?id=1398
author thomask
date Thu, 21 Feb 2008 15:20:08 +0000
parents 9dcac8d4e97f
children
line wrap: on
line source

// $HeadURL$
// $Date$
// $Author$

module dstress.run.i.ieee_754_int2flt_B;

int main(){
	size_t border;

	if((long.sizeof * 8) - 1 < real.dig * 3){
		border = (long.sizeof * 8) - 1;
	}else{
		border = real.dig * 3;
	}

	for(long i = 0; i < border; i++){
		long test = 1;
		test <<= i;
		real r = test;
		long result = cast(long)r;

		if(result != test){
			assert(0);
		}
	}

	for(long i = 0; i < border; i++){
		long test = 1 << i;
		test *= -1;
		real r = test;
		long result = cast(long)r;

		if(result != test){
			assert(0);
		}
	}

	return 0;
}