| 1 | /* |
|---|---|
| 2 | * Public domain. |
| 3 | */ |
| 4 | |
| 5 | #include <machine/asm.h> |
| 6 | #include <libm-alias-double.h> |
| 7 | |
| 8 | RCSID("$NetBSD: s_copysign.S,v 1.4 1995/05/08 23:53:02 jtc Exp $") |
| 9 | |
| 10 | ENTRY(__copysign) |
| 11 | movl 16(%esp),%edx |
| 12 | movl 8(%esp),%eax |
| 13 | andl $0x80000000,%edx |
| 14 | andl $0x7fffffff,%eax |
| 15 | orl %edx,%eax |
| 16 | movl %eax,8(%esp) |
| 17 | fldl 4(%esp) |
| 18 | ret |
| 19 | END (__copysign) |
| 20 | libm_alias_double (__copysign, copysign) |
| 21 |