view run/i/ieee_754_int2flt_F.d @ 1630:d0efa3ae5522 default tip

run/mini/naked_asm5: New x86_64 ABI passes the arguments in reverse order.
author David Nadlinger <code@klickverbot.at>
date Sat, 23 Apr 2011 22:57:32 +0200
parents 9dcac8d4e97f
children
line wrap: on
line source

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

module dstress.run.i.ieee_754_int2flt_F;

int main(){
	size_t border;

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

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

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

	return 0;
}