1//  shifter test program.
2//  Test instructions   ONES
3# mach: bfin
4
5.include "testutils.inc"
6	start
7
8
9	R7 = 0;
10	ASTAT = R7;
11	R0.L = 0x1;
12	R0.H = 0x0;
13	R7.L = ONES R0;
14	DBGA ( R7.L , 0x0001 );
15	DBGA ( R7.H , 0x0000 );
16	CC = AZ;	R7 = CC; DBGA ( R7.L , 0x0 );
17	CC = AN;	R7 = CC; DBGA ( R7.L , 0x0 );
18	CC = AV0;	R7 = CC; DBGA ( R7.L , 0x0 );
19	CC = AV1;	R7 = CC; DBGA ( R7.L , 0x0 );
20	CC = AC0;	R7 = CC; DBGA ( R7.L , 0x0 );
21
22	R0.L = 0x0000;
23	R0.H = 0x8000;
24	R7.L = ONES R0;
25	DBGA ( R7.L , 0x0001 );
26	DBGA ( R7.H , 0x0000 );
27
28	R0.L = 0x0001;
29	R0.H = 0x8000;
30	R7.L = ONES R0;
31	DBGA ( R7.L , 0x0002 );
32	DBGA ( R7.H , 0x0000 );
33
34	R0.L = 0xffff;
35	R0.H = 0xffff;
36	R7.L = ONES R0;
37	DBGA ( R7.L , 0x0020 );
38	DBGA ( R7.H , 0x0000 );
39
40	R0.L = 0x0000;
41	R0.H = 0x0000;
42	R7.L = ONES R0;
43	DBGA ( R7.L , 0x0000 );
44	DBGA ( R7.H , 0x0000 );
45
46	pass
47