]> CyberLeo.Net >> Repos - FreeBSD/releng/10.0.git/blob - lib/msun/i387/s_copysignl.S
- Copy stable/10 (r259064) to releng/10.0 as part of the
[FreeBSD/releng/10.0.git] / lib / msun / i387 / s_copysignl.S
1 /*
2  * Based on code written by J.T. Conklin <jtc@NetBSD.org>.
3  * Public domain.
4  */
5
6 #include <machine/asm.h>
7 __FBSDID("$FreeBSD$")
8
9 ENTRY(copysignl)
10         movl    24(%esp),%edx
11         andl    $0x8000,%edx
12         movl    12(%esp),%eax
13         andl    $0x7fff,%eax
14         orl     %edx,%eax
15         movl    %eax,12(%esp)
16         fldt    4(%esp)
17         ret
18 END(copysignl)
19
20         .section .note.GNU-stack,"",%progbits