Mercurial > projects > dstress
annotate run/a/asm_fdivp_01_A.d @ 856:7b2c5a101190
meta data maintenance
| author | thomask |
|---|---|
| date | Sun, 19 Feb 2006 12:16:35 +0000 |
| parents | a35e4f0a9049 |
| children | a468938b0160 |
| rev | line source |
|---|---|
| 856 | 1 // $HeadURL$ |
| 2 // $Date$ | |
| 3 // $Author$ | |
| 715 | 4 |
| 5 // __DSTRESS_DFLAGS__ addon/cpuinfo.d | |
| 6 | |
| 7 module dstress.run.a.asm_fdivp_01_A; | |
| 8 import addon.cpuinfo; | |
| 9 | |
| 10 int main(){ | |
| 11 version(D_InlineAsm){ | |
| 12 haveFPU(); | |
| 13 | |
| 14 double a = 12.0; | |
| 15 double b = -3.0; | |
| 16 | |
| 17 asm{ | |
| 18 fld a; | |
| 19 fldz; | |
| 20 fld b; | |
| 21 fdivp ST(2),ST; | |
| 22 fstp a; | |
| 23 fstp b; | |
| 24 } | |
| 25 | |
| 26 assert(a == 0.0); | |
| 27 assert(b == -4.0); | |
| 28 | |
| 29 return 0; | |
| 30 }else{ | |
| 31 pragma(msg, "no inline asm support"); | |
| 32 static assert(0); | |
| 33 } | |
| 34 } |