]> git.ipfire.org Git - thirdparty/glibc.git/blame - sysdeps/libm-i387/s_copysignf.S
update from main archive 961229
[thirdparty/glibc.git] / sysdeps / libm-i387 / s_copysignf.S
CommitLineData
f7eac6eb
RM
1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7
8RCSID("$NetBSD: s_copysignf.S,v 1.3 1995/05/08 23:53:25 jtc Exp $")
9
10ENTRY(__copysignf)
11 movl 8(%esp),%edx
f7eac6eb 12 movl 4(%esp),%eax
cccda09f 13 andl $0x80000000,%edx
f7eac6eb
RM
14 andl $0x7fffffff,%eax
15 orl %edx,%eax
16 movl %eax,4(%esp)
17 flds 4(%esp)
18 ret
d38cd08c 19END (__copysignf)
f7eac6eb 20weak_alias (__copysignf, copysignf)