| 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 <machine/asm.h> |
| 9 | |
| 10 | RCSID("$NetBSD: $") |
| 11 | |
| 12 | ENTRY(__copysignl) |
| 13 | movl 32(%rsp),%edx |
| 14 | movl 16(%rsp),%eax |
| 15 | andl $0x8000,%edx |
| 16 | andl $0x7fff,%eax |
| 17 | orl %edx,%eax |
| 18 | movl %eax,16(%rsp) |
| 19 | fldt 8(%rsp) |
| 20 | ret |
| 21 | END (__copysignl) |
| 22 | weak_alias (__copysignl, copysignl) |
| 23 |