11929Swollman# mach: bfin
250479Speter
31929Swollman.include "testutils.inc"
41929Swollman	start
574816Sru
61929Swollman	R1 = 0;
71929Swollman	R0 = 0;
8	R0 = R1 ^ R0;
9
10//_DBG ASTAT;
11//R7 = ASTAT;
12//DBGA ( R7.L , 1 );
13	cc = az;
14	r7 = cc;
15	dbga( r7.l, 1);
16	cc = an;
17	r7 = cc;
18	dbga( r7.l, 0);
19	cc = av0;
20	r7 = cc;
21	dbga( r7.l, 0);
22	cc = av0s;
23	r7 = cc;
24	dbga( r7.l, 0);
25	cc = av1;
26	r7 = cc;
27	dbga( r7.l, 0);
28	cc = av1s;
29	r7 = cc;
30	dbga( r7.l, 0);
31
32	R0 = R1 | R0;
33//_DBG ASTAT;
34//R7 = ASTAT;
35//DBGA ( R7.L , 1 );
36	cc = az;
37	r7 = cc;
38	dbga( r7.l, 1);
39	cc = an;
40	r7 = cc;
41	dbga( r7.l, 0);
42	cc = av0;
43	r7 = cc;
44	dbga( r7.l, 0);
45	cc = av0s;
46	r7 = cc;
47	dbga( r7.l, 0);
48	cc = av1;
49	r7 = cc;
50	dbga( r7.l, 0);
51	cc = av1s;
52	r7 = cc;
53	dbga( r7.l, 0);
54
55	R0 = 0;
56	R1 = 1;
57	CC = R0 == R1;
58
59//_DBG ASTAT;
60//R7 = ASTAT;
61//DBGA ( R7.L , 2 );
62	cc = az;
63	r7 = cc;
64	dbga( r7.l, 0);
65	cc = an;
66	r7 = cc;
67	dbga( r7.l, 1);
68	cc = av0;
69	r7 = cc;
70	dbga( r7.l, 0);
71	cc = av0s;
72	r7 = cc;
73	dbga( r7.l, 0);
74	cc = av1;
75	r7 = cc;
76	dbga( r7.l, 0);
77	cc = av1s;
78	r7 = cc;
79	dbga( r7.l, 0);
80
81	CC = BITTST ( R1 , 1 );
82
83//_DBG ASTAT;
84//R7 = ASTAT;
85//DBGA ( R7.L , 2 );
86	cc = az;
87	r7 = cc;
88	dbga( r7.l, 0);
89	cc = an;
90	r7 = cc;
91	dbga( r7.l, 1);
92	cc = av0;
93	r7 = cc;
94	dbga( r7.l, 0);
95	cc = av0s;
96	r7 = cc;
97	dbga( r7.l, 0);
98	cc = av1;
99	r7 = cc;
100	dbga( r7.l, 0);
101	cc = av1s;
102	r7 = cc;
103	dbga( r7.l, 0);
104
105	CC = ! BITTST( R1 , 1 );
106//_DBG ASTAT;
107//R7 = ASTAT;
108//DBGA ( R7.L , 0x22 );
109	r7 = cc;
110	dbga( r7.l, 1);
111	cc = az;
112	r7 = cc;
113	dbga( r7.l, 0);
114	cc = an;
115	r7 = cc;
116	dbga( r7.l, 1);
117	cc = av0;
118	r7 = cc;
119	dbga( r7.l, 0);
120	cc = av0s;
121	r7 = cc;
122	dbga( r7.l, 0);
123	cc = av1;
124	r7 = cc;
125	dbga( r7.l, 0);
126	cc = av1s;
127	r7 = cc;
128	dbga( r7.l, 0);
129
130	R0.L = 0;
131	R0.H = 0x8000;
132	R0 >>>= 1;
133	_DBG ASTAT;
134//R7 = ASTAT;
135//DBGA ( R7.L , 0x22 );
136	cc = az;
137	r6 = cc;
138	dbga( r6.l, 0);
139	cc = an;
140	r6 = cc;
141	dbga( r6.l, 1);
142	cc = av0;
143	r6 = cc;
144	dbga( r6.l, 0);
145	cc = av0s;
146	r6 = cc;
147	dbga( r6.l, 0);
148	cc = av1;
149	r6 = cc;
150	dbga( r6.l, 0);
151	cc = av1s;
152	r6 = cc;
153	dbga( r6.l, 0);
154
155	R0.L = 17767;	R0.H = 291;
156	R1.L = 52719;	R1.H = -30293;
157	R2.L = 39612;	R2.H = 22136;
158	R3.L = 4660;	R3.H = -8464;
159	R4.L = 26777;	R4.H = 9029;
160	R5.L = 9029;	R5.H = 30865;
161	R6.L = 21554;	R6.H = -26506;
162	R7.L = 22136;	R7.H = 4660;
163	R0 = R0 + R0;
164	R1 = R0 - R1;
165	R2 = R0 & R2;
166	R3 = R0 | R3;
167	R4 = R0 & R4;
168	R5 = R0 & R5;
169	R6 = R0 | R6;
170	R7 = R0 & R7;
171	DBGA ( R0.l , 35534 );	DBGA( R0.h , 582 );
172	DBGA( R1.l , 48351 );	DBGA ( R1.h , 30874 );
173	DBGA ( R2.l , 35468 );	DBGA ( R2.h , 576 );
174	DBGA ( R3.l , 39678 );	DBGA ( R3.h , 0xdef6);
175	DBGA ( R4.l , 2184 );	DBGA ( R4.h , 580 );
176	DBGA ( R5.l , 580 );	DBGA( R5.h , 0 );
177	DBGA ( R6.l, 57086 );	DBGA ( R6.h , 0x9a76 );
178	DBGA ( R7.l , 584 );	DBGA ( R7.h , 516 );
179	pass
180