s_copysign.S revision 1.3 
1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7
8RCSID("$Id: s_copysign.S,v 1.3 1995/04/28 22:43:54 jtc Exp $")
9
10ENTRY(copysign)
11	movl	16(%esp),%edx
12	andl	$0x80000000,%edx
13	movl	8(%esp),%eax
14	andl	$0x7fffffff,%eax
15	orl	%edx,%eax
16	movl	%eax,8(%esp)
17	fldl	4(%esp)
18	ret
19