URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [binutils-2.20.1/] [gas/] [testsuite/] [gas/] [bfin/] [bit2.s] - Blame information for rev 219

Go to most recent revision | Details | Compare with Previous | View Log

Line No.	Rev	Author	Line
1	205	julius
2			`.EXTERN MY_LABEL2;`
3			`.section .text;`
4
5			`//`
6			`//8 BIT OPERATIONS`
7			`//`
8
9			`//BITCLR ( Dreg , uimm5 ) ; /* (a) */`
10			`BITCLR ( R7 , 0 ) ;`
11			`BITCLR ( R7 , 31 ) ;`
12			`BITCLR ( R7 , 15 ) ;`
13			`BITCLR ( R1 , 0 ) ;`
14			`BITCLR ( R2 , 1 ) ;`
15			`BITCLR ( R3 , 19 ) ;`
16
17			`//BITSET ( Dreg , uimm5 ) ; /* (a) */`
18			`BITSET ( R7 , 0 ) ;`
19			`BITSET ( R7 , 31 ) ;`
20			`BITSET ( R7 , 15 ) ;`
21			`BITSET ( R1 , 0 ) ;`
22			`BITSET ( R2 , 1 ) ;`
23			`BITSET ( R3 , 19 ) ;`
24
25			`//BITTGL ( Dreg , uimm5 ) ; /* (a) */`
26			`BITTGL ( R7 , 0 ) ;`
27			`BITTGL ( R7 , 31 ) ;`
28			`BITTGL ( R7 , 15 ) ;`
29			`BITTGL ( R1 , 0 ) ;`
30			`BITTGL ( R2 , 1 ) ;`
31			`BITTGL ( R3 , 19 ) ;`
32
33			`//CC = BITTST ( Dreg , uimm5 ) ; /* set CC if bit = 1 (a)*/`
34			`CC = BITTST ( R7 , 0 ) ;`
35			`CC = BITTST ( R7 , 31 ) ;`
36			`CC = BITTST ( R7 , 15 ) ;`
37			`CC = BITTST ( R1 , 0 ) ;`
38			`CC = BITTST ( R2 , 1 ) ;`
39			`CC = BITTST ( R3 , 19 ) ;`
40
41			`//CC = ! BITTST ( Dreg , uimm5 ) ; /* set CC if bit = 0 (a)*/`
42			`CC = !BITTST ( R7 , 0 ) ;`
43			`CC = !BITTST ( R7 , 31 ) ;`
44			`CC = !BITTST ( R7 , 15 ) ;`
45			`CC = !BITTST ( R1 , 0 ) ;`
46			`CC = !BITTST ( R2 , 1 ) ;`
47			`CC = !BITTST ( R3 , 19 ) ;`
48
49			`//Dreg = DEPOSIT ( Dreg, Dreg ) ; /* no extension (b) */`
50			`R7 = DEPOSIT(R0, R1);`
51			`R7 = DEPOSIT(R7, R1);`
52			`R7 = DEPOSIT(R7, R7);`
53			`R1 = DEPOSIT(R0, R1);`
54			`R2 = DEPOSIT(R7, R1);`
55			`R3 = DEPOSIT(R7, R7);`
56
57			`//Dreg = DEPOSIT ( Dreg, Dreg ) (X) ; /* sign-extended (b) */`
58			`R7 = DEPOSIT(R0, R1)(X);`
59			`R7 = DEPOSIT(R7, R1)(X);`
60			`R7 = DEPOSIT(R7, R7)(X);`
61			`R1 = DEPOSIT(R0, R1)(X);`
62			`R2 = DEPOSIT(R7, R1)(X);`
63			`R3 = DEPOSIT(R7, R7)(X);`
64
65			`//Dreg = EXTRACT ( Dreg, Dreg_lo ) (Z) ; /* zero-extended (b)*/`
66			`R7 = EXTRACT(R0, R1.L)(Z);`
67			`R7 = EXTRACT(R7, R1.L)(Z);`
68			`R7 = EXTRACT(R7, R7.L)(Z);`
69			`R1 = EXTRACT(R0, R1.L)(Z);`
70			`R2 = EXTRACT(R7, R1.L)(Z);`
71			`R3 = EXTRACT(R7, R7.L)(Z);`
72
73			`//Dreg = EXTRACT ( Dreg, Dreg_lo ) (X) ; /* sign-extended (b)*/`
74			`R7 = EXTRACT(R0, R1.L)(X);`
75			`R7 = EXTRACT(R7, R1.L)(X);`
76			`R7 = EXTRACT(R7, R7.L)(X);`
77			`R1 = EXTRACT(R0, R1.L)(X);`
78			`R2 = EXTRACT(R7, R1.L)(X);`
79			`R3 = EXTRACT(R7, R7.L)(X);`
80
81			`//BITMUX ( Dreg , Dreg , A0 ) (ASR) ; /* shift right, LSB is shifted out (b) */`
82			`BITMUX(R0, R1, A0)(ASR);`
83			`BITMUX(R0, R2, A0)(ASR);`
84			`BITMUX(R1, R3, A0)(ASR);`
85			`//BITMUX(R0, R0, A0)(ASR);`
86
87			`//BITMUX ( Dreg , Dreg , A0 ) (ASL) ; /* shift left, MSB is shifted out (b) */`
88			`//BITMUX(R0, R0, A0)(ASL);`
89			`BITMUX(R0, R1, A0)(ASL);`
90			`BITMUX(R1, R2, A0)(ASL);`
91
92			`//Dreg_lo = ONES Dreg ; /* (b) */`
93			`R0.L = ONES R0;`
94			`R0.L = ONES R1;`
95			`R1.L = ONES R6;`
96			`R2.L = ONES R7;`
97
98

Browse

Tools

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [binutils-2.20.1/] [gas/] [testsuite/] [gas/] [bfin/] [bit2.s] - Blame information for rev 219