From fcedfddf00b3f994e4f4e40332ac7fc192c63244 Mon Sep 17 00:00:00 2001
From: polwex <polwex@sortug.com>
Date: Sun, 5 Oct 2025 21:56:51 +0700
Subject: claude is gud

---
 vere/ext/gmp/gen/aarch64-linux/mpn/addlsh1_n.s | 161 +++++++++++++++++++++++++
 1 file changed, 161 insertions(+)
 create mode 100644 vere/ext/gmp/gen/aarch64-linux/mpn/addlsh1_n.s

(limited to 'vere/ext/gmp/gen/aarch64-linux/mpn/addlsh1_n.s')

diff --git a/vere/ext/gmp/gen/aarch64-linux/mpn/addlsh1_n.s b/vere/ext/gmp/gen/aarch64-linux/mpn/addlsh1_n.s
new file mode 100644
index 0000000..91f17cb
--- /dev/null
+++ b/vere/ext/gmp/gen/aarch64-linux/mpn/addlsh1_n.s
@@ -0,0 +1,161 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+  
+  
+  
+  
+  
+
+
+
+
+	.text
+	.align	3
+	.globl	__gmpn_addlsh1_n 
+	.type	__gmpn_addlsh1_n,@function
+__gmpn_addlsh1_n:
+	lsr	x18, x3, #2
+	tbz	x3, #0, .Lbx0
+
+.Lbx1:	ldr	x5, [x1]
+	tbnz	x3, #1, .Lb11
+
+.Lb01:	ldr	x11, [x2]
+	cbz	x18, .L1
+	ldp	x8, x9, [x2,#8]
+	lsl	x13, x11, #1
+	adds	x15, x13, x5
+	str	x15, [x0],#8
+	sub	x1, x1, #24
+	sub	x2, x2, #8
+	b	.Lmid
+
+.L1:	lsl	x13, x11, #1
+	adds	x15, x13, x5
+	str	x15, [x0]
+	lsr	x0, x11, 63
+	adc	x0, x0, xzr
+	ret
+
+.Lb11:	ldr	x9, [x2]
+	ldp	x10, x11, [x2,#8]!
+	lsl	x13, x9, #1
+	adds	x17, x13, x5
+	str	x17, [x0],#8
+	sub	x1, x1, #8
+	cbz	x18, .Lend
+	b	.Ltop
+
+.Lbx0:	tbnz	x3, #1, .Lb10
+
+.Lb00:	adds	x11, xzr, xzr
+	ldp	x8, x9, [x2],#-16
+	sub	x1, x1, #32
+	b	.Lmid
+
+.Lb10:	adds	x9, xzr, xzr
+	ldp	x10, x11, [x2]
+	sub	x1, x1, #16
+	cbz	x18, .Lend
+
+	.align	4
+.Ltop:	ldp	x4, x5, [x1,#16]
+	extr	x12, x10, x9, #63
+	ldp	x8, x9, [x2,#16]
+	extr	x13, x11, x10, #63
+	adcs	x14, x12, x4
+	adcs	x15, x13, x5
+	stp	x14, x15, [x0],#16
+.Lmid:	ldp	x4, x5, [x1,#32]!
+	extr	x12, x8, x11, #63
+	ldp	x10, x11, [x2,#32]!
+	extr	x13, x9, x8, #63
+	adcs	x16, x12, x4
+	adcs	x17, x13, x5
+	stp	x16, x17, [x0],#16
+	sub	x18, x18, #1
+	cbnz	x18, .Ltop
+
+.Lend:	ldp	x4, x5, [x1,#16]
+	extr	x12, x10, x9, #63
+	extr	x13, x11, x10, #63
+	adcs	x14, x12, x4
+	adcs	x15, x13, x5
+	stp	x14, x15, [x0]
+	lsr	x0, x11, 63
+	adc	x0, x0, xzr
+	ret
+	.size	__gmpn_addlsh1_n,.-__gmpn_addlsh1_n
+
-- 
cgit v1.2.3