Mercurial > projects > dstress
diff run/a/asm_fdivp_01_A.d @ 715:a35e4f0a9049
partial iasm FPU review
author | thomask |
---|---|
date | Fri, 28 Oct 2005 21:22:25 +0000 |
parents | |
children | 7b2c5a101190 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/run/a/asm_fdivp_01_A.d Fri Oct 28 21:22:25 2005 +0000 @@ -0,0 +1,34 @@ +// $HeadURL: svn://127.0.0.1/run/a/asm_fcos_01.d $ +// $Date: 2005-10-04 11:25:00 +0200 (星期二, 04 十月 2005) $ +// $Author: thomask $ + +// __DSTRESS_DFLAGS__ addon/cpuinfo.d + +module dstress.run.a.asm_fdivp_01_A; +import addon.cpuinfo; + +int main(){ + version(D_InlineAsm){ + haveFPU(); + + double a = 12.0; + double b = -3.0; + + asm{ + fld a; + fldz; + fld b; + fdivp ST(2),ST; + fstp a; + fstp b; + } + + assert(a == 0.0); + assert(b == -4.0); + + return 0; + }else{ + pragma(msg, "no inline asm support"); + static assert(0); + } +} \ No newline at end of file