view run/creal_13.d @ 528:9e0847cf535a

pre DMD-0.123 review Walter <walter@digitalmars.com> 2005-05-11 mail:00a301c5567d$489cbf20$0200a8c0@colossus
author thomask
date Thu, 12 May 2005 11:13:04 +0000
parents f87ba6507260
children 5511f9277078
line wrap: on
line source

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

module dstress.run.creal_13;

int main(){
	creal a;
	creal b;
	byte* X = cast(byte*)(cast(void*)&a);

	b = real.init + ireal.init;
	byte* Y = cast(byte*)(cast(void*)&b);

	for(int i=0; i<a.sizeof; i++){
		assert(X[i]==Y[i]);
	}

	real c;
	real d=a.re;
	X = cast(byte*)(cast(void*)&c);
	Y = cast(byte*)(cast(void*)&d);

	for(int i=0; i<c.sizeof; i++){
		assert(X[i]==Y[i]);
	}

	d=a.im;
	X = cast(byte*)(cast(void*)&c);
	Y = cast(byte*)(cast(void*)&d);
	for(int i=0; i<c.sizeof; i++){
		assert(X[i]==Y[i]);
	}
	
	return 0;
}