1040
|
1 // $HeadURL$
|
|
2 // $Date$
|
|
3 // $Author$
|
|
4
|
|
5 module dstress.run.a.asm_rcl_01_D;
|
|
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 int main(){
|
|
15 ubyte a = 0b1111_1100;
|
1044
|
16
|
1040
|
17 asm{
|
|
18 clc;
|
|
19 mov CL, 1;
|
|
20 rcl a, CL;
|
|
21 }
|
|
22
|
|
23 if(a != 0b1111_1000){
|
|
24 assert(0);
|
|
25 }
|
|
26
|
|
27 asm{
|
|
28 stc;
|
|
29 mov CL, 1;
|
|
30 rcl a, CL;
|
|
31 }
|
1044
|
32
|
1040
|
33 if(a != 0b1111_0001){
|
|
34 assert(0);
|
|
35 }
|
|
36
|
|
37 return 0;
|
|
38 }
|
|
39 }else{
|
|
40 pragma(msg, "DSTRESS{XFAIL}: no inline ASM support");
|
|
41 static assert(0);
|
|
42 }
|