Mercurial > projects > dstress
annotate run/a/asm_ffree_01_A.d @ 1630:d0efa3ae5522 default tip
run/mini/naked_asm5: New x86_64 ABI passes the arguments in reverse order.
| author | David Nadlinger <code@klickverbot.at> |
|---|---|
| date | Sat, 23 Apr 2011 22:57:32 +0200 |
| parents | 03c97933de98 |
| children |
| rev | line source |
|---|---|
| 990 | 1 // $HeadURL$ |
| 2 // $Date$ | |
| 3 // $Author$ | |
| 1044 | 4 |
| 990 | 5 module dstress.run.a.asm_ffree_01_A; |
| 6 | |
| 7 version(D_InlineAsm_X86){ | |
| 8 version = doTest; | |
| 9 }else version(D_InlineAsm_X86_64){ | |
| 10 version = doTest; | |
| 11 } | |
| 12 | |
| 13 version(doTest){ | |
| 14 import addon.cpuinfo; | |
| 1044 | 15 |
| 990 | 16 int main(){ |
| 17 haveFPU!()(); | |
| 18 | |
| 19 asm{ | |
| 20 finit; | |
| 21 ffree ST(1); | |
| 22 } | |
| 23 | |
| 24 return 0; | |
| 25 } | |
| 26 }else{ | |
| 27 pragma(msg, "DSTRESS{XFAIL}: no inline ASM support"); | |
| 28 static assert(0); | |
| 29 } |