| 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 | |