view run/c/cfloat_08_C.d @ 1322:a8cf8aa0da50

fixed malformed @uri@ entries
author thomask
date Sun, 31 Dec 2006 20:00:23 +0000
parents 5511f9277078
children b8c0195059d9
line wrap: on
line source

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

// @author@	Don Clugston <dac@nospam.com.au>
// @date@	2006-03-02
// @uri@	news:du6chp$hub$1@digitaldaemon.com

module dstress.run.c.cfloat_08_C;

union S{
	float f;
	uint i;
}

int main(){
	const cfloat a = 0.0f - 0.0fi;

	S s;

	s.f = a.re;
	if(s.i != 0x00000000){
		assert(0);
	}

	s.f = a.im;
	if(s.i != 0x80000000){
		assert(0);
	}

	return 0;
}