Mercurial > projects > dstress
annotate run/a/asm_fdivp_01_A2.d @ 1606:ebff718ff18b
Fix tests from #3. Thanks Don!
author | Christian Kamm <kamm incasoftware de> |
---|---|
date | Mon, 13 Apr 2009 13:47:03 +0200 |
parents | run/a/asm_fdivp_01_A.d@1c8652b3795a |
children | 1bbcc6407d4b |
rev | line source |
---|---|
856 | 1 // $HeadURL$ |
2 // $Date$ | |
3 // $Author$ | |
715 | 4 |
989 | 5 module dstress.run.a.asm_fdivp_01_A; |
715 | 6 |
989 | 7 version(D_InlineAsm_X86){ |
8 version = runTest; | |
9 }else version(D_InlineAsm_X86_64){ | |
10 version = runTest; | |
11 } | |
715 | 12 |
989 | 13 version(runTest){ |
14 import addon.cpuinfo; | |
15 | |
16 int main(){ | |
17 haveFPU!()(); | |
1044 | 18 |
1606
ebff718ff18b
Fix tests from #3. Thanks Don!
Christian Kamm <kamm incasoftware de>
parents:
1329
diff
changeset
|
19 float a = 12.0f; |
ebff718ff18b
Fix tests from #3. Thanks Don!
Christian Kamm <kamm incasoftware de>
parents:
1329
diff
changeset
|
20 float b = -3.0f; |
1044 | 21 |
715 | 22 asm{ |
23 fld a; | |
1044 | 24 fldz; |
715 | 25 fld b; |
26 fdivp ST(2),ST; | |
27 fstp a; | |
28 fstp b; | |
29 } | |
1044 | 30 |
989 | 31 if(a != 0.0f){ |
32 assert(0); | |
33 } | |
34 if(b != -4.0f){ | |
35 assert(0); | |
36 } | |
1044 | 37 |
715 | 38 return 0; |
39 } | |
989 | 40 }else{ |
41 pragma(msg, "DSTRESS{XFAIL}: no inline ASM support"); | |
42 static assert(0); | |
43 } |