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