math: Add ARM implementation for copysignl

git-svn-id: svn+ssh://svn.code.sf.net/p/mingw-w64/code/trunk@6636 4407c894-4637-0410-b4f5-ada5f102cad1

mingw-w64-crt/math/copysignl.S

diff --git a/mingw-w64-crt/math/copysignl.S b/mingw-w64-crt/math/copysignl.S
index 79c69f2..77237e9 100644
--- a/mingw-w64-crt/math/copysignl.S
+++ b/mingw-w64-crt/math/copysignl.S
@@ -18,10 +18,10 @@
 	.align 4
 #endif
 
-.globl __MINGW_USYMBOL(copysignl)
+	.globl __MINGW_USYMBOL(copysignl)
 	.def	__MINGW_USYMBOL(copysignl);	.scl	2;	.type	32;	.endef
 __MINGW_USYMBOL(copysignl):
-#ifdef _WIN64
+#if defined(_AMD64_) || defined(__x86_64__)
 	movq	(%rdx), %rax
 	movq	%rax, (%rcx)
 	movq	8(%rdx), %rax
@@ -32,7 +32,19 @@
 	movq	%rax, 8(%rcx)
 	movq	%rcx, %rax
 	ret
-#else
+#elif defined(_ARM_) || defined(__arm__)
+	fcmpzd	d1
+	fmstat
+	bmi	1f /* jump if d1 is negative */
+	fcmpzd	d0
+	fmstat
+	vnegmi.f64	d0, d0 /* negate d0 if it is negative */
+	bx	lr
+	1: fcmpzd	d0
+	fmstat
+	vnegpl.f64	d0, d0 /* negate d0 if it is positive */
+	bx	lr
+#elif defined(_X86_) || defined(__i386__)
 	movl	24(%esp),%edx
 	movl	12(%esp),%eax
 	andl	$0x8000,%edx