Update.
[glibc.git] / sysdeps / libm-i387 / s_copysign.S
blob2520a944270708af7f6e8616b3859e7eb062c939
1 /*
2  * Written by J.T. Conklin <jtc@netbsd.org>.
3  * Public domain.
4  */
6 #include <machine/asm.h>
8 RCSID("$NetBSD: s_copysign.S,v 1.4 1995/05/08 23:53:02 jtc Exp $")
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 weak_alias (__copysign, copysign)