view run/a/asm_addsubpd_01_A.d @ 987:1c9d1337cb77

inline asm review
author thomask
date Sun, 07 May 2006 15:37:44 +0000
parents 4bc1d14d6851
children a468938b0160
line wrap: on
line source

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

module dstress.run.a.asm_addsubpd_01_A;

version(D_InlineAsm_X86){
	version = doTest;
}else version(D_InlineAsm_X86_64){
	version = doTest;
}

int main(){
	version(doTest){
		static double[2] A = [1.0, 30.0];
		static double[2] B = [4.0, 10.0];
		double[2] c;

		asm{
			movupd XMM0, A;
			movupd XMM1, B;
			addsubpd XMM0, XMM1;
			movupd c, XMM0;
		}

		c[0] += 3.0;
		if(c[0] < 0.0){
			c[0] = -c[0];
		}

		if(c[0] > double.epsilon * 16){
			assert(0);
		}

		c[1] -= 40.0;
		if(c[1] < 0.0){
			c[1] = -c[1];
		}

		if(c[1] > double.epsilon * 16){
			assert(0);
		}
		return 0;
	}else{
		pragma(msg, "DSTRESS{XFAIL}: no inline ASM support");
		static assert(0);
	}
}