|
992
|
1 // $HeadURL$
|
|
|
2 // $Date$
|
|
|
3 // $Author$
|
|
|
4
|
|
|
5 module dstress.run.a.asm_fsubp_01_B;
|
|
|
6
|
|
|
7 version(D_InlineAsm_X86){
|
|
|
8 version = runTest;
|
|
|
9 }else version(D_InlineAsm_X86_64){
|
|
|
10 version = runTest;
|
|
|
11 }
|
|
|
12
|
|
|
13 version(runTest){
|
|
|
14 import addon.cpuinfo;
|
|
1044
|
15
|
|
992
|
16 int main(){
|
|
|
17 double a = 2.4;
|
|
|
18 double b = -1.2;
|
|
1044
|
19
|
|
992
|
20 asm{
|
|
|
21 fld1;
|
|
|
22 fld a;
|
|
|
23 fldz;
|
|
|
24 fld b;
|
|
|
25 fsubp ST(2), ST;
|
|
|
26 fstp b;
|
|
|
27 fstp a;
|
|
|
28 }
|
|
1044
|
29
|
|
992
|
30 a -= 3.6;
|
|
1044
|
31
|
|
992
|
32 if(a < 0.0){
|
|
|
33 a = -a;
|
|
|
34 }
|
|
1044
|
35
|
|
992
|
36 if(a > a.epsilon * 4.0){
|
|
|
37 assert(0);
|
|
|
38 }
|
|
|
39
|
|
|
40 if(b != 0.0){
|
|
|
41 assert(0);
|
|
|
42 }
|
|
1044
|
43
|
|
992
|
44 return 0;
|
|
|
45 }
|
|
|
46 }else{
|
|
|
47 pragma(msg, "DSTRESS{XFAIL}: no inline ASM support");
|
|
|
48 static assert(0);
|
|
|
49 }
|
