view run/i/ieee_754_int2flt_C.d @ 1597:8b9d4d2f925a

Fix typos in complex tests. See D bug 614.
author Christian Kamm <kamm incasoftware de>
date Tue, 09 Sep 2008 16:53:58 +0200
parents 9dcac8d4e97f
children
line wrap: on
line source

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

module dstress.run.i.ieee_754_int2flt_C;

int main(){
	size_t border;

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

	for(long i = 0; i < border; i++){
		long test = 1;
		test <<= i;
		double 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;
		double r = test;
		long result = cast(long)r;

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

	return 0;
}