summaryrefslogtreecommitdiff
path: root/vere/ext/gmp/gen/aarch64-linux/mpn/rshift.s
blob: 04def66d7c85f4a7484842e3fea222a3294b2b66 (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
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148



































































	.text
	.align	3
	.globl	__gmpn_rshift 
	.type	__gmpn_rshift,@function
__gmpn_rshift:
	mov	x16, x0
	sub	x8, xzr, x3
	lsr	x18, x2, #2
	tbz	x2, #0, .Lbx0

.Lbx1:	ldr	x5, [x1]
	tbnz	x2, #1, .Lb11

.Lb01:	lsl	x0, x5, x8
	lsr	x2, x5, x3
	cbnz	x18, .Lgt1
	str	x2, [x16]
	ret
.Lgt1:	ldp	x4, x5, [x1,#8]
	sub	x1, x1, #8
	sub	x16, x16, #32
	b	.Llo2

.Lb11:	lsl	x0, x5, x8
	lsr	x2, x5, x3
	ldp	x6, x7, [x1,#8]!
	sub	x16, x16, #16
	b	.Llo3

.Lbx0:	ldp	x4, x5, [x1]
	tbz	x2, #1, .Lb00

.Lb10:	lsl	x0, x4, x8
	lsr	x13, x4, x3
	lsl	x10, x5, x8
	lsr	x2, x5, x3
	cbnz	x18, .Lgt2
	orr	x10, x10, x13
	stp	x10, x2, [x16]
	ret
.Lgt2:	ldp	x4, x5, [x1,#16]
	orr	x10, x10, x13
	str	x10, [x16],#-24
	b	.Llo2

.Lb00:	lsl	x0, x4, x8
	lsr	x13, x4, x3
	lsl	x10, x5, x8
	lsr	x2, x5, x3
	ldp	x6, x7, [x1,#16]!
	orr	x10, x10, x13
	str	x10, [x16],#-8
	b	.Llo0

	.align	4
.Ltop:	ldp	x4, x5, [x1,#16]
	orr	x10, x10, x13
	orr	x11, x12, x2
	stp	x11, x10, [x16,#16]
	lsr	x2, x7, x3
.Llo2:	lsl	x10, x5, x8
	lsl	x12, x4, x8
	lsr	x13, x4, x3
	ldp	x6, x7, [x1,#32]!
	orr	x10, x10, x13
	orr	x11, x12, x2
	stp	x11, x10, [x16,#32]!
	lsr	x2, x5, x3
.Llo0:	sub	x18, x18, #1
.Llo3:	lsl	x10, x7, x8
	lsl	x12, x6, x8
	lsr	x13, x6, x3
	cbnz	x18, .Ltop

.Lend:	orr	x10, x10, x13
	orr	x11, x12, x2
	lsr	x2, x7, x3
	stp	x11, x10, [x16,#16]
	str	x2, [x16,#32]
	ret
	.size	__gmpn_rshift,.-__gmpn_rshift