aboutsummaryrefslogtreecommitdiff
path: root/sim/testsuite/bfin/dsp_s1.s
blob: 70d8a5d5e9f8259b0bcc1ec76884c8aad8d52841 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
/*  SHIFT test program.
 *  Test r0, r1, A0 >>= BITMUX;
 */
# mach: bfin

.include "testutils.inc"
	start

	init_r_regs 0;
	ASTAT = r0;

// load r0=0x80000009
// load r1=0x10000009
// load r2=0x0000000f
// load r3=0x00000000
// load r4=0x80000008
// load r5=0x00000000
	loadsym P0, data0;
	loadsym P1, data0;
	R0 = [ P0 ++ ];
	R1 = [ P0 ++ ];
	R2 = [ P0 ++ ];
	R3 = [ P0 ++ ];
	R4 = [ P0 ++ ];
	R5 = [ P0 ++ ];

// insert two bits, both equal to 1
// A0: 00 0000 000f -> c0 0000 0003
// r0:    8000 0009 ->    4000 0004
// r1:    1000 0009 ->    0800 0004
	R0 = [ P1 + 0 ];
	R1 = [ P1 + 4 ];
	A0.w = R2;
	A0.x = R3.L;
	BITMUX( R0 , R1, A0) (ASR);
	R6 = A0.w;
	R7.L = A0.x;
	DBGA ( R6.L , 0x0003 );
	DBGA ( R6.H , 0x0000 );
	DBGA ( R7.L , 0xffc0 );
	DBGA ( R0.L , 0x0004 );
	DBGA ( R0.H , 0x4000 );
	DBGA ( R1.L , 0x0004 );
	DBGA ( R1.H , 0x0800 );

// insert two bits, one equal to 1, other to 0
// A0: 00 0000 000f -> 40 0000 0003
// r0:    8000 0009 ->    4000 0004
// r4:    8000 0008 ->    4000 0004
	R0 = [ P1 + 0 ];
	R4 = [ P1 + 16 ];
	A0.w = R2;
	A0.x = R3.L;
	BITMUX( R0 , R4, A0) (ASR);
	R6 = A0.w;
	R7.L = A0.x;
	DBGA ( R6.L , 0x0003 );
	DBGA ( R6.H , 0x0000 );
	DBGA ( R7.L , 0x0040 );
	DBGA ( R0.L , 0x0004 );
	DBGA ( R0.H , 0x4000 );
	DBGA ( R4.L , 0x0004 );
	DBGA ( R4.H , 0x4000 );

	pass

	.data
data0:
	.dw 0x0009
	.dw 0x8000

	.dw 0x0009
	.dw 0x1000

	.dw 0x000f
	.dw 0x0000

	.dw 0x0000
	.dw 0x0000

	.dw 0x0008
	.dw 0x8000

	.dw 0x0000
	.dw 0x0000