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;
225