sim: bfin: import testsuite
[external/binutils.git] / sim / testsuite / sim / bfin / abs_acc.s
1 // ACP 5.7 ABS(A1) sets AV0
2 # mach: bfin
3
4 .include "testutils.inc"
5         start
6
7         r1=0x80 (z);
8         A0=0;
9         A0.x=r1;
10         A0=abs A0;
11         _DBG astat;
12 //r7=astat;
13 //dbga (r7.h, 0x3);
14 //dbga (r7.l, 0x0);
15         cc = az;
16         r7 = cc;
17         dbga( r7.l, 0);
18         cc = an;
19         r7 = cc;
20         dbga( r7.l, 0);
21         cc = av0;
22         r7 = cc;
23         dbga( r7.l, 1);
24         cc = av0s;
25         r7 = cc;
26         dbga( r7.l, 1);
27         cc = av1;
28         r7 = cc;
29         dbga( r7.l, 0);
30         cc = av1s;
31         r7 = cc;
32         dbga( r7.l, 0);
33
34         r6=A0.x;
35         dbga (r6.l, 0x7f);
36
37         r1=0x80 (z);
38         A1=0;
39         A1.x=r1;
40         A1=abs A1;
41         _DBG astat;
42 //r7=astat;
43 //dbga (r7.h, 0xf);
44 //dbga (r7.l, 0x0);
45         cc = az;
46         r7 = cc;
47         dbga( r7.l, 0);
48         cc = an;
49         r7 = cc;
50         dbga( r7.l, 0);
51         cc = av0;
52         r7 = cc;
53         dbga( r7.l, 1);
54         cc = av0s;
55         r7 = cc;
56         dbga( r7.l, 1);
57         cc = av1;
58         r7 = cc;
59         dbga( r7.l, 1);
60         cc = av1s;
61         r7 = cc;
62         dbga( r7.l, 1);
63
64         r6=A1.x;
65         dbga (r6.l, 0x7f);
66
67         r7=0;
68         astat=r7;
69         r1=0x80 (z);
70         A1=0;
71         A1.x=r1;
72         A0 = abs A1;
73         _DBG astat;
74 //r7=astat;
75 //dbga (r7.h, 0x3);
76 //dbga (r7.l, 0x0);
77         cc = az;
78         r7 = cc;
79         dbga( r7.l, 0);
80         cc = an;
81         r7 = cc;
82         dbga( r7.l, 0);
83         cc = av0;
84         r7 = cc;
85         dbga( r7.l, 1);
86         cc = av0s;
87         r7 = cc;
88         dbga( r7.l, 1);
89         cc = av1;
90         r7 = cc;
91         dbga( r7.l, 0);
92         cc = av1s;
93         r7 = cc;
94         dbga( r7.l, 0);
95
96         r6=A0.x;
97         dbga (r6.l, 0x7f);
98
99         r7=0;
100         astat=r7;
101         r1=0x80 (z);
102         A0=0;
103         A0.x=r1;
104         A1 = abs A0;
105         _DBG astat;
106 //r7=astat;
107 //dbga (r7.h, 0xc);
108 //dbga (r7.l, 0x0);
109         cc = az;
110         r3 = cc;
111         dbga( r3.l, 0);
112         cc = an;
113         r3 = cc;
114         dbga( r3.l, 0);
115         cc = av0;
116         r3 = cc;
117         dbga( r3.l, 0);
118         cc = av0s;
119         r3 = cc;
120         dbga( r3.l, 0);
121         cc = av1;
122         r3 = cc;
123         dbga( r3.l, 1);
124         cc = av1s;
125         r3 = cc;
126         dbga( r3.l, 1);
127
128         r6=A1.x;
129         dbga (r6.l, 0x7f);
130
131         r7=0;
132         astat=r7;
133         r1=0x80 (z);
134         A1=0;
135         A1.x=r1;
136         A0.x=r6;
137         _DBG A1;
138         _DBG A0;
139         A1=abs A1, A0=abs A0;
140         _DBG ASTAT;
141 //r7=astat;
142 //dbga (r7.h, 0xc);
143 //dbga (r7.l, 0x0);
144         cc = az;
145         r4 = cc;
146         dbga( r4.l, 0);
147         cc = an;
148         r4 = cc;
149         dbga( r4.l, 0);
150         cc = av0;
151         r4 = cc;
152         dbga( r4.l, 0);
153         cc = av0s;
154         r4 = cc;
155         dbga( r4.l, 0);
156         cc = av1;
157         r4 = cc;
158         dbga( r4.l, 1);
159         cc = av1s;
160         r4 = cc;
161         dbga( r4.l, 1);
162
163         r7=0;
164         astat=r7;
165         r1=0x80 (z);
166         A1=0;
167         A1.x=r1;
168         A0 = A1;
169         A1=abs A1, A0=abs A0;
170         _DBG ASTAT;
171 //r7=astat;
172 //dbga (r7.h, 0xf);
173 //dbga (r7.l, 0x0);
174         cc = az;
175         r7 = cc;
176         dbga( r7.l, 0);
177         cc = an;
178         r7 = cc;
179         dbga( r7.l, 0);
180         cc = av0;
181         r7 = cc;
182         dbga( r7.l, 1);
183         cc = av0s;
184         r7 = cc;
185         dbga( r7.l, 1);
186         cc = av1;
187         r7 = cc;
188         dbga( r7.l, 1);
189         cc = av1s;
190         r7 = cc;
191         dbga( r7.l, 1);
192
193 // ACP 5.8 ABS sometimes sets AN
194
195         r7=0;
196         astat=r7;
197         r0=1;
198         r1=abs r0;
199         _DBG r0;
200         _DBG r1;
201         _DBG astat;
202 //r7=astat;
203 //dbga (r7.h, 0x0);
204 //dbga (r7.l, 0x0);
205         cc = az;
206         r7 = cc;
207         dbga( r7.l, 0);
208         cc = an;
209         r7 = cc;
210         dbga( r7.l, 0);
211         cc = av0;
212         r7 = cc;
213         dbga( r7.l, 0);
214         cc = av0s;
215         r7 = cc;
216         dbga( r7.l, 0);
217         cc = av1;
218         r7 = cc;
219         dbga( r7.l, 0);
220         cc = av1s;
221         r7 = cc;
222         dbga( r7.l, 0);
223
224         pass;