view run/a/asm_fistp_01_B.d @ 700:98e3d2ab382f

added further fpu iasm tests
author thomask
date Tue, 04 Oct 2005 09:25:00 +0000
parents
children a35e4f0a9049
line wrap: on
line source

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

module dstress.run.a.asm_fistp_01_B;

int main(){
	version(D_InlineAsm){
		real r = 800.0L;
		int a, b;
		
		asm{
			fld1;
			fld r;
			fistp a;
			fistp b;
		}
		
		assert(a==800);
		assert(b==1);
		
		return 0;
	}else{
		pragma(msg, "no Inline asm support");
		static assert(0);
	}
}