1# mach: bfin 2 3.include "testutils.inc" 4 start 5 6 7 R0.L = 0.5; 8 R0.H = 0.5; 9 R1.L = 0.5; 10 R1.H = 0.5; 11 12 R2 = R0 +|+ R1, R3 = R0 -|- R1 (S , ASR); 13 _DBGCMPLX R2; 14 _DBGCMPLX R3; 15 16 DBGA ( R2.L , 0.5 ); 17 DBGA ( R2.H , 0.5 ); 18 DBGA ( R3.L , 0 ); 19 DBGA ( R3.H , 0 ); 20 21 R1.L = 0.125; 22 R1.H = 0.125; 23 24 R2 = R0 +|+ R1, R3 = R0 -|- R1 (S , ASR); 25 _DBGCMPLX R2; 26 _DBGCMPLX R3; 27 DBGA ( R2.L , 0.3125 ); 28 DBGA ( R2.H , 0.3125 ); 29 DBGA ( R3.L , 0.1875 ); 30 DBGA ( R3.H , 0.1875 ); 31 32 R0 = R2 +|+ R3, R1 = R2 -|- R3 (S , ASR); 33 _DBGCMPLX R0; 34 _DBGCMPLX R1; 35 DBGA ( R0.L , 0.25 ); 36 DBGA ( R0.H , 0.25 ); 37 DBGA ( R1.L , 0.0625 ); 38 DBGA ( R1.H , 0.0625 ); 39 40 R0 = 1; 41 R0 <<= 15; 42 R1 = R0 << 16; 43 r0=r0 | r1; 44 R1 = R0; 45 46 R2 = R0 +|+ R1, R3 = R0 -|- R1 (S , ASR); 47 48 _DBGCMPLX R2; 49 _DBGCMPLX R3; 50 DBGA ( R0.L , 0x8000 ); 51 DBGA ( R0.H , 0x8000 ); 52 DBGA ( R1.L , 0x8000 ); 53 DBGA ( R1.H , 0x8000 ); 54 55 pass 56