summaryrefslogtreecommitdiff
path: root/vere/ext/gmp/gen/aarch64-linux/mpn/sqr_diag_addlsh1.s
blob: 96df05b2e58aa7333bf199fe69ebf7254d989a65 (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






















































	.text
	.align	3
	.globl	__gmpn_sqr_diag_addlsh1 
	.type	__gmpn_sqr_diag_addlsh1,@function
__gmpn_sqr_diag_addlsh1:
	ldr	x15, [x2],#8
	lsr	x18, x3, #1
	tbz	x3, #0, .Lbx0

.Lbx1:	adds	x7, xzr, xzr
	mul	x12, x15, x15
	ldr	x16, [x2],#8
	ldp	x4, x5, [x1],#16
	umulh	x11, x15, x15
	b	.Lmid

.Lbx0:	adds	x5, xzr, xzr
	mul	x12, x15, x15
	ldr	x17, [x2],#16
	ldp	x6, x7, [x1],#32
	umulh	x11, x15, x15
	sub	x18, x18, #1
	cbz	x18, .Lend

	.align	4
.Ltop:	extr	x9, x6, x5, #63
	mul	x10, x17, x17
	ldr	x16, [x2,#-8]
	adcs	x13, x9, x11
	ldp	x4, x5, [x1,#-16]
	umulh	x11, x17, x17
	extr	x8, x7, x6, #63
	stp	x12, x13, [x0],#16
	adcs	x12, x8, x10
.Lmid:	extr	x9, x4, x7, #63
	mul	x10, x16, x16
	ldr	x17, [x2],#16
	adcs	x13, x9, x11
	ldp	x6, x7, [x1],#32
	umulh	x11, x16, x16
	extr	x8, x5, x4, #63
	stp	x12, x13, [x0],#16
	adcs	x12, x8, x10
	sub	x18, x18, #1
	cbnz	x18, .Ltop

.Lend:	extr	x9, x6, x5, #63
	mul	x10, x17, x17
	adcs	x13, x9, x11
	umulh	x11, x17, x17
	extr	x8, x7, x6, #63
	stp	x12, x13, [x0]
	adcs	x12, x8, x10
	extr	x9, xzr, x7, #63
	adcs	x13, x9, x11
	stp	x12, x13, [x0,#16]

	ret
	.size	__gmpn_sqr_diag_addlsh1,.-__gmpn_sqr_diag_addlsh1