1 | /* |
2 | * Written by J.T. Conklin <jtc@netbsd.org>. |
3 | * Changes for long double by Ulrich Drepper <drepper@cygnus.com>. |
4 | * Adopted for x86-64 by Andreas Jaeger <aj@suse.de>. |
5 | * Public domain. |
6 | */ |
7 | |
8 | #include <libm-alias-ldouble.h> |
9 | #include <machine/asm.h> |
10 | |
11 | RCSID("$NetBSD: $" ) |
12 | |
13 | ENTRY(__copysignl) |
14 | movl 32(%rsp),%edx |
15 | movl 16(%rsp),%eax |
16 | andl $0x8000,%edx |
17 | andl $0x7fff,%eax |
18 | orl %edx,%eax |
19 | movl %eax,16(%rsp) |
20 | fldt 8(%rsp) |
21 | ret |
22 | END (__copysignl) |
23 | libm_alias_ldouble (__copysign, copysign) |
24 | |